Poradna - Uložení souboru dle obsahu buňky - VBA
Vložení příspěvkuhlavní kategorie | zpět | + odpovědět na toto téma
Uložení souboru dle obsahu buňky - VBA - diskuze na toto téma |
Zdravím.
Potřeboval bych pomoct s makrem.
V buňce C1 mám text, pod kterým bych chtěl daný soubor uložit (plus aktuální rok a měsíc) a to do adresáře C:\soubory\"text v buňce C1" .
Tohle makro mi nefunguje a nemohu přijít na chybu.. Za radu budu moc rád.
Sub ulozit()
Const cesta As String = "C:\soubory"
jmeno = cesta & "\" & Range("C1") & "\" & Format(Now, "yyyy") & "_" & Format(Now, "mm") & "_" & Range("C1") & ".xlsx"
ActiveWorkbook.SaveAs Filename:=jmeno
End Sub Např takto viz soubor. Application.DisplayAlerts = False je z toho důvodu, že jinak by docházelo k zobrazování dialogu, že se pokoušíte uložit sešit bez podpory maker.
BEZPODMÍNEČNOU NUTNOSTÍ je EXISTENCE zvolených SLOŽEK! Odpověď |