Als u het kleurspecifieke bereik automatisch wilt vullen met for loop VBA. In dit artikel leer je for loop in VBA die aan een bepaalde voorwaarde voldoet.
Het idee is dat als bereik A1: A20 iets tekst of nummer bevat, Excel voor lus automatisch de lege cellen vult.
Hieronder volgt de momentopname van gegevens in kolom A:
Om de kleur automatisch in lege cellen te vullen, moeten we de onderstaande stappen volgen:
- Klik op het tabblad Ontwikkelaar
- Selecteer in de codegroep Visual Basic
- Voer de volgende code in de werkbladmodule in:
Sub VBAForLoop()
Voor x = 1 tot 20
Cellen(x, 1).Selecteer
If Selection.Value = "" Dan
Met Selectie.Interieur
.Kleur = 65535
Eindigt met
Stop als
Volgende x
Einde sub
- Na het kopiëren van de code moet je de macro uitvoeren met ALT + F8 & selecteer de macro.
Op deze manier kunnen we VBA gebruiken om de kleur automatisch te vullen met for-lus.
Download-Hoe kleur automatisch te vullen met vba for loop