[Hallo allemaal
Ik wil een excel betstand opslaan met als naam de inhoud van cel A1 op tabblad C met als extentie . TXT
en wel zo dat als cel A1 = "voorbeeld" dan de bestandsnaam moet beginnen met een U ,
dus uitendelijk wordt de bestandsnaam Uvoorbeeld.txt
ik gebruik deze macro maar krijg het niet voor elkaar om UITVOER.txt te wijzigen in Uvoorbeeld.txt
Sheets("txt").Select
ChDir "Z:\CUSTOMS CONTROLLER\HANDMATIG AIN"
ActiveWorkbook.SaveAs Filename:= _
"Z:\CUSTOMS CONTROLLER\HANDMATIG AIN\UITVOER.txt", FileFormat:=xlTextMSDOS, _
CreateBackup:=False
Sheets("algemeen").Select
inmiddels heb ik dit geschreven en dat gaat goed
"Z:\CUSTOMS CONTROLLER\HANDMATIG AIN\U" & Sheets("algemeen").Range("A1").Value & ".txt", FileFormat:=xlTextMSDOS, _
vraag is opgelost
Wie kan mij hiermee helpen
Bij voorbaat dank
Ron
Ik wil een excel betstand opslaan met als naam de inhoud van cel A1 op tabblad C met als extentie . TXT
en wel zo dat als cel A1 = "voorbeeld" dan de bestandsnaam moet beginnen met een U ,
dus uitendelijk wordt de bestandsnaam Uvoorbeeld.txt
ik gebruik deze macro maar krijg het niet voor elkaar om UITVOER.txt te wijzigen in Uvoorbeeld.txt
Sheets("txt").Select
ChDir "Z:\CUSTOMS CONTROLLER\HANDMATIG AIN"
ActiveWorkbook.SaveAs Filename:= _
"Z:\CUSTOMS CONTROLLER\HANDMATIG AIN\UITVOER.txt", FileFormat:=xlTextMSDOS, _
CreateBackup:=False
Sheets("algemeen").Select
inmiddels heb ik dit geschreven en dat gaat goed
"Z:\CUSTOMS CONTROLLER\HANDMATIG AIN\U" & Sheets("algemeen").Range("A1").Value & ".txt", FileFormat:=xlTextMSDOS, _
vraag is opgelost
Wie kan mij hiermee helpen
Bij voorbaat dank
Ron
Laatst bewerkt: