复制到另一张纸时出现宏错误

Question

我正在将数据从一张纸复制到另一张纸，但是发生运行时错误1004 这是由于工作表问题。因为代码是工作表2和3的代码，在执行期间，如果我停留在工作表1上，则会发生此错误。我还需要工作表

使用活动工作表，选择工作表但未解决

Sub T()
    'Set wksSource = ActiveWorkbook.Sheets("Sheet3")
    Sheets("sheet3").Range(Range("A1"), Range("A1").End(xlDown)).Copy
    Sheets("sheet2").Cells(1, 1).PasteSpecial Paste:=xlPasteAll, Transpose:=True
End Sub

尽管工作表所在的位置，代码仍然运行