我对 vba 编码还很陌生,我对如何在工作表之间导航感到困惑。我有一个包含单个工作表的工作簿,并且该工作表被复制到一个新工作簿中,以便可以在不损坏原始文件的情况下对其进行编辑。我遇到的问题是在创建新工作簿时,我需要从第三个工作簿中复制信息并将其粘贴到新工作簿中。我已经尝试了很多事情,但无法弄清楚。我认为问题在于新书的名称不只是 Book#,所以一旦我离开去激活另一本书,我就没有可靠的返回路径了。
对不起,没有一个实际的例子。我根据收到的回复添加了前两行。
Dim wb As Workbook
Set wb = ActiveWorkbook
' Open the 3rd workbook & copy
Workbooks.Open ("Z:\Terms And Conditions.xlsx")
Windows("Terms And Conditions.xlsx").Activate
ActiveSheet.Shapes.Range(Array("Picture 4")).Select
Selection.Copy
' Return to wb and paste
ActiveWorkbook(wb).Activate 'The code is stopping here
Worksheets("Sheet1").Activate
Range("A534").Select
ActiveSheet.Paste