|
ある列のセルの値を検索して、それが何行目以降にあるかをInteger型の変数に取得したいと思っています。
検索値はSheet2のB1セルに入っており日付型の値です。
検索したいデータがあるのはSheet1のD列で、日付の小さいもの順にソートされています。
検索値が何行目から開始しているのかを知りたいのです。
D列には何行目までデータがあるかわかりません。(その時々によって変化するデータです。)
Findを使用してみようと思ったのですが、それでは何行目にあるかだけを取得する事ができませんでした。
その行数を変数に取得し、別の処理でそれを活かしたいのです。
どうすればできるのでしょうか?
例えばB1に「2006/07/28」というデータがあり、D列の55行目以降が「2006/07/28」以降のデータである場合、aに55という値を取得したいです。
下記はFindを使い変数aにアドレスを取得したものですが、参考までに載せてみました。
Dim a As String
Dim myRng As Range
Set myRng = .Cells.Find(what:=Worksheets("Sheet2").Range("B1").Value, _
LookIn:=xlValues, lookat:=xlWhole)
If Not myRng Is Nothing Then
a = myRng.Address
end if
よろしくお願い致します。
|
|