Makro vám ukáže cestu k úložišti
Pokud chcete pomocí makra určit, ve kterém adresáři je aktivní sešit uložen, můžete tuto vlastnost použít Cesta použití. Vrací cestu, pod kterou lze soubor najít.
Chcete -li určit cestu aktuálního sešitu, použijte vlastnost na objekt Aktivní pracovní kniha na. Následující makro ukazuje, jak to vypadá v praxi:
Sub Zobrazit adresář úložiště ()
Dim adresář jako řetězec
Adresář = ActiveWorkbook.Path
Pokud adresář "" Pak
MsgBox "Aktuální sešit je v následujícím" & _
"Adresář uložen:" & vbLf & adresář
Jiný
MsgBox „Aktuální sešit ještě nebyl vytvořen“ & _
"uložené."
Konec If
End Sub
Po spuštění makro zobrazí cestu aktivního sešitu v okně. Následující sešit ukazuje, jak může výsledek vypadat:
Pokud sešit ještě nebyl uložen, vlastnost se vrátí Cesta zpět prázdný text. V tomto případě makro odpoví jiným oknem zprávy:
Tip: Pokud byste chtěli vědět, jak zadávat a spouštět makra v Excelu, najdete zde stručný popis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
