excel - 列の最後の定数を検索し、それに基づいてデータを強調表示します

Question

VBA を使用して、Excel バージョン 2003、2007、2010 で次のことを行う方法を見つけようとしています (うまくいけば、それらすべてで同じです): 列 A の最後のセルを定数値で検索します。上記の検索で、A2:I2 から最後の定数データ値を含む行までのすべてのデータを選択します。

たとえば、列 A の定数データを含む最後の行が A13 の場合、A2:I2 から A13:I13 を選択します。

Answer 1

編集

'lastRow' は、上に空白がある場合でも、列 A で最後に使用されたセルを検索します。これは、コメントが示唆したように、方程式が他の列にあることを前提としています。

Sub SelectRange()
  lastRow = Cells(Rows.Count, "A").End(xlUp).Row

  Range("A2:I" & lastRow).Select
End Sub

異なるバージョンの Excel で最後のセルを見つける方法については、この投稿を参照してください。

---

次のように HasFormula メソッドを使用できる数式と定数について、列 A のセルを評価する必要があったとします。

Sub SelectRange()
  lastRow = Cells(Rows.Count, "A").End(xlUp).Row

  Do While Range("A" & lastRow).HasFormula <> False
    lastRow = Cells(lastRow - 1, "A").End(xlUp).Row
  Loop

  Range("A2:I" & lastRow).Select
End Sub