Makro autom. umschreiben
16.05.2007 15:21:00
volker
ich hab in sehr vielen Listen folgendes makro, hier steht unter anderem
SpeichernUnter()
Speicher = InputBox("Speicher Name : ")
Pfad = "C:\v71\LISTEN"
DName = Speicher
Dateiname = Pfad & "\" & DName & ".csv"
' ThisWorkbook.SaveAs Filename:=Dateiname, FileFormat:= xlCSV
so jetzt möchte ich automatisch den Pfad ändern wie mach ich das?
Danke
Grüsse und schönen Vadderdag
volker