Aktivní buňka VBA

Aktivní buňka znamená konkrétní buňku, která je aktivní v aktuálním aktivním listu. Pokud je například v listu 2 vybrána buňka B4, znamená to, že aktivní buňka je B4 v listu 2. Ve VBA používáme odkaz aktivní buňky ke změně vlastností nebo hodnot aktivní buňky. NEBO používáme tuto funkci v určitých situacích, když potřebujeme provést některé změny v aktivní buňce za určitých podmínek, které splňují požadavky.

Aktivní buňka je vlastnost ve VBA. Používáme jej v různých situacích ve VBA. Můžeme přiřadit hodnoty aktivní buňce pomocí funkce aktivní buňky VBA nebo načíst adresu aktivní buňky. Co se tyto funkce vrátily? Funkce aktivní buňky vrátí vlastnost range aktivní buňky v aktivním listu. Jak je vysvětleno ve výše uvedeném prohlášení v definici, pokud je list 2 aktivní a buňka B4 je aktivní buňkou, aktivní buněčná funkce ve VBA načte vlastnosti rozsahu buňky B4 v listu 2.

Syntaxe aktivní buňky v Excelu VBA

Níže je uvedena syntaxe aktivní buňky v aplikaci Excel VBA

Syntaxe se používá k přiřazení určité hodnoty aktivní buňce.

 Activecell.Value = ““ 

Syntaxe vybere hodnotu nebo vlastnost aktivní buňky v aktivním listu.

 Application.Activecell 

Pokud potřebujeme změnit písmo aktivní buňky, bude následující syntaxe

 Activecell.Font. (Požadované písmo) = True 

Řádky a sloupce aktivní buňky můžeme také zobrazit pomocí následující syntaxe

 Application.Activecell 

Použijme výše uvedenou syntaxi vysvětlenou v několika příkladech a naučíme se hrát s aktivními buňkami.

Poznámka: Abyste mohli používat VBA, ujistěte se, že máte povolenou kartu vývojáře na kartě Soubor v části Možnosti.

Příklady aktivní buňky Excel VBA

Níže jsou uvedeny různé příklady aktivní buňky VBA v Excelu:

Tuto šablonu VBA Active Cell Excel si můžete stáhnout zde - VBA Active Cell Excel Template

Aktivní buňka VBA - Příklad č. 1

V tomto příkladu chceme změnit hodnotu aktuální buňky s něčím buňkou. Například v listu 1 vyberte buňku A2 a vložte hodnotu jako ANAND a chceme změnit hodnotu této aktivní buňky jako ARAN.

Při použití aktivní buňky VBA v Excelu postupujte podle níže uvedených kroků.

Krok 1: Přejděte na kartu Developer a kliknutím na Visual Basic otevřete Editor VB.

Krok 2: Klikněte na záložku Vložit a kliknutím na moduly vložte nový modul.

Krok 3: Chcete -li začít psát kód, deklarujte podfunkci.

Kód:

 Vzorek () Konec Sub 

Krok 4: Aktivujte list 1 pomocí níže uvedené funkce.

Kód:

 Podvzorky () Pracovní listy („List1“) 

Krok 5: Můžeme zkontrolovat, že v buňce A2 v listu 1 máme hodnotu jako ANAND a je to aktivní buňka.

Krok 6: Nyní použijte následující příkaz ke změně hodnoty aktivní buňky.

Kód:

 Dílčí ukázka () Pracovní listy ("List1"). Aktivovat ActiveCell.Value = "ARAN" End Sub 

Krok 7: Spusťte výše uvedený kód z poskytnutého spouštěcího tlačítka nebo stiskněte klávesu F5.

Vidíme, že hodnota v buňce A2 byla změněna.

Aktivní buňka VBA - Příklad č. 2

Nyní jsme změnili hodnotu aktivní buňky z ANAND na ARAN. Jak zobrazíme aktuální hodnotu aktivní buňky? To se naučíme v tomto příkladu.

Při použití aktivní buňky VBA v Excelu postupujte podle níže uvedených kroků.

Krok 1: Přejděte na kartu vývojáře a kliknutím na Visual Basic otevřete Editor VB.

Krok 2: Ve stejném modulu deklarujte subfunkci pro zahájení zápisu kódu.

Kód:

 Dílčí vzorek1 () Koncový díl 

Krok 3: Aktivujte list 1 pomocí následujícího kódu.

Kód:

 Sub Sample1 () Pracovní listy („List1“). Aktivace End Sub 

Krok 4: Nyní si vyberte aktivní buňku podle následujícího kódu.

Kód:

 Sub Sample1 () Pracovní listy ("List1"). Aktivovat Set selectedCell = Application.ActiveCell End Sub 

Krok 5: Nyní zobrazme hodnotu vybrané buňky pomocí následujícího kódu.

Kód:

 Sub Sample1 () Pracovní listy ("List1"). Aktivovat Set selectedCell = Application.ActiveCell MsgBox selectedCell.Value End Sub 

Krok 6: Spusťte výše uvedený kód stisknutím klávesy F5 nebo pomocí poskytnutého spouštěcího tlačítka a podívejte se na následující výsledek.

Aktivní buňka byla A2 a má hodnotu jako ARAN, takže zobrazená vlastnost je ARAN.

Aktivní buňka VBA - Příklad č. 3

Změňme písmo buňky A2, která byla vybranou buňkou. Udělejme písmo jako BOLD. Zpočátku nebylo vybráno žádné písmo.

Postupujte podle níže uvedených kroků a použijte aktivní buňku VBA v Excelu.

Krok 1: Přejděte na kartu Developer a kliknutím na Visual Basic otevřete editor VB.

Krok 2: Ve stejném modulu deklarujte subfunkci pro zahájení zápisu kódu.

Kód:

 Dílčí vzorek2 () Koncový díl 

Krok 3: Nejprve aktivujte list, abychom mohli používat aktivní buňku.

Kód:

 Sub Sample2 () Pracovní listy („List1“) 

Krok 4: Změníme písmo vybrané buňky podle následujícího kódu.

Kód:

 Sub Sample2 () Pracovní listy ("List1"). Aktivovat ActiveCell.Font.Bold = True End Sub 

Krok 5: Spusťte výše uvedený kód stisknutím klávesy F5 nebo poskytnutého tlačítka pro spuštění a podívejte se na výsledek.

Písmo aktivní buňky se změní na BOLD.

Aktivní buňka VBA - Příklad č. 4

Nyní chceme vědět, v jakém řádku nebo v jakém sloupci je aktuálně aktivní buňka. Jak to udělat, se v tomto příkladu naučíme.

Postupujte podle níže uvedených kroků a použijte aktivní buňku VBA v Excelu.

Krok 1: Přejděte na kartu Developer a kliknutím na Visual Basic otevřete editor VB.

Krok 2: Ve stejném modulu deklarujte subfunkci pro zahájení zápisu kódu.

Kód:

 Sub Sample3 () Konec Sub 

Krok 3: Nejprve aktivujte list, abychom mohli využívat aktivní vlastnosti buněk.

Kód:

 Sub Sample3 () Pracovní listy („List1“). Aktivace End Sub 

Krok 4: Nyní vybereme aktivní buňku podle následujícího kódu.

Kód:

 Sub Sample3 () Pracovní listy ("List1"). Aktivovat Set selectedCell = Application.ActiveCell End Sub 

Krok 5: Nyní můžeme zobrazit následující řádek aktivní buňky pomocí následujícího kódu.

Kód:

 Sub Sample3 () Pracovní listy ("List1"). Aktivovat Set selectedCell = Application.ActiveCell MsgBox selectedCell.Row End Sub 

Krok 6: Aktuální sloupec aktivní buňky můžeme získat také pomocí následujícího kódu.

Kód:

 Sub Sample3 () Pracovní listy ("List1"). Aktivovat Set selectedCell = Application.ActiveCell MsgBox selectedCell.Row MsgBox selectedCell.Column End Sub Sub 

Krok 7: Nyní stiskněte klávesu F5 nebo tlačítko Run, aby se spustil výše uvedený kód a zobrazil se následující výsledek.

Výše uvedený výsledek byl řádek aktivní buňky. Stisknutím tlačítka Ok zobrazíte sloupec aktivní buňky.

Co si pamatovat

Existuje několik věcí, které si musíme pamatovat o aktivních buňkách ve VBA:

  • Aktivní buňka je aktuálně aktivní nebo vybraná buňka v libovolném listu.
  • Ve VBA můžeme zobrazit nebo změnit vlastnosti aktivní adresy buňky.
  • Abychom mohli využívat vlastnosti aktivní buňky, musíme nejprve aktivovat aktuální list.

Doporučené články

Toto byl průvodce aktivní buňkou Excel VBA. Zde jsme diskutovali o tom, jak pomocí vlastnosti VBA Active Cell přiřadit hodnotu nebo načíst adresu aktivní buňky v Excelu, spolu s několika praktickými příklady a šablonou Excel ke stažení. Můžete si také prohlédnout naše další doporučené články -

  1. Použití VBA IFError v Excelu
  2. Jak používat zmrazené panely Excelu?
  3. Výukové programy na VBA Paste
  4. Přizpůsobení a použití stavového řádku v Excelu

Kategorie: