先頭セルをかくのう」といった検索キーワードで、このサイト『インストラクターのネタ帳』へのアクセスが時折あります。いずれかのセル範囲の、最初のセル・先頭のセル・1番左上のセルを取得するには、どのようなコードを書けばいいのか、探していた方による検索でしょう。[スポンサードリンク]Itemの引数を1つだけ指定して先頭セルを取得するサンプルマクロRangeオブジェクトに用意されているItemプロパティの、第1引数に「1」を指定すれば、セル範囲の先頭セルを取得できます。Range("A1:C2").Item(1)rng.Selectメッセージボックスに先頭セルのアドレス「A1」が表示されます。Selection.Item(1)としてください。CurrentRegionの先頭セルを取得するItemの引数を2つ指定して先頭セルを取得する単純に先頭セルを取得するだけなら、上記のとおりRange.Itemプロパティの1つの引数に「1」を指定すれば済みますが、以下のような指定もできます。SubRangeオブジェクトのItemプロパティは引数を2つ指定することもでき、この場合は何行目かを第1引数に、何列目かを第2引数に指定します。1)とすれば選択されているセル範囲の、先頭セルを取得できます。Range.Itemプロパティを確認するRangeオブジェクトのItemプロパティをご存知ない方は、以下のSubプロシージャを実行して、コレクションとしてのRangeオブジェクトから、Itemプロパティを使って単独のRangeオブジェクトを取得できることを意識しておきましょう。オブジェクト式解説編』を開催します。VBAで、先頭行を取得するRange.Rows(1)・Range.EntireRowというコードをご紹介しています。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。