inputboxwaarde gerbuiken als directory voor opslaan

Status
Niet open voor verdere reacties.

Peter2016

Gebruiker
Lid geworden
4 sep 2015
Berichten
89
Hallo,

Ik heb een inputbox waarde die ik wil gebruiken als naam bij opslaan.

Opslaan als: C:/Facturatie/ **** waarde van inputbox***/"filename".xslm

Dim Locatie As String
Locatie = InputBox("Type Locatie")

Ik dat dit ingevuld, maar dit werkte niet: C:/Facturatie/Locatie/......
 
Werkt dit wel?

Code:
ActiveWorkbook.SaveAs Filename:="C:\Facturatie\" & Locatie & "\" & ThisWorkbook.Name, FileFormat:=52
 
Laatst bewerkt:
Hallo SjonR,

De waarde is al eerder ingevoerd in een inputbox, dus behoeft niet nogmaals te worden ingevoerd bij het opslaan.
Ik weet alleen niet goed hoe ik "Locatie" (inputwaarde), kan gebruiken als Subdirectory tussen \ .... \
Hoop dat je snapt wat ik bedoel :)
 
Ja!! Dat is 'm. Heel erg bedankt.

Misschien mag ik het ook meteen aan je vragen in dit topic, ik heb nog een inputbox waarde ik een datum moet invullen, maar deze wordt omgedraaid, bij 1-8-2017 geeft ie weer als 8-1-2017.
Ik heb al gezocht en heeft met US format te maken.
Hij ziet er zo uit:

Dim DatumIngang As String
DatumIngang = InputBox("Type Ingangsdatum Voorstel", Format("dd/mm/yy"))

Range("AB4") = DatumIngang
 
Met 'cdate' of 'datevalue' Peter.
Code:
Range("AB4") = [COLOR=#ff0000]cdate([/COLOR]DatumIngang[COLOR=#ff0000][/COLOR][COLOR=#ff0000]​)[/COLOR]
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan