錯誤13類型不匹配複製粘貼

我有一個代碼，其中我改變了一些值。現在我有以下錯誤：錯誤13，類型不匹配。錯誤指向是這個方向：錯誤13類型不匹配複製粘貼

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

可能是什麼問題？

來源

2017-06-28 Johan

我認爲問題出在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

來源

2017-06-28 13:59:47 Vityata

不，它不工作。（忘記了一些** s **的某處** s **。：D –

@ASH我稍後添加了Worksheet（1），最初它與我的Excel的原始名稱相同：D – Vityata

謝謝！確實是這個問題。 z是一個字符串，而不是一個整數 – Johan

錯誤13類型不匹配複製粘貼

回答

相關問題