我希望我的宏选择非活动工作簿“WbCopy”上的最后一个工作表,但Sheets.Count仅在工作簿“WbCopy”处于活动状态时有效。当“WbPaste”处于活动状态时,您对如何使其工作有任何建议吗?代码驻留在工作簿“WbPaste”中:
Sub CopyPaste()
Dim WbCopy As Workbook
Dim WbPaste As Workbook
Set WbCopy = Workbooks("copy.xlsm")
Set WbPaste = Workbooks("paste.xlsx")
WbCopy.Worksheets(Sheets.Count).Activate
End Sub
答案 0 :(得分:1)
变化:
WbCopy.Worksheets(Sheets.Count).Activate
为:
WbCopy.Worksheets(WbCopy.Sheets.Count).Activate
注意:如果您的代码位于WbPaste
,则必须为.xlsm
分机。