Username - unterschiedl. "Userordner" in C
Wolfgang
bislang hat der untenstehende Auszug aus einem Code, um Daten zu importieren, gut funktioniert. Nun hat sich im Rahmen der Vernetzung bei div. KollegInnen wohl technisch etwas geändert, so dass im Explorer unter C nun zwei "Userordner" existieren. Einmal z.B weiterhin "MuellerW", ein weiteres Mal "MuellerW.Gstst". Über eine Abfragemöglichkeit (hier im Forum gefunden) konnte ich den Usernamen abfragen der dann immer noch mit "MuellerW" angezeigt wird. Wie kann der Code geändert/angepasst werden, dass, wenn in C auch ein "Userordner" mit Zusatz .Gstst existiert, dieser genommen wird (hierin befinden sich dann die weiteren, notwendigen Daten -temp- für den Datenimport) und der andere Ordner ohne Zusatz ignoriert wird. Wenn aber ein Ordner mit Zusatz nicht existiert, dann dieser zusatzfreie Ordner genommen wird? Danke schon jetzt für die Rückmeldungen.
Herzliche Grüße
Wolfgang
Sub Username()
Sheets("Daten").Activate
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;C:\Dokumente und Einstellungen\" & Environ("Username") & "\Lokale Einstellungen\Temp", _
Destination:=Range("A1"))
ChDrive "C"
.Name = "Mustertext"
'usw.
End Sub