使用 Excel 中的按鈕將數字從一列新增到另一列,並用新數字取代第二列中的舊數字

使用 Excel 中的按鈕將數字從一列新增到另一列,並用新數字取代第二列中的舊數字

如標題所說。我有一個正在製定的預算表,我想要一個按鈕,以便每週當我收到報酬時我可以單擊它,並將已經分配的工資添加到每項費用的分配資金池中。

點擊看我的桌子

因此,我已經完成了所有計算,用於將每週支出分配給費用,但我不知道如何編寫按鈕來執行我需要的操作。

好的,基本上我需要將 D6 到 D48 的所有數字加到 E6 到 E48 中的相鄰數字。但是,我還需要新的數字出現在該列中,就好像每次都添加新的金額一樣。即 E6 = E6+D6,每次按下按鈕時,它只會將 D 列中的內容新增到 E 列。

抱歉胡言亂語,我希望這是有道理的。

感謝您提前提供的任何幫助

彼得

答案1

好吧,在斯科特的大力幫助下,我已經成功地讓代碼正常工作了。非常感謝您的投入。這是我想出來的程式碼:

私有子 CommandButton1_Click()

Dim x As Integer
Dim y As Double

Range("E2").Value = Range("E2").Value + 1

For x = 6 To 48

    y = Range("E" & x).Value

    Range("E" & x).Value = y + Range("D" & x).Value

Next x   

結束子

我還在放置按鈕的上方添加了一個計數器,這樣我就知道我是否已經在那週按下了它。

相關內容