連番処理などでシート内のセルに順番に行をダイナミックに追加していった場合に、最後のからのセルを調べて値が入っている行数(件数)を取得の解決方法である。◆記述例Sheets(シート1).Selecty = 0Doy = y + 1Loop Until Range(A & y).Value = ==============…