Excel 编写宏以在每个工作表上运行其他宏

Excel 编写宏以在每个工作表上运行其他宏,excel,automation,vba,Excel,Automation,Vba,我有一本excel工作簿,里面有许多不同的表格。每张工作表中都有一个宏,该宏将工作表保存为pdf格式,并将该pdf格式作为附件打开outlook。我想在一个工作表上放置一个函数,该函数将运行每个宏,而不必在各自的工作表上手动运行每个宏。假设每个工作表中都有一个名为SheetMac的宏。将以下内容放入标准模块中并运行它: Sub MASTER() For Each sh In Sheets sh.Activate Call sh.SheetMac Next sh End Sub

我有一本excel工作簿,里面有许多不同的表格。每张工作表中都有一个宏,该宏将工作表保存为pdf格式,并将该pdf格式作为附件打开outlook。我想在一个工作表上放置一个函数,该函数将运行每个宏,而不必在各自的工作表上手动运行每个宏。

假设每个工作表中都有一个名为SheetMac的宏。将以下内容放入标准模块中并运行它:

Sub MASTER()
For Each sh In Sheets
    sh.Activate
    Call sh.SheetMac
Next sh
End Sub

For/Each循环。请向我们显示您的函数?尝试了此操作,得到错误:“运行时错误'438':对象不支持此属性或方法”仅供参考宏名称为:RDB\u工作表\u或\u工作表\u To \u PDF\u和\u创建\u邮件使其与此一起工作:
Sub RunAll()将SHt设置为此工作簿中每个SHt的工作表。工作表SHt。激活调用RDB\u工作表\u或\u工作表\u以\u PDF\u和\u创建\u邮件下一个SHt结束子项