我想从其他路径的工作簿复制到我的活动工作簿，但是当我在下面

Question

Option Explicit 
Sub Test() 
    Dim ABC As Workbook 
    Dim XYZ As ThisWorkbook 

    With Application 
     .ScreenUpdating = False 
     .EnableEvents = False 
     .DisplayAlerts = False 
    End With 

    Set XYZ = ThisWorkbook 
    Set ABC = Workbooks.Open("F:\Test\ABC.csv") 

    With ABC 
     .Copy After:=XYZ.Sheets(XYZ.Sheets.Count) 
     .Close False 
    End With 

    With Application 
     .ScreenUpdating = True 
     .EnableEvents = True 
     .DisplayAlerts = True 
    End With 

End Sub 

Answer 1

与ABC .Copy运行后显示错误：= XYZ.Sheets（XYZ.Sheets.Count） 。关闭False End With

在上面的行ABC是一个工作簿，其中是ABC工作簿的工作表参考？

也使用工作表参考。

With ABC.Sheets("MySheet") 

或者

With ABC.Sheets(1)