D.m.v. opdrachtknop bestand opslaan

[H.Weenink]

Geachte mededenkers, in een excel bestand heb ik een opdrachtknop gemaakt, daaronder wil ik een macro waarmee ik het bestand onder een willekeurige andere naam op kan slaan, wie weet raad?

bvd Hans

 

[koosl]

Hans,

geen willekeurige naam, maar wel het venster "Save As" of "Opslaan Als"
zodat je de willekeurige naam zelf in kunt typen.

Sub OpslaanAls()
    Application.Dialogs(xlDialogSaveAs).Show
End Sub

Heb je hier iets aan?

Koosl

 

[Wigi]

Hoi

zie ook zeker hier:

http://www.exceltip.com/st/Use_the_built-in_dialogs_using_VBA_in_Microsoft_Excel/416.html

Wigi

 

[H.Weenink]

Hoi wigi of koosl, op de een of andere manier krijg ik het niet voor elkaar , zou het iets te maken kunnen hebben dat ik de vba beveiligt heb met een wachtwoord en is daar dan geen macro voor om eerst de beveiliging eraf te halen, dan het bestand op te slaan en dan meteen weer te beveiligen

Hans

 

[koosl]

Hans,

krijg je de code wel in ThisWorkbook of in een Module gezet?
Dan zou het toch moeten werken.

Het heeft volgens mij geen nut om eerst de beveiliging eraf te halen dan
het bestand te saven en daarna weer te beveiligen.

Koosl

 

[H.Weenink]

Hans,

krijg je de code wel in ThisWorkbook of in een Module gezet?
Dan zou het toch moeten werken.

Het heeft volgens mij geen nut om eerst de beveiliging eraf te halen dan
het bestand te saven en daarna weer te beveiligen.

Koosl

Tot zover lukt het, alleen had ik graag dat het bestand dan niet in de in dezelfde map opgeslagen wordt dan waar het bronbestand staat(deze map laat hij zien) maar dat hij de keuze maakt voor opslaan op de G schijf is dit mogelijk

heb van alles al geprobeert maar ja je weet wel.
vr gr en alvast bedankt Hans

 

[Wigi]

maar dat hij de keuze maakt voor opslaan op de G schijf is dit mogelijk

Dat kan met getsaveasfilename, zie in de helpfiles of hier op het forum.

 

[H.Weenink]

Dat kan met getsaveasfilename, zie in de helpfiles of hier op het forum.

Dat was de oplossing bedankt
Hans