Zemāk mēs apskatīsim programmu Excel VBA ka cilpas cauri visai pirmajai kolonnai un iekrāso visas vērtības, kas ir zemākas par noteiktu vērtību.
Novietojiet a komandu pogu darblapā un pievienojiet šādas koda rindiņas:
1. Vispirms deklarējiet mainīgo ar nosaukumu i tipa Long. Šeit mēs izmantojam Long tipa mainīgo, jo gariem mainīgajiem ir lielāka ietilpība nekā veseliem skaitļiem.
NaviKā Ilgi
2. Pēc tam pievienojiet koda rindiņu, kas maina visu A slejas šūnu fontu krāsu uz melnu.
Kolonnas (1). Fonts. Krāsa = vbMelna3. Pievienojiet cilpu.
Excel pievienošanas formula vairākām šūnāmPriekši = 1UzRindas. Skaits
Nākamaisi
Piezīme: darblapās programmā Excel 2007 vai jaunākā versijā var būt līdz 1 048 576 rindām. Neatkarīgi no tā, kādu versiju izmantojat, koda līnija virs visām rindām ir redzama.
4. Tālāk mēs krāsojam visas vērtības, kas ir zemākas par šūnā D2 ievadīto vērtību. Tukšas šūnas tiek ignorētas. Pievienojiet cilpai šādas koda rindiņas.
JaŠūnas (i, 1). VērtībaŠūnas (i, 1). Fonts. Krāsa = vbSarkana
Beigas Ja
Rezultāts, noklikšķinot uz komandas pogas lapā (tas var aizņemt kādu laiku):
Doties uz nākamo nodaļu: Makro kļūdas