Excelでヘッダー値に基づいて列全体を削除するにはどうすればよいですか？

多くの場合、Excelでヘッダー値に基づいて列全体を削除する必要があります。例えば、ヘッダーに「old」という値が含まれるすべての列を削除する必要があるとします。このチュートリアルでは、ヘッダー値に基づいて列全体を削除する方法を詳しく説明します。

VBAコードを使用してヘッダー値に基づいて列全体を削除する
Kutools for Excelを使用してヘッダー値に基づいて列全体を削除する

VBAコードを使用してヘッダー値に基づいて列全体を削除できます。以下の手順に従ってください。

1. Alt + F11キーを同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. Microsoft Visual Basic for Applicationsウィンドウで、挿入 > モジュールをクリックします。そして、以下のコードをモジュールウィンドウにコピーして貼り付けます。

VBAコード: ヘッダー値に基づいて列全体を削除する

Sub DeleteSpecifcColumn()
	Set MR = Range("A1:D1")
	For Each cell In MR
		If cell.Value = "old" Then cell.EntireColumn.Delete
	Next
End Sub

注意:

3. F5キーを押してコードを実行すると、指定されたテキストに等しいヘッダーを持つ列全体がすぐに削除されます。

Kutools for Excelの特定のセルを選択する機能を使用すると、まず特定のヘッダー値を含むすべての列を簡単に選択し、その後これらの選択した列を一度に削除できます。以下の手順に従ってください。

1. 削除したい列を含む範囲を選択し、次に Kutools > 選択 > 特定のセルを選択 をクリックします。スクリーンショットをご覧ください：

2. 特定のセルを選択ダイアログボックスで、選択タイプセクションで 列全体オプションを選択し、 特定タイプドロップダウンリストで等しいオプションを選択し、次のボックスにヘッダー値を入力します。最後にOKボタンをクリックします。スクリーンショットをご覧ください：

3. 別のポップアップダイアログボックスでOKボタンをクリックすると、指定されたヘッダー値を含む列がすぐに選択されます。

4. 選択した列の列ヘッダーを右クリックし、右クリックメニューから削除をクリックします。これで、すべての選択した列が一度に削除されます。