Makro na uložení sešitu EXCEL Vyřešeno

[mmmartin]

Mám něco jako objednávku, ve které je nahoře žadatelem vyplněné číslo zakázky a pak se v seznamu zaškrtáváním označují požadované položky. Jak by prosím vypadalo makro, které by dělalo funkci Uložit jako... a do názvu ukládaného souboru by vložilo obsah té buňky, ve které je číslo zakázky? Pokud to tedy vůbec jde. Děkuji.

[Reklama]

[mike007]

Chceš tedy, aby sešit s objednávkou byl pojmenován číslem zakázky, které je uvedeno buňce, například A1?

Na to ti stačí jednoduché makro:

Sub ulozit()
ChDir "C:\" 'cesta kam se má soubor uložit
ActiveWorkbook.SaveAs Filename:=Range("A1")
End Sub

[mmmartin]

Děkuju. A máš pravdu: nejlepší hra je Excel. Jen s těmi pravidly této hry mám občas problémy

[mike007]

Excel nemá žádná pravidla. Můžeš se odvázat :)

[X]

Já zase používám VBA, které mi po kliknutí na uživatelské tlačítko uloží soubor v Excelu s názvem a za to přidá současný datum a čas, nemám pak bordel ve verzích ...

[mike007]

X: Taky možnost. Jak říkám, Excel nemá pravidla