Vo VBA môžeme vybrať ľubovoľný rozsah buniek alebo skupinu buniek a vykonať na nich rôzne množiny operácií, výber je objekt rozsahu, takže na výber buniek použijeme metódu rozsahu, ktorá ich identifikuje, a kód na výber buniek je Príkaz „Vybrať“, syntax, ktorá sa má použiť na výber, je rozsah (A1: B2). Vybrať.
Čo je vlastnosť výberu Excel VBA?
Výber je vlastnosť dostupná pre VBA. Po výbere rozsahu buniek sa musíme rozhodnúť, čo musíme urobiť. Takže pomocou tejto vlastnosti VBA „Výber“ môžeme robiť všetko, čo môžeme robiť s vybranými bunkami. Jedným z problémov s vlastnosťou Selection je, že sa nám nezobrazuje zoznam IntelliSense. Takže keď píšeme kód, musíme si byť úplne istí, čo robíme bez zoznamu IntelliSense.
Príklady výberu majetku vo VBA
Tu sa pozrieme na príklady výberu v programe Excel VBA.
Túto šablónu Excel pre výber VBA si môžete stiahnuť tu - Šablóna Excel pre výber VBA
Príklad č
Ukážem vám jednoduchý príklad vlastnosti „selection“ s VBA. Teraz chcem najskôr vybrať bunky od A1 po B5, preto môžeme napísať kód VBA takto.
Rozsah ( „A1: B5“ ). Vyberte
Kód:
Sub Selection_Example1 () Range ("A1: B5"). Vyberte End Sub Tento kód vyberie rozsah buniek VBA od A1 po B5.
Ak chcem do týchto buniek vložiť hodnotu „ahoj“, môžem napísať kód takto.
Kód:
Sub Selection_Example1 () Range ("A1: B5"). Value = "ahoj" End Sub 
Podobne, akonáhle sú bunky vybraté, stane sa z nich „Selection“.
Kód:
Sub Selection_Example1 () Range ("A1: B5"). Vyberte Selection.Value = "Hello" End Sub V prvom uvedenom vyššie som vybral rozsah buniek od A1 po B5. Tento riadok teda vyberie bunky.
Len čo sú tieto bunky vybraté, môžeme na ne odkazovať pomocou vlastnosti „Výber“ v programe Excel VBA. Takže pomocou vlastnosti Výber môžeme do týchto buniek vložiť hodnotu „Ahoj“.
Toto je všeobecný prehľad vlastnosti „Výber“ vo VBA.
Príklad č
Teraz uvidíme vlastnosť VBA „Selection“ s premennými. Definujte premennú VBA ako Rozsah.
Kód:
Sub Selection_Example2 () Dim Rng As Range End Sub
Rozsah je objektová premenná, pretože ide o objektovú premennú, musíme nastaviť rozsah buniek pomocou kľúčového slova „Nastaviť“.
Nastavím rozsah ako „Rozsah („ A1: A6 “).
Kód:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Range ("A1: A6") End Sub 
Teraz sa premenná „ Rng “ vzťahuje na rozsah buniek A1 až A6 .
Teraz napíšem kód na vloženie hodnoty „ Hello “.
Kód:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Range ("A1: A6") Rng.Value = "Hello" End Sub 
Týmto sa do buniek A1 až A6 vloží hodnota „Hello“.
Nezáleží na tom, odkiaľ kód spúšťate, do aktívneho pracovného hárka vloží do bunky A1 až A6 hodnotu „Hello“.
Predstavte si však situáciu, že budete musieť vložiť slovo „ahoj“ všade, kde vyberiete bunky iba kliknutím na tlačidlo.
Z tohto dôvodu nemôžeme nastaviť konkrétny rozsah buniek, skôr je potrebné nastaviť rozsah ako „ Výber “.
Kód:
Sub Selection_Example2 () Dim Rng As Set Set Rng = Selection End Sub
Teraz sa premenná „Rng“ vzťahuje na aktívnu bunku alebo všade, kde bunky vyberieme. Teraz pomocou tejto vlastnosti (Selection) v excelovom VBA môžeme vložiť hodnotu „Hello“.
Kód:
Sub Selection_Example2 () Dim Rng As Range Set Rng = Selection Selection.Value = "Hello" End Sub
Týmto sa do buniek nášho výberu vloží slovo „ahoj“. Teraz vyberiem bunky od B2 po C6 a spustím kód, vloží hodnotu „Hello“.
Príklad č
Teraz uvidíme, ako môžeme zmeniť farbu interiéru vybraných buniek. Teraz chcem zmeniť farbu interiéru buniek, ktoré vyberiem. Pre tento prvý krok som deklaroval premennú ako Range a nastavil odkaz na rozsah ako „Selection“.
Kód:
Sub Selection_Example3 () Dim Rng As Set Set Rng = Selection End Sub
Teraz pomocou vlastnosti VBA Selection získate prístup k vlastnosti „Interiér“ .
Kód:
Sub Selection_Example3 () Dim Rng As Set Set Rng = Selection Selection.Interner End Sub
Len čo vyberiete nehnuteľnosť „Interiér“, musíme sa rozhodnúť, čo musíme s touto nehnuteľnosťou robiť. Pretože musíme zmeniť farbu interiéru vybranej bunky, vyberte vlastnosť „Farba“.
Kód:
Sub Selection_Example3 () Dim Rng As Set Set Rng = Selection Selection.Interior.Color End Sub
Nastavte vlastnosť farieb na „ vbGreen “.
Kód:
Sub Selection_Example3 () Dim Rng As Set Set Rng = Selection Selection.Interior.Color = vbGreen End Sub
Týmto sa zmení farba interiéru vybratých buniek na „vbGreen“.
Takto môžeme v kódovaní použiť vlastnosť „Výber“ aplikácie Excel VBA a robiť oveľa viac vecí ľahko.
Poznámka: Jednou z najväčších hrozieb vlastnosti „Selection“ je to, že počas kódovania nezískame prístup k zoznamu IntelliSense. Ako nový študent je takmer nemožné zapamätať si všetky vlastnosti a metódy vlastnosti Selection, takže aby ste mohli začať používať vlastnosť „Selection“, musíte byť vo VBA absolútne profesionáli.