返回列表 上一主題 發帖

複製貼上如何寫?

複製貼上如何寫?

Sub 巨集9()
'
' 巨集9 巨集
'

'
    Sheets("a").Columns("H:H").Copy
    Sheets("b").Range("H1").Paste
End Sub

各位好
請問各位先進
以上語法哪裡錯了?

請教
ActiveSheet.Paste
這段程式碼是否代表1定要開啟檔案?

TOP

請教
若不開啟sheets("b") 檔案執行..要如何寫?

TOP

上一個問題我再想想
另外請教
以下這個程式碼哪裡有錯?
Private Sub Worksheet_Change(ByVal Target As Range)
Sheets("從01(接收)").Range("a7:a100000").Copy
    Sheets("比對").Select
    Range("I3").Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=True
End Sub

TOP

回復 7# oak0723-1
這個問題我已自解了

TOP

        靜思自在 : 人要自愛,才能愛普天下的人。
返回列表 上一主題