错误13类型不匹配复制粘贴

时间:2017-06-28 13:53:31

标签: vba excel-vba excel

我有一个代码,我在其中更改了一些值。现在我有以下错误:错误13,类型不匹配。错误指向的是这个方向:

ThisWorkbook.Sheets("AS").Range("A10:M19").Copy
ThisWorkbook.Sheets("InvoerIO").Range("A1:M10").Offset(z, 0).PasteSpecial xlPasteFormats 

可能是什么问题?

1 个答案:

答案 0 :(得分:1)

我认为问题在于z的价值。 我试过跟随,它有效:

Option Explicit

Public Sub TestMe()

    Worksheets(1).Range("A10:M19").Copy
    Worksheets(2).Range("A1:M10").Offset(1, 0).PasteSpecial xlPasteFormats
    Application.CutCopyMode = False

End Sub