特定の列の値を持つ最後のセルを探します。

Question

これは多くの時間を要請されていますが、このようなことは一度も見たことがありません。

col2の値を持つ最後のセルを見つけるにはどうすればよいですか？

私はこれを後で使用して、row1から最後の行までのデータを繰り返し処理します。これを行うために

 col1 col2 col3 
Row1 data data data 
Row2 data data data 
row3 data data data 
row4 data   data 
row5 data   data 

私は範囲を指定するので、必要なのです：

私はcol2に

nInLastRow = oSheet.Cells.Find("*",System.Reflection.Missing.Value, 
System.Reflection.Missing.Value, System.Reflection.Missing.Value, 
Excel.XlSearchOrder.xlByRows,Excel.XlSearchDirection.xlPrevious,  
false,System.Reflection.Missing.Value,System.Reflection.Missing.Value).Row; 

私の例を検索のみにこれを変更したいですか？しかし、再び私は範囲の大きさを知らない。 Iveは中古レンジで試しました。しかし、他のcol1（col1 & col3）はより多くのデータを持っているため、適切ではありません。 乾杯！

Answer 1

データ値の間に空白セルがあるか、最初の空白セルは常に最後のセルの後ろに値を持ちますか？後者の場合、あなたは（これは、キーボード上のEnd + Down Arrowを押すのと同じです

をここでVBA

For Each rng In oSheet.Range("A1:D1") 
    Set rngLastValue = rng.End(xlDown) 
    Debug.Print "The last cell with a value in column " & rng.Column & " is " & rngLastValue.Address 
Next rng