「東雲忠太郎」の平凡な日常のできごと

2024.02.08

VBAでフィルタ後の表示範囲を選択する方法

カテゴリ： VBA

VBAを使用してフィルタ後の表示範囲を選択するには、SpecialCellsメソッドを使用してフィルタされた範囲を取得し、その範囲を選択します。以下はその手順を示すサンプルコードです。

vba

Copy code

Dim filteredRange As Range

' フィルタされた範囲を取得します。

On Error Resume Next

Set filteredRange = ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible)

On Error GoTo 0

' フィルタされた範囲が存在するか確認します。

If Not filteredRange Is Nothing Then

' フィルタされた範囲を選択します。

filteredRange.Select

Else

MsgBox "フィルタされたデータがありません。"

End If

End Sub

このコードは、現在のアクティブなシートにフィルタが適用されている場合、フィルタされた範囲を選択します。フィルタされた範囲が存在しない場合は、メッセージボックスが表示されます。

お気に入りの記事を「いいね！」で応援しよう

Last updated 2024.02.08 06:30:13

[VBA] カテゴリの最新記事

【毎日開催】

15記事にいいね！で1ポイント

10秒滞在

いいね! -- / --

おめでとうございます！
ミッションを達成しました。

※「ポイントを獲得する」ボタンを押すと広告が表示されます。

スマートフォン版を閲覧 | PC版を閲覧