|
Hallo Zusammen,
ich brauche bitte dringend eure Hilfe.
Und zwar möchte ich in einer Excel Tabelle durch eine Schaltfläche die aktuellste Datei öffnen und wie unten beschrieben bearbeiten.
Die Dateien haben immer die selbe Endung (.col)
Ich habe auch bereits folgenden Makro erstellt, aber so zieht er mir nur explizit die .col Datei die ich im Verzeichniss ausgewählt habe.
Aber wir erstellen jeden Tag eine neue und ich möchte den kompletten Vorgang im Makro automatisch mit der neusten Datei durchführen.
Die .col Datein sind immer so aufgebaut DFT12220443.COL (DFT= ORT / 12= Monat / 22=Tag / 0443= Uhrzeit)
Nach dem öffnen der .col Datei muss ich es immer mit dem Textkonventierungs-Assistent trennen deshalb auch im Makro der StartRow bereich, anschliesend kopier ich die datei und füge es in eine separate Tabelle ein. Im Makro funktioniert alles super bis auf das auswählen mit der neusten Datei.
Mein Makro:
Sub Makro1()
'
' Makro1 Makro
'
Workbooks.OpenText Filename:= _
"C:\Users\Z378\Desktop\test\col\DFT12220443.COL", Origin:=xlMSDOS, _
StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 2), Array(10 _
, 2), Array(23, 2), Array(35, 2), Array(39, 2), Array(47, 2), Array(61, 2)), _
TrailingMinusNumbers:=True
Cells.Select
Selection.Copy
Windows("TNT HLG.xls").Activate
Cells.Select
ActiveSheet.Paste
End Sub
Ich danke euch im vor raus für eure Hilfe.
|