エクセル研究室−Excelの基本的な使い方、応用技を紹介

セル位置・範囲操作編-エクセルのVBA集


セル位置・範囲操作編

特定の列の最終行を選択するには?

'A列の最終行を選択する例です。
Sub A列の最終行()
 Range("A65536").End(xlUp).Select
End Sub



使用済みのセル範囲を選択するには?

'使用済みセル範囲を選択する例です。
Sub 使用済みのセル範囲()
 ActiveSheet.UsedRange.Select
End Sub



指定範囲内の可視セル範囲を選択するには?

'A1:A10の範囲内の可視セル範囲を選択する例です。
Sub 範囲内の可視セル範囲()
 Range("A1:A10").SpecialCells(xlCellTypeVisible).Select
End Sub



指定範囲内の定数だけを消すには?

'A1:A10の範囲内の定数(数式ではないの値)を消す例です。
Sub 範囲内の定数だけを消す()
 Range("A1:A10").SpecialCells(xlCellTypeConstants).ClearContents
End Sub



指定範囲内の定数の隣のセル範囲を選択するには?

'A1:A10の範囲内の定数(数式ではないの値)の隣の列を選択する例です。
Sub 範囲内の定数の隣の列()
 Range("A1:A10").SpecialCells(xlCellTypeConstants).Offset(, 1).Select
End Sub



アクティブセルのある行を選択するには?

'アクティブセルのある行を選択する例です。
Sub アクティブセルのある行()
 ActiveCell.EntireRow.Select
End Sub



アクティブセルのある行の先頭のセルを選択するには?

'アクティブセルのある行の先頭のセルを選択する例です。
Sub アクティブセルのある行のA列()
 ActiveCell.EntireRow.Resize(, 1).Select
End Sub





ページトップ