Colecția Excel VBA Areas
Acest exemplu ilustrează Colectarea zonelor în Excel VBA. Mai jos am limitat Range ("B2: C3, C5: E5"). Această gamă are două domenii. Vinetele separă cele două zone.
Plasați un buton de comandă pe foaia dvs. de lucru și adăugați următoarele linii de cod:
1. În primul rând, declarăm două obiecte Range. Noi numim gama RangeToUse și singleArea.
2. Inițializăm Range range objectToUse with Range ("B2: C3, C5: E5")
3. Pentru a număra numărul de zone ale RangeToUse, adăugați următoarea linie de cod:
Rezultat:
4. Puteți să vă referiți la diferitele zone ale RangeToUse utilizând valorile indexului. Următoarea linie de coduri numără numărul de celule din prima zonă.
Rezultat:
5. De asemenea, puteți trece prin fiecare zonă a RangeToUse și puteți număra numărul de celule din fiecare zonă. Macroul de mai jos face truc.
MsgBox singleArea.Count
Next singleArea
Rezultat:
Pentru un exemplu practic de colectare a zonelor, consultați exemplul nostru Comparați intervalele.