標題: [發問] 程式碼..哪裡寫錯了 [打印本頁]

---

作者: oak0723-1    時間: 2017-3-26 19:56     標題: 程式碼..哪裡寫錯了

請問各位老師
以下這段程式碼..哪裡寫錯了
Sheet4.Range("K7:m65536").Copy
Sheets8.Range("A8").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

---

作者: VBALearner    時間: 2017-3-26 23:52

回復 1# oak0723-1

Sheet,Sheets 一個有s一個沒s?! 這工作表物件名稱是你自己設的嗎...還是打錯?!
簡單的複製貼上教學如下= ="
https://blog.gtwang.org/programming/excel-vba-programming-workbook-worksheet-cell/3/

---

作者: oak0723-1    時間: 2017-3-27 08:34

VBALearner謝謝你關注我這個問題
我是先用錄的再修改
我是想把Sheet4.Range("K7:m65536").複製到
Sheets8.Range("A8")選擇性貼上(值)
不知哪個地方出錯

---

作者: Changbanana    時間: 2017-3-27 10:07

這樣呢
Sheets(4).Range("K7:M65536").Copy
Sheets(8).Range("A8").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

---

作者: Kubi    時間: 2017-3-27 13:33

回復 1# oak0723-1
這應是版本問題，2003版會出現錯誤，因為2003版最多只能存入65536列的資料，因此你要將65529列(來源範圍)的資料放入65528列(目標範圍)是不被允許的。

---

作者: oak0723-1    時間: 2017-3-27 16:32

確實如Kubi老師所述
謝謝Changbanana..VBALearner..Kubi老師們的指導
我得解了

---

作者: chiang0320    時間: 2017-4-1 23:56

回復 1# oak0723-1


Public Sub fff()

Sheets(8).Range("A8:C65536").Value = Sheets(4).Range("K7:M65536").Value

End Sub

---

作者: oak0723-1    時間: 2017-5-25 15:40

感恩謝謝
感恩謝謝
感恩謝謝

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)