回答編集履歴
1
CODE 修正
test
CHANGED
@@ -44,9 +44,9 @@
|
|
44
44
|
|
45
45
|
Cells(指定行, 5) = 出金金額
|
46
46
|
|
47
|
-
入金累計 = WorksheetFunction.Sum(Range(Cells(
|
47
|
+
入金累計 = WorksheetFunction.Sum(Range(Cells(開始行番号, 4), Cells(指定行, 4)))
|
48
48
|
|
49
|
-
出金累計 = WorksheetFunction.Sum(Range(Cells(
|
49
|
+
出金累計 = WorksheetFunction.Sum(Range(Cells(開始行番号, 5), Cells(指定行, 5)))
|
50
50
|
|
51
51
|
残高金額 = 入金累計 - 出金累計
|
52
52
|
|