工作: 将一个工作簿中的范围复制到另一个工作簿中(已存在另一个工作簿且需打开)
Copy range:
`Worksheets("paste").Range("A2:BD500").SpecialCells(xlCellTypeVisible).Copy`
Open new file:
Workbooks.Open Filename:="C:\Test\test.xlsx", WriteResPassword:="WriteFile"
Activate sheet and paste @RANGE A6
Windows("test.xlsx").Activate Selection.Range("A6").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False
问题:无法粘贴到A6单元格中!!!粘贴到任何单元格中都可以!!!