この記事では、MicrosoftExcelのVBAを使用して条件なしでレコードを抽出する方法を学習します。

例を見て、フィルターを配置して基準を選択し、必要なアクションを実行する方法を理解しましょう。-範囲A：G列にデータがあり、列Aには名前、列bには住所、列Cには都市が含まれています。 、列Dの地域、列Eの国、列Fの電話番号、列Gには基準が含まれています。

image 1

マクロを記述してフィルターを配置し、G列の[データを含まない]に従ってデータをフィルター処理してから、[含まないデータ]を削除します。次に、フィルターを削除して、すべてのデータを表示します。

Not基準でレコードを抽出するには、以下の手順に従います。

VBAページを開くキーAlt + F11を押しますモジュールを挿入し、もう一度メニューを挿入して手順をクリックします。マクロの開始方法がわからない場合は、手順が表示されます。以下のコードを記述します。

Sub Delete_NotEligible()

ActiveSheet.Range("$A$1:$G$15").AutoFilter Field:=7, Criteria1:="<>"

Rows("2:12").Select

Selection.Delete Shift:=xlUp

Range("B1").Select

Selection.AutoFilter

End Sub

  • コードを実行するには、キーボードのキーF5を押します。

  • データはフィルタリングされ、設定された基準に従ってフィルタリングされたデータは削除されます。

image 2

コードの説明：

データのヘッダー範囲を定義して、適格性列に非空白セルの基準を使用してフィルターを配置します。コードで定義して行を選択し、行全体を削除します。*最後にフィルターを開きます。このようにして、特定の基準に基づいてフィルターを配置し、データを削除できます。

image 48

私たちのブログが気に入ったら、Facebookで友達と共有してください。また、TwitterやFacebookでフォローすることもできます。

_私たちはあなたからの連絡をお待ちしております。私たちの仕事を改善、補完、または革新し、あなたのためにそれをより良くする方法を教えてください。 [email protected]_までご連絡ください