如何激活属于一个不同的工作簿的Excel工作表

Question

让我们将该代码作为示例（内一个excel VBA宏）：

   --more code-- 
     Sheets("Sheet2").Activate 
     ActiveSheet.Range("A1").Select 
      --more code-- 

上面的代码行切换到Sheet（工作簿我内部的片材正在使用）。 但是如果我想打开另一张工作簿，怎么办？

我已经试过这样的事情：

Sheets("C:\MYROUTE\[MyWorkbook.xlsx]Sheet2").Activate 

或

Sheets("C:\MYROUTE\MyWorkbook.xlsx!Sheet2").Activate 

但它不工作 任何想法把它写正确？

Answer 1

您可以使用以下代码选择工作簿，然后像在活动工作簿中一样使用工作表。

Dim my_path as String, my_file as String, current_wb as String 
my_path = "C:\whatever..." 
my_file = "whatever.xlsx" 
current_wb = ActiveWorkbook.Name 

Workbooks.Open my_path & "­\" & my_file 'This is to pen the workbook 
Workbooks(my_file).Activate   'This is to activate the recently opened workbook 
Workbooks(current_wb).Activate   'This is to activate the workbook that was first open 

Answer 2

应用工作簿片：

my_file.Sheets("Sheet2").Range("A1").Select 
current_wb.Sheets("Sheet1").Range("B2").Select