No.1ベストアンサー
- 回答日時:
オートフィルタで非表示になっている行ではRowsのHiddenプロパティがTrueになっていることを利用して、
Dim 行 As Long
行 = 2
While ActiveSheet.Rows(行).Hidden
行 = 行 + 1
Wend
とすると、変数「行」に先頭の行番号が入ります。
ありがとうございました。
出来ました。
でも、よく考えたらオートフィルターで検索してE列の一番上に来るセルの行番号ならMatchでも求められましたね。教えていただいた方法もとても勉強になりました。ありがとういございます。
Sub FirstRow()
検索値 = "XX"
MsgBox Application.Match(検索値, Columns("E"), 0)
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 追記する列を増やしたい 2つのデータを検索・照合して元データにないデータを下記マクロで商品名を追記し 9 2022/10/05 10:50
- Visual Basic(VBA) Excel VBA キーワードから列を取得して、さらに空欄行を非表示にする 3 2022/10/21 22:49
- Visual Basic(VBA) マクロで最終行を取得したい 4 2023/05/28 12:14
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
- Visual Basic(VBA) 最終列の右へSUM関数を作成するため下記コードを実行しましたが、最終列「10月28日」が上書きされて 3 2022/12/05 20:32
- Visual Basic(VBA) 別シートのデータを参照して値を入れたい。 まとめデータシートのC列D列の値を商品一覧シートのコードが 7 2022/08/17 13:20
- Visual Basic(VBA) 最終行の指定について教えてください。 複数シートを1シートへまとめる下記マクロでは各シートの6行目を 1 2022/10/04 18:37
- Visual Basic(VBA) vba 重複データ合算 5 2023/07/05 18:55
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 3 2022/06/12 11:17
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
Excelのフィルター後の一番上のセルをコピーする(マクロ教えて。) Excelで5行目にフィルター
Excel(エクセル)
-
EXCELのVBA-フィルタ抽出後のセル選択方法
Visual Basic(VBA)
-
エクセルVBAで5行目からオートフィルタモードに設定したいたい
Excel(エクセル)
-
-
4
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
5
Excelで可視セルの行番号取得
Visual Basic(VBA)
-
6
Offsetで可視セルだけを移動したい。
Excel(エクセル)
-
7
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
8
VBA オートフィルター状態から見えるセルの選択について
Excel(エクセル)
-
9
Excelでフィルターのかかっているときの最終行の取り方。
Excel(エクセル)
-
10
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
11
オートフィルターをかけ、#N/A以外で絞込みするVBA記述をご教示ください
Excel(エクセル)
-
12
エクセルでエラーが出て困っています。
Excel(エクセル)
-
13
VBAのオートフィルターで該当行がない場合に処理を止めたい
Excel(エクセル)
-
14
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
15
もしセルが#N/A"なら~をする・・・には?"
Excel(エクセル)
-
16
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
17
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
18
Excelのセルにユーザー名を表示する方法
Excel(エクセル)
-
19
【Excel VBA】CSV取込時、数字の先頭の0を消えないようにするには?
Excel(エクセル)
-
20
マクロの「SaveAs」でエラーが出るのを解消したいです(再)
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBAでオートフィルター...
-
エクセルデータベースについて
-
エクセル_データ処理_変化点検...
-
Excelでフィルターのかかってい...
-
Excel データ一覧から申込書に...
-
【エクセル】セルにどんなデー...
-
競馬新聞のエクセルデータ
-
エクセルで移動平均のデータを...
-
エクセルに格納した顧客リスト...
-
重複するデータの削除と抽出方法
-
エクセル 順番を入れ替えたい
-
『エクセルファイルを別のエク...
-
Excel VBA ユニークな値のリス...
-
エクセルでVルックアップして...
-
エクセルの散布図のX軸に文字...
-
グラフの横・縦項目が全部表示...
-
エクセルのグラフ作成で軸を等...
-
エクセルの対数グラフで細かい...
-
Excel ピボットテーブルで日付...
-
エクセルの棒グラフの上に数字...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBAでオートフィルター...
-
Excelでフィルターのかかってい...
-
エクセルにCSVを全件インポート...
-
エクセルデータベースについて
-
エクセルで他のファイルを参照...
-
Excel データ一覧から申込書に...
-
エクセルで移動平均のデータを...
-
文字列の重複を自動的に削除し...
-
Excelのトップテンオート...
-
オートフィルタのプルダウンメ...
-
【エクセル】セルにどんなデー...
-
エクセル_データ処理_変化点検...
-
エクセルによる複数サイトから...
-
エクセルの並び替えについて
-
エクセルクエリーの元データの...
-
エクセルに格納した顧客リスト...
-
エクセル(Ver2002)の設定につ...
-
エクセルの足し算(多くの数)
-
【エクセル関数】重複データを...
-
excelで日付順にする関数を教え...
おすすめ情報