close

 

舉例一在B7儲存格內寫入運算式「Sum(B3:B6)」，再將儲存格B7的內容複製到C7:D7內

Sub 在儲存格範圍中使用複製及貼上()

Range(“B7”).Formula = “=Sum(B3:B6)”
Range(“B7”).Copy Destination:=Range(“C7:D7”)

End Sub

 

舉例二將A1到C1儲存格內的資料與A4到C4儲存格內的資料相加

Sub 將不同儲存格範圍內的資料相加()

Range(“A1:C1”).Select
Selection.Copy
Range(“A4”).Select
Selection.PasteSpecial Paste:=xlall, Operation:=xladd, SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False

End Sub

arrow
arrow
    文章標籤
    EXCEL巨集 vba
    全站熱搜

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

    E-mail轉寄