エクセルマクロ初心者です、cellsで範囲指定してsumができません、何が問題でしょう?どなたかチェックをお願いいたします。
Sub 計算する()
Dim a
Dim n As Long
n = 21
Dim w
Set w = Worksheets("内訳明細")
Range("e21:f20000").Select
Selection.ClearContents
Do Until w.Cells(n, 1) = ""
If w.Cells(n, 1) = "" Then
Else
a = WorksheetFunction.Sum(Range(Cells(n, 7), Cells(n, 9)).Select)
w.Cells(n, 5) = a
' w.Cells(n, 5) = w.Cells(n, 7) + w.Cells(n, 8) + w.Cells(n, 9)
w.Cells(n, 6) = w.Cells(n, 4) - w.Cells(n, 5)
End If
n = n + 1
Loop
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) ExcelVBAの転記について 1 2022/03/23 20:13
- Visual Basic(VBA) VBA 請求書自動作成 3 2022/04/24 01:58
- Excel(エクセル) VBAのエラーが直せません 4 2023/06/12 22:10
- Excel(エクセル) なぜExit Subがあるのかわかりません 4 2023/02/19 12:34
- Visual Basic(VBA) VBA処理追加 こちらでご教示頂いたのですが回答完了させてしまいましたのでこちらからまた質問させてく 2 2022/10/27 09:57
- Excel(エクセル) VBAで組み合わせ算出やCOUNTIFSの処理を高速化したいです。 4 2022/04/07 02:38
- Visual Basic(VBA) ExcelVBAでDo Until loopのネスト、IF文を使って一致する物と一致しない物としたい 11 2022/12/24 17:46
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) VBA初心者です。 2 2022/10/10 11:52
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
15%増しの計算方法
-
前年比の%の計算式を教えてく...
-
パーセントの計算
-
3分2の計算教えて下さい
-
エクセルで関数計算後の値を数...
-
ラジアン値を°′″(度・分・秒)...
-
何通りかの計算で 7C4 の答えが...
-
「出来型」と「出来形」の使い...
-
250gを8割と2割に分けると
-
3割アップとは、どうのように...
-
毎日10%ずつお金が増える時...
-
3分の2の計算の仕方
-
指数計算 2^n-1
-
割引や%引きの計算のやり方を教...
-
同じ時間なのに、60進と10...
-
6畳間は何立方メートル?
-
1人の人間の祖先をさかのぼっ...
-
8の4分の3乗は?
-
一定倍したある数を元に戻すには?
-
算数の比 0:1
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
15%増しの計算方法
-
前年比の%の計算式を教えてく...
-
パーセントの計算
-
3分2の計算教えて下さい
-
ラジアン値を°′″(度・分・秒)...
-
エクセルで関数計算後の値を数...
-
3割アップとは、どうのように...
-
何通りかの計算で 7C4 の答えが...
-
初歩的な計算式の問題です。
-
6畳間は何立方メートル?
-
数学がとにかくできません。知...
-
指数計算 2^n-1
-
計算式の答えまでの過程を教え...
-
一定倍したある数を元に戻すには?
-
250gを8割と2割に分けると
-
1÷無限=0ということは数(大き...
-
一日ずつ2倍の金額をもらい続...
-
算数で質問です よろしくお願い...
-
2の365乗
-
教えて下さい
おすすめ情報