Opslaan bestand met bestandnaam opgehaald uit textbox

[renew000]

Hallo Experts,

Ff een vraagje.

Op welke manier dien ik onderstaande code aan te passen zodat het bestand wordt opgeslagen met als bestandsnaam de tekst die in een textbox staat? De textbox heeft in dit geval de naam: txtOpslaanAls

wbk.SaveAs Filename:="1.xls", FileFormat:=xlNormal

Alvast superbedankt voor jullie hulp

Greetz
Renew

 

[edmoor]

Als de extensie er niet bij staat in de tekstbox:
wbk.SaveAs Filename:=txtOpslaanAls.Text & ".xls", FileFormat:=xlNormal

Anders laat je & ".xls" weg.

 

[renew000]

thanks... ik zet em op opgelost