VBA：禁用源工作簿中的macros

如何禁用“源工作表”中的macros？

With ThisWorkbook ' enable this workbook Sheets.Add.Name = "Flow_table" ' add worksheet to be used here Sheets.Add.Name = "TP_loc" ' add worksheet to be used here ActiveSheet.Range("A1").Value = TextBox1.Value 'get the location of the source ActiveSheet.Range("B1").Value = TextBox2.Value Set Source = Workbooks.Open(TextBox1.Value) Set Source_flow = Source.Worksheets(TextBox2.Value).Columns("A:L") Set target_flow = ThisWorkbook.Worksheets("Flow_table").Columns("A:L") ' **Insert a code here that will disable the MACRO of Source which is the source workbook** Source_flow.Copy Destination:=target_flow ' copy source worksheet Source.Close False End With 

Answer 1

它看起来像你试图阻止一个事件过程运行。 你可以通过使用下面的方法来阻止他们发射

 Application.EnableEvents = False 

然后在完成后重置：

 Application.EnableEvents = True