Vi har allerede gått gjennom hva variabler og konstanter er i vår VBA -datatyper - variabler og konstanter. Vi skal nå se på avstandsobjektet i VBA og hvordan vi deklarerer en variabel som et områdeobjekt. Områdeobjektet brukes til å betegne celler eller flere celler i VBA. Så det er veldig nyttig å bruke i koden din.
Klikk her for mer informasjon om VBA -områder og -celler.
VBA Range Object
Du kan bruke rekkeviddeobjektet til å referere til en enkelt celle. For eksempel, hvis du ønsket å referere til celle A1 i VBA -koden din, kan du bruke VBA -områdeobjektet som vist i koden nedenfor:
| 1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Område ("A1"). Verdi = 89Område ("A1"). Font.Bold = TrueSlutt Sub |
Når du trykker på run eller F5 på tastaturet, får du følgende resultat i det faktiske regnearket for å kjøre koden:
Du kan bruke områdeobjektet til å referere til flere celler eller områder. For eksempel, hvis du ønsket å referere til celleområde (A1: C1) i VBA -koden din, kan du bruke VBA -områdeobjektet som vist i koden nedenfor:
| 123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Område ("A1: C1"). Verdi = "ABC"Område ("A1: C1"). Grenser (xlEdgeBottom) .LineStyle = xlDoubleSlutt Sub |
Når du trykker på run eller F5 på tastaturet, får du følgende resultat i det faktiske regnearket for å kjøre koden:
Deklarere en variabel som et område
Du må bruke Dim og Set -søkeordene når du deklarerer en variabel som et område. Koden nedenfor viser deg hvordan du deklarerer en variabel som et område.
| 123456789101112 | Sub DeclaringAndSettingARange ()Dim rng As RangeSett rng = Range ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Santrng.Velgrng.Columns.AutoFitSlutt Sub |
Resultatet er:
Velge spesifikke rader i ditt områdeobjekt
Du kan velge spesifikke rader i områdeobjektet. Koden nedenfor viser deg hvordan du gjør dette:
| 12345678 | Sub SelectingSpecificRowsInTheRangeObject ()Dim rng As RangeSett rng = Range ("A1: C3")rng.Rows (3) .VelgSlutt Sub |
Resultatet er:
Velge spesifikke kolonner i områdeobjektet
Du kan velge spesifikke kolonner i områdeobjektet. Koden nedenfor viser deg hvordan du gjør dette:
| 12345678 | Sub SelectingSpecificColumnsInTheRangeObject ()Dim rng As RangeSett rng = Range ("A1: C3")rng.Kolonner (3) .VelgSlutt Sub |
