VBA セルの操作可視セルのコピペ

可視セルの選択

構文

Object.SpecialCells(xlCellTypeVisible).Select

VBAを使わない場合

通常ある範囲なか可視セルは選択は、Ctrl+Gで「ジャンプ」→「セル選択」経由で、「選択オプション」→「可視セル」を選び、「OK」を押す。

Sub test１()

’ A1を含めた可視セルのみ選択する
　Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Select

End Sub

可視セルのコピペ

Sub test2()

    Dim myRange As Range
   ’ A2を含めた可視セル範囲を変数myRangeに代入
    Set myRange = Range("A2").CurrentRegion.SpecialCells(xlCellTypeVisible)

’ myRangeをA10へ貼り付け
myRange.Copy Range("A10")

End Sub

実行結果

フィルターと組み合わせた可視セルへの操作は、実務上はよく使われています。ぜひマスターしましょう。

VBA セルの操作 可視セルのコピペ