
(指定列の値の入った最終行を知る方法について)
B列の最終行(値の入っている最終行)を求める方法で
=MAX(INDEX((LEN($B$1:$B$9999)>0)*ROW($B$1:$B$9999),0))というのを知り、
マクロの記録で
ActiveCell.FormulaR1C1 = _
"=MAX(INDEX((LEN(R1C2:R9999C2)>0)*ROW(R1C2:R9999C2),0))"
となりました。
これをセルに式を代入せずに(ActiveCell.FormulaR1C1 =を使わないで)
マクロ記述するとすれば、どうすればいいのか教えてください
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
No.2です。
数式が入っていて空白でない最終行を取得したい!というコトですね。
Sub Sample1()
Dim i As Long
For i = Cells(Rows.Count, "B").End(xlUp).Row To 1 Step -1
If Cells(i, "B") <> "" Then Exit For
Next i
ActiveCell = i
End Sub
こんな感じではどうでしょうか?m(_ _)m
No.2
- 回答日時:
こんにちは!
>セルに式を代入せずに(ActiveCell.FormulaR1C1 =を使わないで)
というコトは
単にB列の最終行の行番号を表示するだけで良いのですね。
そうであれば・・・
ActiveCell = Cells(Rows.Count, "B").End(xlUp).Row
くらいで大丈夫だと思います。m(_ _)m
こんなに早く教えて頂けてありがとうございます。
実はB列には式が入っており(if 文で、別シートのセル値により、ヌル→”” or ある値 を表示させています)
(例 =if (sheet1!a1="" , "" , "入力済み"など) )
教えて頂いた式を試してみたら、式をコピーした最終行が表示されました。
私としては、セルの値としてnullでないものが表示されている最終行が求まるとありがたいのです。
もしよろしければ、アドバイスお願いします。
No.1
- 回答日時:
ActiveCell.Value = Cells(Rows.Count,"B").End(xlup).Row
でしょうか?
こんなに早く教えて頂けてありがとうございます。
実はB列には式が入っており(if 文で、別シートのセル値により、ヌル→”” or ある値 を表示させています)
(例 =if (sheet1!a1="" , "" , "入力済み"など) )
教えて頂いた式を試してみたら、式をコピーした最終行が表示されました。
私としては、セルの値としてnullでないものが表示されている最終行が求まるとありがたいのです。
もしよろしければ、アドバイスお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【ExcelVBA】5万行以上のデー...
-
VBAでCOPYを繰り返すと、処理が...
-
【マクロ】並び替えの範囲が、...
-
vbsでのwebフォームへの入力制限?
-
VBAの「To」という語句について
-
算術演算子「¥」の意味について
-
【ExcelVBA】値を変更しながら...
-
【マクロ】開いているブックの...
-
Vba セルの4辺について罫線が有...
-
【マクロ】シートの変数へ入れ...
-
エクセルのマクロについて教え...
-
エクセルのVBAコードと数式につ...
-
ワードの図形にマクロを登録で...
-
Vba FileSystemObject オブジェ...
-
ダブルクリックで貼り付けた画...
-
エクセルVBA 段落番号自動取得方法
-
エクセルのマクロについて教え...
-
VBAでユーザーフォームを指定回...
-
Excel VBA 選択範囲の罫線色の...
-
vbaにてseleniumを使用したedge...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Vba Array関数について教えてく...
-
VBAでCOPYを繰り返すと、処理が...
-
【ExcelVBA】5万行以上のデー...
-
【マクロ】シートの変数へ入れ...
-
vbsでのwebフォームへの入力制限?
-
エクセルのマクロについて教え...
-
【マクロ】並び替えの範囲が、...
-
Vba セルの4辺について罫線が有...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
VBAでユーザーフォームを指定回...
-
【マクロ】開いているブックの...
-
エクセルの改行について
-
vb.net(vs2022)のtextboxのデザ...
-
エクセルのVBAコードと数式につ...
-
算術演算子「¥」の意味について
-
Excelのマクロについて教えてく...
-
改行文字「vbCrLf」とは
-
ワードの図形にマクロを登録で...
-
VBAの「To」という語句について
-
【マクロ】変数を使った、文字...
おすすめ情報
実はB列には式が入っており(if 文で、別シートのセル値により、ヌル→”” or ある値 を表示させています)
(例) B100=if (sheet1!a100="" , "" , "入力済み" )など
私としては、関数や値が入った最終行でなく、表示する値がnullでないものの最終行を知りたいと思っています。
ActiveCell.FormulaR1C1 = _
"=MAX(INDEX((LEN(R1C2:R9999C2)>0)*ROW(R1C2:R9999C2),0))" を
セルに式を代入しないで、マクロの中の計算だけでこの値を求めることはできないのだろうかと
いろいろやってみましたがうまくいきませんでした。
もしよろしければ、アドバイスお願いします。