Výběr VBA | Co je vlastnost výběru v aplikaci Excel VBA? (s příklady)

Ve VBA můžeme vybrat libovolný rozsah buněk nebo skupinu buněk a provádět na nich různou sadu operací, výběr je objekt rozsahu, takže k výběru buněk použijeme metodu rozsahu, protože identifikuje buňky a kód pro výběr buněk je Příkaz „Vybrat“, syntaxe, která se má použít pro výběr, je rozsah (A1: B2). Výběr.

Co je vlastnost výběru Excel VBA?

Výběr je vlastnost dostupná ve VBA. Jakmile je vybrán rozsah buněk, musíme se rozhodnout, co musíme udělat. Takže pomocí této vlastnosti „Výběr“ VBA můžeme dělat všechny věci, které můžeme dělat s vybranými buňkami. Jedním z problémů s vlastností Selection je, že se nám nezobrazí seznam IntelliSense. Takže když píšeme kód, musíme si být naprosto jisti, co děláme bez seznamu IntelliSense.

Příklady vlastnosti výběru ve VBA

Zde se podíváme na příklady výběru v aplikaci Excel VBA.

Tuto šablonu Excel pro výběr VBA si můžete stáhnout zde - Šablona Excel pro výběr VBA

Příklad č. 1

Ukážu vám jednoduchý příklad vlastnosti „selection“ s VBA. Nyní chci nejprve vybrat buňky od A1 do B5, proto můžeme napsat kód VBA takto.

Rozsah ( „A1: B5“ ). Vyberte

Kód:

 Sub Selection_Example1 () Range ("A1: B5"). Vyberte End Sub 

Tento kód vybere rozsah buněk VBA od A1 do B5.

Pokud chci do těchto buněk vložit hodnotu „ahoj“, mohu napsat tento kód.

Kód:

 Sub Selection_Example1 () Range ("A1: B5"). Value = "hello" End Sub 

Podobně, jakmile jsou buňky vybrány, stane se z nich „Selection“.

Kód:

 Sub Selection_Example1 () Range ("A1: B5"). Vyberte Selection.Value = "Hello" End Sub 

V první výše jsem vybral rozsah buněk od A1 do B5. Tento řádek tedy vybere buňky.

Jakmile jsou tyto buňky vybrány, můžeme na ně odkazovat pomocí vlastnosti „Výběr“ v aplikaci Excel VBA. Takže pomocí vlastnosti Výběr můžeme do těchto buněk vložit hodnotu „Ahoj“.

Toto je obecný přehled vlastnosti „Výběr“ ve VBA.

Příklad č. 2

Nyní uvidíme vlastnost „Výběr“ VBA s proměnnými. Definujte proměnnou VBA jako Rozsah.

Kód:

 Sub Selection_Example2 () Dim Rng As Range End Sub 

Rozsah je objektová proměnná, protože se jedná o objektovou proměnnou, musíme nastavit rozsah buněk pomocí klíčového slova „Nastavit“.

Nastavím rozsah jako „Rozsah („ A1: A6 “).

Kód:

 Sub Selection_Example2 () Dim Rng As Set Set Rng = Range ("A1: A6") End Sub 

Proměnná „ Rng “ nyní odkazuje na rozsah buněk A1 až A6 .

Nyní napíšu kód pro vložení hodnoty „ Hello “.

Kód:

 Sub Selection_Example2 () Dim Rng As Range Set Rng = Range ("A1: A6") Rng.Value = "Hello" End Sub 

Tím se do buněk A1 až A6 vloží hodnota „Hello“.

Nezáleží na tom, odkud kód spouštíte, do aktivního listu vloží hodnotu „Hello“ do buňky A1 až A6.

Představte si však situaci, kdy musíte slovo „Hello“ vložit kamkoli, kde vyberete buňky pouhým kliknutím na tlačítko.

Z tohoto důvodu nemůžeme nastavit konkrétní rozsah buněk, spíše musíme nastavit rozsah jako „ Výběr “.

Kód:

 Sub Selection_Example2 () Dim Rng As Set Set Rng = Selection End Sub 

Proměnná „Rng“ nyní odkazuje na aktivní buňku nebo kdekoli, kde buňky vybereme. Nyní pomocí této vlastnosti (výběr) v aplikaci Excel VBA můžeme vložit hodnotu „Hello“.

Kód:

 Sub Selection_Example2 () Dim Rng As Range Set Rng = Selection Selection.Value = "Hello" End Sub 

Tím se do buněk našeho výběru vloží slovo „Hello“. Nyní vyberu buňky od B2 po C6 a spustím kód, vloží hodnotu „Hello“.

Příklad č. 3

Nyní uvidíme, jak můžeme změnit barvu interiéru vybraných buněk. Nyní chci změnit barvu interiéru buněk, které vyberu. Pro tento první jsem deklaroval proměnnou jako Range a nastavil odkaz na rozsah jako „Selection“.

Kód:

 Sub Selection_Example3 () Dim Rng As Range Set Rng = Selection End Sub 

Nyní pomocí vlastnosti VBA Selection přistupujete k vlastnosti „Interiér“ .

Kód:

 Sub Selection_Example3 () Dim Rng As Set Set Rng = Selection Selection.Interner End Sub 

Jakmile vyberete vlastnost „Interiér“, musíme se rozhodnout, co s touto vlastností musíme udělat. Protože potřebujeme změnit barvu interiéru vybrané buňky, vyberte vlastnost „Barva“.

Kód:

 Sub Selection_Example3 () Dim Rng As Range Set Rng = Selection Selection.Interior.Color End Sub 

Nastavte vlastnost color na „ vbGreen “.

Kód:

 Sub Selection_Example3 () Dim Rng As Set Set Rng = Selection Selection.Interior.Color = vbGreen End Sub 

Tím se změní barva interiéru vybraných buněk na „vbGreen“.

Takto můžeme v kódování použít vlastnost Excel VBA „Výběr“ a dělat mnohem více věcí snadno.

Poznámka: Jednou z největších hrozeb s vlastností „Výběr“ je, že při kódování nezískáme přístup k seznamu IntelliSense. Jako nový student je téměř nemožné zapamatovat si všechny vlastnosti a metody vlastnosti Výběr, takže abyste mohli začít používat vlastnost „Výběr“, musíte být ve VBA naprosto profesionální.