ich versuche ein Makro etwas komfortabler zu gestalten.
Zur Zeit verwende ich folgenden Befehl um von Hand eine Datei auszuwählen und aus dieser dann eine Spalte zu kopieren.
Dim strDatei, wks As Worksheet
strDatei = Application.GetOpenFilename("Textdateien " & _
"(*.csv),*.csv")
If strDatei False Then
Set wks = Workbooks.Open(strDatei).Sheets(1)
Else
Exit Sub
End If
Range("B1:B97").Copy
wks.Parent.Close False
Set wks = Nothing
Nun würde ich zum einen gerne im Makro schon einen Pfad vorgeben der geöffnet werden soll. So das ich nicht erst mühsam in den entsprechenden Ordner wechseln muss.Und/Oder wenn möglich das anhand des Dateinames der geöffneten Datei auf die das Makro angewendet wird eine bestimmte Datei geöffnet wird.
Z.B. Datei 123DW.CSV ist geöffnet und wird bearbeitet, daraufhin soll aus Pfad C:\Beispiel\ die Datei 123RPT.CSV geöffnet werden. D.h. es ändert sich im Dateinamen immer der selbe Buchstabencode am ende. Also von ABC123DW zu ABC123RPT.
Fall dies von interesse ist, die Datei 123DW.CSV liegt allerdings nicht im entsprechenden Verzeichnis aus dem die Datei 123RPT geöffnet werden soll.
Ist dies umsetzbar und wenn ja, wie?
Danke.
Joker