In veel gevallen moet u mogelijk de volledige kolommen verwijderen op basis van de koptekstwaarde in Excel. U moet bijvoorbeeld alle kolommen verwijderen die de waarde "oud" in de koptekst bevatten. In deze zelfstudie laten we u methoden zien om volledige kolommen te verwijderen op basis van de koptekstwaarde in details.
Verwijder volledige kolommen op basis van de koptekstwaarde met VBA-code
Verwijder volledige kolommen op basis van de koptekstwaarde met Kutools voor Excel
U kunt volledige kolommen verwijderen op basis van de koptekstwaarde met VBA-code. Ga als volgt te werk.
1. druk op anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic-toepassing venster.
2. In de Microsoft Visual Basic-toepassing venster klikt Invoegen > Module. En kopieer en plak vervolgens onderstaande code in het modulevenster.
VBA-code: verwijder volledige kolommen op basis van de koptekstwaarde
Sub DeleteSpecifcColumn()
Set MR = Range("A1:D1")
For Each cell In MR
If cell.Value = "old" Then cell.EntireColumn.Delete
Next
End SubOpmerking:: in de code, "oud”Is de koptekstwaarde waarop u de hele kolom wilt verwijderen op basis van. Wijzig uw koptekstwaarde handmatig. En A1: D1 is het kolombereik dat u wilt gebruiken.
3. druk de F5 sleutel om de code uit te voeren, wordt de volledige kolom die de opgegeven headerwaarde bevat onmiddellijk verwijderd.
met Kutools for Excel's Selecteer specifieke cellen hulpprogramma, kunt u eenvoudig alle kolommen selecteren die eerst de bepaalde koptekstwaarde bevatten en deze geselecteerde kolommen vervolgens in één keer verwijderen. Ga als volgt te werk.
Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.
1. Selecteer het bereik met de kolommen die u wilt verwijderen en klik op Kutools > kies > Selecteer specifieke cellen. Zie screenshot:
2. In de Selecteer specifieke cellen dialoogvenster, selecteert u het Volledige kolom optie in het Selectie type sectie en in het Specifiek type vervolgkeuzelijst, selecteer Is gelijk aan optie en typ vervolgens de koptekstwaarde in het volgende vak. En klik ten slotte op het OK knop. Zie screenshot:
3. Klik op het OK knop in een ander pop-upvenster, dan worden de kolommen die de gespecificeerde header-waarde bevatten onmiddellijk geselecteerd.
4. Klik met de rechtermuisknop op de kolomkop van de geselecteerde kolom en klik vervolgens op Delete vanuit het rechtsklikmenu. Vervolgens worden alle geselecteerde kolommen in één keer verwijderd.
Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.
