Hej!
Har et regneark,. hvor jeg gerne vil tvinge brugeren til at gemme med et bestemt navn og et bestemt format. Navnet står i celle "O5". Format skal være macro enabled. Bruger skal selv kunne vælge stien, hvor filen skal gemmes (som standard vil den gemme der, hvor filen oprindeligt blev åbnet).
Har lavet følgende kode:
-----
Private Sub CommandButton9_Click()
'Knap til at gemme workbook
fileSaveName = Application.GetSaveAsFilename( _ InitialFileName:=Range("O5"), _ fileFilter:="Microsoft Office Excel 2007 Macro-Enabled Workbook (*.xlsm), *.xlsm")
End Sub
Jeg får billedet frem, hvor jeg kan gemme og den vælger selv teksten og formatet. Så langt lader den altså til at virke. Problemet er så, at jeg ikke kan finde filen bagefter, og hvis jeg klikker på min gem-knap flere gange og kalder filen ved samme navn, så kommer der heller ikke en advarsel om, at der allerede eksisterer en fil. Det er altså som om filen ikke bliver gemt.
Noget der kan hjælpe? :-)
|