如何使用VBA在Excel上創建增量總和

這裏是現場我有很多工作表都顯示相同的列在相同的順序，他們有不同的數據，我試圖寫一個宏來插入一列接下來以成本爲單位並創建運行彙總或增量總和，然後將該列複製到新工作表中。經過一番嘗試，我已經設法接近我的目標，問題是我的宏一次又一次地進行相同的計算，而沒有總結成本列。它會變得更清晰，如果你看看我在下面發佈的代碼。所有幫助解決這個問題將不勝感激。如何使用VBA在Excel上創建增量總和

Sub IncCost() 

    Dim r As Range 
    Set r = ActiveSheet.Range("A1").CurrentRegion 
    Columns("H:H").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove 
    Range("H1").FormulaR1C1 = "Incremental cost" 
    Range("H2").FormulaR1C1 = Cells(2, 7) 
    Range("H3").FormulaR1C1 = "=" & Cells(3, 7) & "+" & Cells(2, 8) 
    Range("H3").AutoFill Destination:=Range("H3:H" & r.Rows.Count) 

End Sub

來源

2013-06-04 user2453446

也許：

Range("h3:h" & r.rows.count).formular1c1 = "=RC[-1]+R[-1]C"

來源

2013-06-04 22:03:26 JosieP

感謝JosieP，這種方法的問題是，一旦我複製一個新的shhet我colunm最終複製公式，以及不是值。 – user2453446

你可以複製和粘貼特殊值或你的代碼可以將公式轉換爲值 – JosieP

我不知道這甚至是可能的，你怎麼做這個伎倆？ – user2453446

如何使用VBA在Excel上創建增量總和

回答

相關問題