Vi har allerede gået over, hvad variabler og konstanter er, i vores VBA -datatyper - Variabler og konstanter. Vi skal nu se på rækkeviddeobjektet i VBA, og hvordan vi erklærer en variabel som et områdeobjekt. Områdeobjektet bruges til at betegne celler eller flere celler i VBA. Så det er meget nyttigt at bruge i din kode.
Klik her for mere information om VBA -intervaller og -celler.
VBA Range Object
Du kan bruge områdeobjektet til at referere til en enkelt celle. For eksempel, hvis du ville henvise til celle A1 i din VBA -kode, kunne du bruge VBA -områdeobjektet som vist i koden herunder:
1234 | Sub HenviserToASingleCellUsingTheRangeObject ()Område ("A1"). Værdi = 89Område ("A1"). Font.Bold = TrueAfslut Sub |
Når du trykker på run eller F5 på dit tastatur, for at køre din kode, får du følgende resultat i dit faktiske regneark:
Du kan bruge områdeobjektet til at referere til flere celler eller områder. Hvis du f.eks. Vil henvise til celleområde (A1: C1) i din VBA -kode, kan du bruge VBA -områdeobjektet som vist i koden herunder:
123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Område ("A1: C1"). Værdi = "ABC"Område ("A1: C1"). Grænser (xlEdgeBottom) .LineStyle = xlDoubleAfslut Sub |
Når du trykker på run eller F5 på dit tastatur, for at køre din kode, får du følgende resultat i dit faktiske regneark:
Erklæring af en variabel som et område
Du bliver nødt til at bruge Dim og Set -søgeordene, når du erklærer en variabel som et område. Koden herunder viser dig, hvordan du erklærer en variabel som et område.
123456789101112 | Sub DeclaringAndSettingARange ()Dim rng Som områdeIndstil rng = Range ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Sandtrng.Selectrng.Columns.AutoFitAfslut Sub |
Resultatet er:
Valg af specifikke rækker i dit områdeobjekt
Du kan vælge bestemte rækker i dit områdeobjekt. Koden herunder viser dig, hvordan du gør dette:
12345678 | Sub SelectingSpecificRowsInTheRangeObject ()Dim rng Som områdeIndstil rng = Range ("A1: C3")rng.Rows (3) .VælgAfslut Sub |
Resultatet er:
Valg af specifikke kolonner i dit områdeobjekt
Du kan vælge bestemte kolonner i dit områdeobjekt. Koden herunder viser dig, hvordan du gør dette:
12345678 | Sub SelectingSpecificColumnsInTheRangeObject ()Dim rng Som områdeIndstil rng = Range ("A1: C3")rng.Kolonner (3) .VælgAfslut Sub |