Note: The other languages of the website are Google-translated. Back to English
English English

Jak získat adresu aktivní buňky v aplikaci Excel?

Při použití aplikace Microsoft Excel můžete snadno zjistit umístění aktuálně vybrané buňky v poli Název, které je uvedeno vlevo na panelu vzorců. Pokud je ale buňka pojmenována, nemůžete prozkoumat její umístění na základě zobrazení v poli Název. A pokud chcete přímo zobrazit úplnou adresu aktivní buňky nebo zobrazit adresu aktivní buňky v určené buňce, co byste udělali? V tomto kurzu vám ukážeme, jak snadno získat adresu aktivní buňky pomocí metod vzorce a VBA.

Získejte adresu aktivní buňky pomocí vzorce
Získejte adresu aktivní buňky pomocí kódu VBA
Zobrazte adresu aktivní buňky v zadané buňce pomocí kódu VBA
Dynamické zobrazení adresy aktivní buňky pomocí úžasného nástroje


Získejte adresu aktivní buňky pomocí vzorce

V této části vám poskytneme vzorec pro snadné získání adresy aktivní buňky.

1. Vyberte buňku, aby byla aktivní.

2. Zadejte do ní následující vzorec a poté stiskněte vstoupit klíč.

=ADDRESS(ROW(),COLUMN())

Pak můžete vidět, že se v buňce okamžitě zobrazuje adresa aktuálně vybrané buňky.

Poznámka: Pokud vyberete jinou buňku, adresa se nezmění automaticky. Pro získání dynamické adresy při výběru různých buněk použijte níže uvedené metody.

Dynamicky zobrazit adresu aktivní buňky:

Projekt Vylepšená lišta úprav užitečnost Kutools pro Excel pomáhá dynamicky zobrazit adresu aktivní buňky v listu v aplikaci Excel. Kromě toho můžete zobrazit a upravit vybraný obsah buňky přímo v okně, jak je ukázáno níže.
Stáhněte si a vyzkoušejte hned! (30denní trasa zdarma)


Získejte adresu aktivní buňky pomocí kódu VBA

Můžete také získat adresu aktivní buňky pomocí kódu VBA. Postupujte prosím následovně.

1. zmáčkni Další + F11 současně otevřít Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikace v levém podokně otevřete editor kódu, poté zkopírujte a vložte níže uvedený kód VBA do editoru kódu.

Kód VBA: Získejte adresu aktivní buňky

Sub selectRange()
	MsgBox ActiveCell.Address
End Sub

3. Poté klikněte na tlačítko Běh tlačítko pro spuštění kódu.

4. Poté se zobrazí dialogové okno s adresou aktivní buňky uvedené uvnitř.


Zobrazte adresu aktivní buňky v zadané buňce pomocí kódu VBA

V jiné situaci byste chtěli, aby se adresa aktivní buňky zobrazila v určené buňce. Při každém přechodu z jedné buňky do druhé se adresa buňky automaticky změní a zobrazí se v zadané buňce. Postupujte prosím následovně.

1. Otevřete prosím Microsoft Visual Basic pro aplikace okno stisknutím Další + F11 současně.

2. Poklepáním na název listu v levém podokně otevřete editor kódu, poté do něj zkopírujte a vložte níže uvedený kód.

Kód VBA: zobrazí adresu aktivní buňky v zadané buňce

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
	Range("A1").Value = ActiveCell.Address
End Sub

Poznámka: A1 je buňka, kam chcete umístit aktivní adresu buňky, můžete ji podle svých potřeb změnit na zadanou buňku.

3. Pak klikněte na tlačítko Soubor > Zavřete a vraťte se do aplikace Microsoft Excel pro opuštění Microsoft Visual Basic pro aplikace okno.

Adresu aktivních displejů buňky vidíte na buňce A1 a adresa se automaticky změní na základě změny aktivní buňky. Viz snímek obrazovky:


Dynamické zobrazení adresy aktivní buňky pomocí úžasného nástroje

Pokud chcete dynamicky zobrazit adresu aktivní buňky v listu, velmi doporučuji Vylepšená lišta úprav nástroj Kutools pro Excel. Podívejme se, jak tento nástroj dokáže dynamicky zobrazit adresu aktivní buňky v listu.

Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.

1. cvaknutí Kutools > Zobrazit a skrýt > Vylepšená lišta úprav pro povolení této funkce.

Od nynějška se pokaždé, když kliknete na buňku, vyskočí okno Vylepšená lišta úprav. Ve spodní části okna se zobrazí adresa aktivní buňky.
Tipy: Obsah buňky můžete přímo prohlížet a upravovat přímo v okně.

  Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.



Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50% a omezuje stovky kliknutí myší každý den!
officetab dno
Komentáře (5)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Ahoj,

Užitečné je zobrazení odkazu na aktivní buňku. Ale jak tu hodnotu vlastně použiji? Čtu zkoušky a mám šest sloupců (z toho dva se vyplní). Jméno studenta je ve sloupci A; Mohu extrahovat příjmení: LEFT(A7,(FIND("")A7)-1))) [kde A7 je aktuální adresa]. Mohu použít kód pro zobrazení aktuální adresy aktivní buňky uvedené výše:

Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Rozsah("A1").Hodnota = ActiveCell.Address
End Sub

Ale co opravdu chci udělat, je mít kurzor někde v aktuálním řádku (C3:H3) a extrahovat příjmení aktuálního studenta. Příklad:

ABCDEFGH
1 Jméno ID 1 2 3 4 5 6

2 Smith, John 1234567

Když je aktivní buňka mezi C1 a H1, chci extrahovat jméno studenta z A2 ("Smith, John") [pomocí LEFT(A2,(FIND("")A2)-1)))], ale s hodnoty pro adresu dodané z výše uvedeného kódu.

Jakékoli návrhy by byly vítány.


Účet
Tento komentář byl moderátorem webu minimalizován
milý Bille,
Pokud chcete použít odkaz na buňku aktivní buňky, použijte níže uvedený kód VBA.
(Aktivní odkaz na buňku se zobrazí v buňce A1. Poté můžete odkaz na buňku zkopírovat přímo do A1 nebo provést jiné operace, jak potřebujete.)

Private Sub Worksheet_SelectionChange (ByVal Target As Range)
On Error Resume Next
If (Target.Count = 1) And (Intersect(Target, Range("A1")) Is Nothing) Then
Rozsah("A1").Hodnota = ActiveCell.Address
End If
End Sub
Tento komentář byl moderátorem webu minimalizován
První příklad nezobrazuje adresu aktivní buňky, ale buňky obsahující vzorec. Pokud byste vybrali jinou buňku, adresa by se nezměnila.
Ve skutečnosti je to pravděpodobně užitečnější informace než shromažďování adresy aktivní buňky a je obtížnější ji najít, pokud ji potřebujete. Hledal jsem, jak to udělat pomocí VBA a nemohl jsem to chvíli najít, takže to zahrnu sem:

Application.Caller.Address

To vám dá adresu buňky volající funkci a ne aktivní buňku, což je užitečné pro relativní odkazy.
Tento komentář byl moderátorem webu minimalizován
Jsem poměrně nový v psaní VBA.
Namísto hlášení zprávy s adresou aktivované buňky bych chtěl vytáhnout adresu buňky aktivované buňky z mého kódu vba a uložit ji do tabulky/jiného umístění na listu pro každou iteraci, kterou moje smyčka for zabere.

Jak bych postupoval při splnění tohoto úkolu?


Pozdravy,
Tento komentář byl moderátorem webu minimalizován
Dobré ráno,
Excelente formula para exibir a célula ativa.
Mas estou precisando utilizar o "conteúdo" de uma célula ativa dentro de uma formula SE.
Entao:

Se
"celula_ativa" = "aluno"
Zpět na přehledné informace "XXXX"
OU se pro "profesor"
Zpět na přehledné informace "YYYY"

Vc consegue me ajudar com isso, prosím?
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění