Jak určit cestu k úložišti sešitu aplikace Excel pomocí makra VBA

Anonim

Chcete -li pomocí makra určit polohu, na které je sešit aplikace Excel uložen, přečtěte si příslušnou vlastnost. Pomocí toho můžete určit aktuální cestu nebo rozpoznat, že soubor ještě nebyl uložen.

Každý uložený soubor má název souboru a cestu. Cesta ukazuje cestu k adresáři, ve kterém je sešit uložen.

Pokud si chcete tyto informace přečíst pomocí makra, pomůže vám vlastnost PATH. Pomocí této funkce načtete cestu. Následující makro ukazuje, jak vlastnost v praxi používat:

Sub StellePfadDar ()
Pokud ThisWorkbook.Path "" Pak
MsgBox "Cesta sešitu:" & vbLf & ThisWorkbook.Path
Jiný
MsgBox "Sešit ještě nebyl uložen."
Konec If
End Sub

Po spuštění aplikace Excel zobrazí malé okno, ve kterém je zobrazena cesta aktuálního sešitu

Pokud sešit ještě nebyl uložen, vrátí vlastnost PATH prázdný text. Toto je zachyceno v makru a zodpovězeno jiným oknem zprávy. Následující obrázek ukazuje, jak toto okno vypadá: