作业:将范围从一个工作簿复制到另一个(另一个工作簿存在并且需要打开)
复制范围:
`Worksheets("paste").Range("A2:BD500").SpecialCells(xlCellTypeVisible).Copy`
Run Code Online (Sandbox Code Playgroud)打开新文件:
Workbooks.Open Filename:="C:\Test\test.xlsx", WriteResPassword:="WriteFile"
激活工作表并粘贴@RANGE A6
Windows("test.xlsx").Activate
Selection.Range("A6").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
问题:它不粘贴在 A6 中!!!!它进入任何单元格!!!!