Već smo prešli preko toga što su varijable i konstante u našem VBA tipu podataka - Varijable i konstante. Sada ćemo pogledati objekt raspona u VBA -i i kako proglasiti varijablu kao objekt raspona. Objekt raspona koristi se za označavanje stanica ili više ćelija u VBA. Dakle, vrlo je korisno koristiti ga u kodu.
Kliknite ovdje za više informacija o VBA rasponima i ćelijama.
Objekt VBA raspona
Objekt raspona možete upotrijebiti za upućivanje na jednu ćeliju. Na primjer, ako se želite uputiti na ćeliju A1 u svom VBA kodu, mogli biste koristiti objekt raspona VBA kako je prikazano u donjem kodu:
1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Raspon ("A1"). Vrijednost = 89Raspon ("A1"). Font.Bold = TačnoKraj podm |
Kada pritisnete run ili F5 na tipkovnici, za pokretanje koda dobivate sljedeći rezultat na svom stvarnom radnom listu:
Objekt raspona možete koristiti za upućivanje na više ćelija ili raspona. Na primjer, ako se želite uputiti na raspon ćelija (A1: C1) u svom VBA kodu, tada biste mogli koristiti objekt raspona VBA kako je prikazano u donjem kodu:
123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Raspon ("A1: C1"). Vrijednost = "ABC"Raspon ("A1: C1"). Granice (xlEdgeBottom) .LineStyle = xlDvostrukoKraj podm |
Kada pritisnete run ili F5 na tipkovnici, za pokretanje koda dobivate sljedeći rezultat na svom stvarnom radnom listu:
Deklariranje varijable kao raspona
Prilikom deklariranja varijable kao raspona morat ćete koristiti ključne riječi Dim i Set. Donji kôd pokazuje kako proglasiti varijablu kao raspon.
123456789101112 | Sub DeclaringAndSettingARange ()Dim rng As RangePostavite rng = raspon ("A10: B10")rng.Value = "Automatiziraj Excel"rng.Font.Bold = Istinarng.Odaberirng.Kolone.AutoFitKraj podm |
Rezultat je:
Odabir određenih redaka u vašem objektu raspona
Možete odabrati određene retke unutar svog objekta raspona. Kôd u nastavku pokazuje kako to učiniti:
12345678 | Pod OdabirSpecificRowsInTheRangeObject ()Dim rng As RangePostavi rng = raspon ("A1: C3")rng.Redovi (3) .OdaberiKraj podm |
Rezultat je:
Odabir određenih stupaca u vašem objektu raspona
Možete odabrati određene stupce unutar svog objekta raspona. Kôd u nastavku pokazuje kako to učiniti:
12345678 | Pod OdabirSpecificColumnsInTheRangeObject ()Dim rng As RangePostavi rng = raspon ("A1: C3")rng. Stupci (3) .OdaberiKraj podm |