VBA tartomány -objektumváltozók (Dim / Set Range)

A VBA adattípusok - Változók és állandók bemutatónkban már áttekintettük, hogy milyen változók és állandók vannak. Most megvizsgáljuk a tartományobjektumot a VBA -ban, és hogyan deklarálhatunk egy változót tartományobjektumként. A tartományobjektum a VBA celláinak vagy több cellájának jelölésére szolgál. Tehát nagyon hasznos a kódban használni.

Kattintson ide a VBA tartományokról és cellákról további információkért.

A VBA tartomány objektum

A tartományobjektum segítségével egyetlen cellára hivatkozhat. Például, ha az A1 cellára szeretne hivatkozni a VBA kódjában, akkor használhatja a VBA tartomány objektumot az alábbi kód szerint:

1234	Sub RefereringToASingleCellUsingTheRangeObject ()Tartomány ("A1"). Érték = 89Tartomány ("A1"). Font.Bold = IgazEnd Sub

Ha megnyomja a Futtatás vagy az F5 billentyűt a billentyűzeten, a kód futtatásához a következő eredményt kapja a tényleges munkalapon:

A tartományobjektum segítségével több cellára vagy tartományra hivatkozhat. Például, ha cellatartományra (A1: C1) szeretne hivatkozni a VBA -kódjában, akkor használhatja a VBA tartományobjektumot az alábbi kód szerint:

123456

Sub RefereringToMultipleCellsUsingTheRangeObject ()Tartomány ("A1: C1"). Érték = "ABC"Tartomány ("A1: C1"). Szegélyek (xlEdgeBottom) .LineStyle = xlDoubleEnd Sub

Amikor megnyomja a Futtatás vagy az F5 billentyűt a billentyűzeten, a kód futtatásához a következő eredményt kapja a tényleges munkalapon:

Változó tartományként való deklarálása

A Dim és Set kulcsszavakat kell használnia, amikor egy változót tartományként deklarál. Az alábbi kód bemutatja, hogyan kell változót tartományként deklarálni.

123456789101112

Sub DeclaringAndSettingARange ()Dim rng mint tartományRng = tartomány beállítása ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Igazrng. Válassza kirng.Oszlopok.AutoFitEnd Sub

Az eredmény:

Adott sorok kiválasztása a tartomány objektumában

Kiválaszthat bizonyos sorokat a tartomány -objektumon belül. Az alábbi kód megmutatja, hogyan kell ezt megtenni:

12345678

Sub SelectingSpecificRowsInTheRangeObject ()Dim rng mint tartományRng = tartomány beállítása ("A1: C3")rng. Sorok (3). Válassza kiEnd Sub

Az eredmény:

Adott oszlopok kiválasztása a tartomány objektumában

Kiválaszthat bizonyos oszlopokat a tartomány -objektumon belül. Az alábbi kód megmutatja, hogyan kell ezt megtenni:

12345678

Sub SelectingSpecificColumnsInTheRangeObject ()Dim rng mint tartományRng = tartomány beállítása ("A1: C3")rng. Oszlopok (3). Válassza kiEnd Sub