close

Sub 複製()

    Range("D4,D5,F4,F5").Select            ‘選取D4.D5.F4.F5

    Range("F5").Activate                   ‘位置指定F5

    Selection.Copy                         ‘動作[複製]

    Sheets("Sheet2").Select                ‘選取”SHEET2”的工作表

    Range("B2").Select                     ‘位置指定B2

    ActiveSheet.Paste                      動作[貼上]

    Application.CutCopyMode = False  ‘將之前複製的內容清除

End Sub

arrow
arrow
    創作者介紹
    創作者 顧小姐 的頭像
    顧小姐

    顧小姐工作備忘錄

    顧小姐 發表在 痞客邦 留言(0) 人氣()