Ja vēlaties automātiski aizpildīt krāsu diapazonu, izmantojot cilpu VBA. Šajā rakstā jūs uzzināsit, kā VBA cilpa atbilst noteiktiem nosacījumiem.
Ideja ir tāda, ja diapazonā A1: A20 ir kaut kas teksts vai skaitlis, tad Excel cilpai automātiski aizpildīs tukšās šūnas.
Tālāk ir sniegts datu slejas A slejā:
Lai automātiski aizpildītu krāsu tukšās šūnās, mums jāveic šādas darbības:
- Noklikšķiniet uz cilnes Izstrādātājs
- Kodu grupā atlasiet Visual Basic
- Darblapas modulī ievadiet šādu kodu
Sub VBAForLoop ()
X = 1 līdz 20
Šūnas (x, 1). Atlasiet
Ja Selection.Value = "" Tad
Ar atlasi. Interjers
.Krāsa = 65535
Beigt ar
Beigas Ja
Nākamais x
Beigt apakš
- Pēc koda nokopēšanas makro jāpalaiž, izmantojot ALT + F8 & atlasiet makro.
Tādā veidā mēs varam izmantot VBA, lai automātiski aizpildītu krāsu, izmantojot cilpu.
Lejupielādēt-kā automātiski aizpildīt krāsu ar vba cilpai