Vi har redan gått igenom vad variabler och konstanter är i vår VBA -datatyper - variabler och konstanter. Vi ska nu titta på intervallobjektet i VBA och hur man deklarerar en variabel som ett intervallobjekt. Områdesobjektet används för att beteckna celler eller flera celler i VBA. Så det är mycket användbart att använda i din kod.
Klicka här för mer information om VBA -intervall och -celler.
VBA Range Object
Du kan använda intervallobjektet för att referera till en enda cell. Om du till exempel vill referera till cell A1 i din VBA -kod kan du använda VBA -intervallobjektet som visas i koden nedan:
| 1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Område ("A1"). Värde = 89Område ("A1"). Font.Bold = TrueAvsluta Sub |
När du trycker på run eller F5 på tangentbordet, för att köra din kod får du följande resultat i ditt faktiska kalkylblad:
Du kan använda intervallobjektet för att referera till flera celler eller intervall. Om du till exempel vill referera till cellintervall (A1: C1) i din VBA -kod kan du använda VBA -intervallobjektet som visas i koden nedan:
| 123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Område ("A1: C1"). Värde = "ABC"Område ("A1: C1"). Gränser (xlEdgeBottom) .LineStyle = xlDoubleAvsluta Sub |
När du trycker på run eller F5 på tangentbordet, för att köra din kod får du följande resultat i ditt faktiska kalkylblad:
Deklarera en variabel som intervall
Du måste använda Dim och Set -nyckelord när du deklarerar en variabel som ett intervall. Koden nedan visar hur du deklarerar en variabel som ett intervall.
| 123456789101112 | Sub DeclaringAndSettingARange ()Dim rng As RangeStäll in rng = Range ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Santrng. Väljrng.Columns.AutoFitAvsluta Sub |
Resultatet är:
Välja specifika rader i ditt intervallobjekt
Du kan välja specifika rader inom ditt intervallobjekt. Koden nedan visar hur du gör detta:
| 12345678 | Sub SelectingSpecificRowsInTheRangeObject ()Dim rng As RangeStäll in rng = Range ("A1: C3")rng.Rader (3) .VäljAvsluta Sub |
Resultatet är:
Välja specifika kolumner i ditt intervallobjekt
Du kan välja specifika kolumner inom ditt intervallobjekt. Koden nedan visar hur du gör detta:
| 12345678 | Sub SelectingSpecificColumnsInTheRangeObject ()Dim rng As RangeStäll in rng = Range ("A1: C3")rng.Kolumner (3) .VäljAvsluta Sub |
