Opslaan als met comboboxen

[Atwist]

Krijg nog steeds dezelfde fout

En ik ben gemachtigd (administrator)

 

[Atwist]

Ik ben al wat verder gekomen

Inmiddels wordt de project map gemaakt

T:\Ontwerpen\Andre

maar nu loopt het vast op

iFF = FreeFile()
[COLOR="red"]Open sTkstB For Output As iFF[/COLOR]
Print #iFF, Wstr
Close #iFF
End Sub

 

[edmoor]

De standaardvraag blijft ook nu, welke foutmelding krijg je erop en wat is de vertaling van sTkstB?

 

[Atwist]

Fout 75

?sTkstB = dus niets

Ik zie door de bomen het bos niet meer net ging het goed dat de project map werd gemaakt maar nu gaat niets meer.
Loop ook weer vast op Mkdir regel

Ook fout 75

 

[edmoor]

Post anders je worksheet even, dat praat makkelijker.

 

[Atwist]

Dat is lastig gezipt is deze nog 110kb.

 

[edmoor]

Je kunt hem me ook mailen als je op mijn naam klikt.

 

[Roncancio]

VBA verwacht dat sTkstB een pad is van een tekstbestand.

Bijvoorbeeld:

sTkstB = "C:\Tekstbestand.txt"
iFF = FreeFile()
Open sTkstB For Output As iFF
Print #iFF, Wstr
Close #iFF

Met vriendelijke groet,


Roncancio