ページ

2016年6月28日火曜日

列を指定しその中からFindで検索するVBA

Excel2013のVBAで、列を指定しその中からFindで検索します。

列を指定するには、Range("B:B")のようにします。

B列の中からC2セルのデータをFindで検索し、見つかった行番号を表示するコードです。

Private Sub MyFindData()

    MsgBox Range("B:B").Find(Range("C2")).Row

End Sub


実行結果です。
検索し見つかった行番号が表示されました。
検索し見つかった行番号が表示された

Range("B").Find(Range("C2")).Rowのように、Range("B").とした場合は「アプリケーション定義またはオブジェクト定義のエラーです」と表示されエラーになります。
アプリケーション定義またはオブジェクト定義のエラーです

関連する記事
関連する記事
完全一致の文字列検索方法
複数のシートからまとめて検索する
ワイルドカードで使う「*」「?」が検索できない
最大行数と最大列数
列番号の数字とABCの切り替え方法