• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Bestand opslaan op meerdere locaties

Status
Niet open voor verdere reacties.
T

Tosh

Nieuwe gebruiker
Lid geworden
9 jan 2018
Berichten
2
Hoi,

Heb een vraagje ik ben al een tijdje aan het zoeken hoe ik telkens als ik een nieuw bestand wil openen zou ik dit willen opslaan op 3 verschillende locaties maar ik wil bij deze opdracht ook dat hij me vraagt onder welke naam dus dat ik de naam kan aanpassen bij de opdracht.

Zouden jullie mij kunnen helpen?

Groetjes,
Tosh
 
zoiets?
Code: 
Sub test()
Dim pathnaam(3) As String

pathnaam(1) = "C:\testa\"
pathnaam(2) = "C:\testb\"
pathnaam(3) = "C:\testc\"

For i = 1 To 3

ActiveWorkbook.SaveAs pathnaam(i) & InputBox("voer hier de bestandsnaam in!")

Next

End Sub
 
Geweldig man!

Precies wat ik bedoelde hartelijk bedankt voor de snelle reactie en de juiste oplossing.

Mvg,
Tosh
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan