Jeśli chcesz automatycznie wypełnić określony zakres kolorów za pomocą pętli for VBA. W tym artykule dowiesz się, jak pętla for w VBA spełnia określony warunek.
Pomysł polega na tym, że jeśli zakres A1: A20 zawiera tekst lub liczbę, to pętla Excel for automatycznie wypełni puste komórki.
Poniżej znajduje się migawka danych w kolumnie A:
Aby automatycznie wypełnić kolor pustymi komórkami, musimy wykonać następujące kroki:
- Kliknij kartę Deweloper
- Z grupy Kod wybierz Visual Basic
- Wprowadź następujący kod w module arkusza roboczego
Sub VBAForLoop()
Dla x = 1 do 20
Komórki (x, 1).Wybierz
Jeśli Selection.Value = "" Wtedy
Z zaznaczeniem. Wnętrze
.Kolor = 65535
Kończyć z
Zakończ, jeśli
Następny x
Napis końcowy
- Po skopiowaniu kodu należy uruchomić makro za pomocą ALT + F8 i wybierz makro.
W ten sposób możemy użyć VBA do automatycznego wypełnienia kolorem za pomocą pętli for.
Pobierz-Jak automatycznie wypełnić kolor za pomocą vba for loop