VBAで質問です。 月・氏名・金額を入力欄に入力し、ボタンを押すと 金額が入力されるようにしたいのですが、同月・同氏名 が再び入力する時に前回入力された金額にプラスしたい です。よろしくお願いします。

画像

Visual Basic | Excel83閲覧

ベストアンサー

0

ThanksImg質問者からのお礼コメント

ありがとうございました。 出来ました。

お礼日時:2021/12/5 21:05

その他の回答(1件)

0

下記のシート名を実際のシート名に変えて標準モジュールに記述しボタンにマクロの登録をしてください Sub Sample() Dim r As Range Dim i As Long Dim j As Long With Worksheets("シート名") Set r = .Range("B6:N13") For i = 2 To r.Rows.Count For j = 2 To r.Columns.Count If r(i, 1).Value = .Range("D3").Value Then If r(1, j).Value = .Range("C3").Value Then r(i, j).Value = r(i, j).Value + .Range("E3").Value End If End If Next j Next i End With End Sub