Erzeugen eines dynamischen Pfades
27.05.2006 09:48:18
AVD
Beim schliessen der Datei erzeuge ich einen neue Datei, der Name besteht aus mehreren Komponenten siehe unten. Das funktioniert auch alles sehr gut. Nun möchte diese Pfad modifizieren und deshalb fragen ich, was ich bei Pfad2 einsetzen muß um den Wert der in der Tabelle1 Zelle A1 steht zu übergeben? die restlichen Pfade bzw. Namen funktionieren tadellos.
pfad1 = ThisWorkbook.Path & "\"
pfad2 = "Tabelle1 ZelleA1\"
pfad3 = "Vollmachten\"
name1 = Sheets("Start").Range("k2").Value
name2 = Sheets("Start").Range("k3").Value
name3 = Sheets("Start").Range("k4").Value
ActiveWorkbook.SaveAs Filename:=pfad1 & pfad2 & name1 & name2 & name3
Vielen Dank für eure Beiträge
Gruß
Alex