vba - 从外部触发器运行 VBA 代码？

Question

当第一个文档正在保存时，是否可以创建一个宏以在一个工作簿上运行，从另一个工作簿触发？

一些背景知识:我将包含所需数据的 PDF 文档转换为 Excel 文档。只能对 .xlxs 文档进行转换。之后我可以将此文档“另存为”到启用宏的文档中，但整个过程将花费更长的时间，而整个目标是大幅缩短时间。

我有一个可以将数据从 .xlsx 文件提取到 .xlsm 文件的宏，因此我可以根据需要从那里操作数据。当我更新 .xlxs 文件时自动获取它是问题所在。

下面是我目前编写的代码，用于将 .xlsx 文件中的数据导入启用宏的 Excel 文档。是否可以在我进行更改并保存 .xlsx 文件时自动提取数据而无需打开任何一个？

Sub Import_Test()     
    Dim Target_Workbook As Workbook
    Dim Source_Workbook As Workbook
    Dim Target_Path As String

    Target_Path = "H:\Test.xlsx"
    Set Target_Workbook = Workbooks.Open("H:\Test.xlsx")
    Set Source_Workbook = ThisWorkbook
    Target_Data = Target_Workbook.Sheets(1).Cells(35, 1)
    Source_Workbook.Sheets(1).Cells(2, 1) = Target_Data
    Source_data = Source_Workbook.Sheets(1).Cells(2, 1)
    Target_Workbook.Sheets(1).Cells(35, 1) = Source_data
    Source_Workbook.Save
    Target_Workbook.Close False
End Sub

Answer 1

我看到它的方式 - 你有两个选择:
1)创建一个工作簿，不断检查'.xlsx'工作簿的最后修改日期，一旦它发生变化，就会触发一个宏......这样做的缺点是你必须让它打开才能工作。
2)我认为这是首选方法，将 .xlsx 文件切换为 .xlsm 或 .xlsb 文件，正如其他人所指出的那样，这确实是获得您正在寻找的功能并切换 PDF 创建的唯一方法您当前使用的 Adob​​e 的内置 PDF 创建功能的方法...

在任何一种情况下，您都必须妥协您的一个要求，选项 1 需要打开工作簿，选项 2 需要您切换 PDF 方法。我认为选项 2 将是迄今为止的首选路线，只要没有任何理由绝对必须使用 Adob​​e PDF maker 创建 PDF...

如果可以使用，这是内置 PDF 创建器的代码:
"Thisworkbook.ExportAsFixedFormat 类型:=xlTypePDF，文件名:="文件名"，质量:=xlQualityStandard，IncludeDocProperties:=True，IgnorePrintAreas:=False，OpenAfterPublish:=True"

希望这可以帮助，
丝绸代码