我做了這段代碼,但我不知道如何將結果 (Sheets(x 1).Cells(i, 5)) 存盤在一個我想稍后在另一個變數中使用的變數中,它是一列數字功能。
也許我應該做一個函式,然后添加一個子來存盤函式。
Sub sumV40()
Dim i As Integer
Dim x
For x = 1 To Sheets.Count
For i = 1 To 10
Sheets(x 1).Cells(i, 5) = Sheets(1).Cells(i, 1) Sheets(x 1).Cells(i, 1)
Next i
Next x
end sub()
uj5u.com熱心網友回復:
因此,您需要做的就是將一個新的 Integer 變數變暗并將其放在賦值運算子的左側(在這種情況下,對于 VBA,它是 = 符號)。然后,您需要做的就是將整個代數計算括在括號中(盡管在這種情況下這不是必需的)。看起來您正在積極地將計算值放入另一個單元格中,所以我將其分解為第二步。
例子:
Dim i As Integer
Dim x
Dim total As Integer
For x = 1 To Sheets.Count
For i = 1 To 10
total = (Sheets(1).Cells(i, 1) Sheets(x 1).Cells(i, 1))
Sheets(x 1).Cells(i, 5) = total
Next i
Next x
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/518312.html
標籤:擅长vba和
