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
文章標籤
全站熱搜
留言列表