Board logo

標題: 請教VBA 出現 400問題 [打印本頁]
作者: jsc0518    時間: 2017-3-4 19:13     標題: 請教VBA 出現 400問題

親愛的各位先進

1.若我將原始資料放置EXCEL VBA時，連續執行VBA，TEST OK
2.但若我再次按下VBA時，則會出現"400"的錯誤

請問要怎麼樣才能避免發生錯誤訊息400的出現


[attach]26760[/attach]
作者: jsc0518    時間: 2017-3-4 20:21

我附的這個檔案是，跨工作表執行另一VBA(複製欄位動作)時發生錯誤
但若該VBA是在該工作表執行時，就正常
我哪裡應該要改?


[attach]26761[/attach]


[attach]26762[/attach]
作者: jsc0518    時間: 2017-3-4 21:13

我發現，我是卡在像    Columns 語法
向下列語法若是要跨工作表執行時，該如何寫?

Columns("C:C").Select
    Selection.Copy
    Columns("D").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
作者: lpk187    時間: 2017-3-4 23:24

回復 3# jsc0518
不用.Select的
  1. Sub S8()

  3.     Columns("A").Copy
  4.     Columns("B").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
  5.         :=False, Transpose:=False

  7. End Sub
複製代碼
作者: jsc0518    時間: 2017-3-5 06:27

回復 4# lpk187


感謝您的回覆
測試成功，再次謝謝您!
:)



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