Vložení cesty, kde je sešit uložen, do záhlaví nebo stavového řádku pomocí jazyka VBA v aplikaci Microsoft Excel

Anonim

Horní řádek okna je záhlaví. Pomocí dostupného prázdného místa přidejte metadata související se sešitem.

Chcete -li přidat metadata, přidáme kód do události aktivace sešitu. Název sešitu se tedy po aktivaci sešitu změní.

Ve výchozím nastavení obsahuje sešit aplikace Excel název „Microsoft Excel“.

Přidání názvu do záhlaví:

1. Stisknutím Alt+F11 otevřete VBE.

2. V podokně VBAProject poklepejte na ThisWorkbook.

3. V horní části modulu otevřete levý rozevírací seznam (Obecné), vyberte Sešit a poté vpravo vyberte rozevírací seznam Aktivovat událost.

4. V události Aktivovat zadejte následující kód:

Application.Caption = "Soubor makra"

Výše uvedený kód přiřadí „Sešit makra“ jako název sešitu.

5. Chcete -li zrušit zobrazovaný název při aktivaci nebo otevírání jiného sešitu, přidejte událost Deaktivovat výběrem Deaktivovat z rozevíracího seznamu Postup.

6. V události Deaktivovat zadejte následující kód:

Application.Caption = ""

Pro kód prosím postupujte níže

 Možnost Explicitní soukromý dílčí sešit_Activate () 'Změna titulku sešitu Application.Caption = "Soubor makra" Konec Sub Soukromý díl sešit_Deactivate ()' Změna titulku sešitu na prázdnou Application.Caption = "" End Sub 

Pokud se vám tento blog líbil, sdílejte ho se svými přáteli na Facebooku. Také nás můžete sledovat na Twitteru a Facebooku.

Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit naši práci a zlepšit ji pro vás. Napište nám na e -mail