Vba Visual Basic（Excel）是否通过1个按钮运行2个宏？

嗨，我有一个按钮可以将我的电子表格导出为PDF

我希望该按钮导出文档并将其保存在名为“Excel Calculator”的文件夹中。目前，我只能获取要创建的文件夹或要导出的文档。我不知道如何同时运行这两个命令，以便将文档导出并保存在excel calculator文件夹中

另外，如何更改文件路径，使其不必像我指定的那样进入D:\中，而是找到用户的“我的文档”文件夹

---

可以按顺序调用多个宏。例如，如果将按钮链接到宏

fullSequence

，则可以先创建文件夹，然后将文件导出到该文件夹：

Sub fullSequence()
    createFolder '<-- call macro 1
    exportFile '<-- call macro 2
End Sub

。。。为此：

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
     folderName & "\" & strFileName & ".pdf", _
     Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True

---

。。。为了将

folderName

（您已经有了文件夹路径）包含到export

Filename

参数中。

Hi，感谢您的回复，我添加了

完整序列

子项，并更改了

SaveToPDF（）的名称

和

NewFolder

subs以匹配在

全序列中调用的宏

但是，现在当我将宏链接到按钮时，我得到错误：“系统错误&H8007007B（-2147024773）”

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
     "D:\" & strFileName & ".pdf", _
     Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
     folderName & "\" & strFileName & ".pdf", _
     Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True