V našom návode na používanie dátových typov VBA - premenné a konštanty sme si už prešli, čo sú to premenné a konštanty. Teraz sa pozrieme na objekt rozsahu vo VBA a na to, ako premennú deklarovať ako objekt rozsahu. Objekt rozsahu sa používa na označenie buniek alebo viacerých buniek vo VBA. Je preto veľmi užitočné použiť vo vašom kóde.
Kliknutím sem získate ďalšie informácie o rozsahoch a bunkách VBA.
Objekt rozsahu VBA
Objekt rozsah môžete použiť na odkazovanie na jednu bunku. Ak by ste napríklad chceli vo svojom kóde VBA odkazovať na bunku A1, potom by ste mohli použiť objekt rozsahu VBA, ako je znázornené v nasledujúcom kóde:
| 1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Rozsah („A1“). Hodnota = 89Rozsah ("A1"). Font.Bold = TrueKoniec pod |
Keď na klávesnici stlačíte kláves Run alebo F5, na spustenie kódu sa v aktuálnom pracovnom hárku zobrazí nasledujúci výsledok:
Objekt rozsah môžete použiť na odkazovanie na viacero buniek alebo rozsahov. Ak by ste napríklad chceli vo svojom kóde VBA odkazovať na rozsah buniek (A1: C1), mohli by ste použiť objekt rozsahu VBA, ako je znázornené v nasledujúcom kóde:
| 123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Rozsah („A1: C1“). Hodnota = „ABC“Rozsah ("A1: C1"). Okraje (xlEdgeBottom). LineStyle = xlDoubleKoniec pod |
Keď na klávesnici stlačíte tlačidlo Spustiť alebo F5, na spustenie kódu sa v aktuálnom pracovnom hárku zobrazí nasledujúci výsledok:
Deklarovanie premennej ako rozsahu
Pri deklarovaní premennej ako rozsahu budete musieť použiť kľúčové slová Dim a Set. Nasledujúci kód ukazuje, ako deklarovať premennú ako rozsah.
| 123456789101112 | Sub DeclaringAndSettingARange ()Dim rng As RangeNastaviť rng = rozsah ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Pravdarng. Vyberterng.Columns.AutoFitKoniec pod |
Výsledkom je:
Výber konkrétnych riadkov v objekte rozsahu
V rámci svojho objektu rozsahu môžete vybrať konkrétne riadky. Nasledujúci kód vám ukáže, ako to urobiť:
| 12345678 | PodvýberSpecificRowsInTheRangeObject ()Dim rng As RangeNastaviť rng = rozsah ("A1: C3")rng. Riadky (3). VyberteKoniec pod |
Výsledkom je:
Výber konkrétnych stĺpcov v objekte rozsahu
V rámci svojho objektu rozsahu môžete vybrať konkrétne stĺpce. Nasledujúci kód vám ukáže, ako to urobiť:
| 12345678 | PodvýberSpecificColumnsInTheRangeObject ()Dim rng As RangeNastaviť rng = rozsah ("A1: C3")rng. Stĺpce (3). VyberteKoniec pod |
