Sub te1()
Dim i As Long
Dim j As Long
Dim las As Long
las = Cells(Rows.Count, 10).Row
For i = 3 To 4
For j = 4 To 6
Cells(i, j).Value = Application.WorksheetFunction.SumIfs(Range("j2:j" & las), _
Range("h2:h9"), Cells(i, 3), _
Range("i2:i9"), Cells(2, j))
Next j
Next i
End Sub
SumIfs(Range("j2:j" & las)この部分を
SumIfs(Range("j2:j9")
とすると動作しますが自動取得できません。
間違っていないはずですが
No.1
- 回答日時:
よく見た訳ではありませんが「las = Cells(Rows.Count, 10).Row」は「las = Rows.Count」になってしまいます。
(常に、Excel2003 以前ならば 65,536 、Excel2007 以降ならば 1,048,576 になります)もしかしたら「las = Cells(Rows.Count, 10).End(xlUp).Row」の間違えでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Worksheets メソッドは失敗しま...
-
B列の最終行までA列をオート...
-
Excelで、あるセルの値に応じて...
-
Changeイベントでの複数セルの...
-
IIF関数の使い方
-
A列B列どちらにもあるのを抽...
-
Cellsのかっこの中はどっちが行...
-
vba 2つの条件が一致したら...
-
【Excel VBA】 B列に特定の文字...
-
セルに値が入っていた時の処理
-
SpecialCells(xlCellTypeConsta...
-
VBAの初心者なのですが、「並び...
-
vba 値が一致したらデータシ...
-
エクセルVBA シートモジュール...
-
ERROR 型が一致しませんと...
-
期限を超えた日付に警告のメッ...
-
文字列の結合を空白行まで実行
-
マクロ 最終列をコピーして最終...
-
vbaでシートより100より大きい...
-
データグリッドビューの一番最...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
B列の最終行までA列をオート...
-
Worksheets メソッドは失敗しま...
-
Excelで、あるセルの値に応じて...
-
vba 2つの条件が一致したら...
-
Cellsのかっこの中はどっちが行...
-
URLのリンク切れをマクロを使っ...
-
文字列の結合を空白行まで実行
-
データグリッドビューの一番最...
-
【VBA】2つのシートの値を比較...
-
VBA 何かしら文字が入っていたら
-
IIF関数の使い方
-
VBAを使って検索したセルをコピ...
-
Changeイベントでの複数セルの...
-
VBAの構文 3列置きにコピーし...
-
VBAのFind関数で結合セルを検索...
-
【Excel VBA】 B列に特定の文字...
-
VBAで指定範囲内の空白セルを左...
-
VBAでのリスト不一致抽出について
-
セルに値が入っていた時の処理
-
VBAコンボボックスで選択した値...
おすすめ情報
プロシージャの外では無効です
えらーになります。