Hallo Severus,
danke für Deine schnelle Antwort.
Leider habe ich zur Zeit noch nicht viel Ahnung von der Programmiersprache. Habe mir ein Buch zugelegt: Jetzt lerne ich VBA mit Excel, sind auch schöne Beispiele drin, die alle funktionieren beim nachmachen. Aber wenn ich an ein eigenes Projekt komme, habe ich Probleme dieses zu programieren.
Ich war von der länge Deiner Programmierung sehr überrascht, dachte mit meinem Anfang würde es auch gehen, ist wohl ein typischer Anfängerfehler.
Habe deine Lösung versucht. Bekomme dann einen Laufzeitfehle 1004: MOE kann nur eine Spalte auf einmal konvertieren. Der Bereich kann mehrere Zeilen hoch sein, darf jedoch nicht mehr als eine Spalte breit sein. Markeiren Sie die Zellen einer einzelnen Spalte und versuchen Sie es erneuert.
Beim Debuggen markiert er die Zeile: Selection.TextToColumns DataType:=xlDelimited, textqualifier:=xlTextQualifierDoubleQuote, semicolon:= True
Weiß leider nicht wie ich Deinen Vorschlag: in die Tat umsetzten soll. Das könnte ja schon die Lösung sein ?!
Wenn Ich z.B. vier Dateinen auswähle, das finktioniert alles noch super und nach dem Laufzeitfehler auf den Beenden Button drücke fügt er nur die vierte Datei richtig in die Mappe ein. Meine Dateien haben zur Zeit beim Üben alle 6 Spalten, möchte aber gerne die Spaltenzahl variabel lassen.
Ich verstehe das mit dem Markieren auch noch nicht beim Fehler. Wenn ich eine Spalte in der Arbeitsmappe markiere indem ich sie einfach anklicke geht die Markierung beim umschlaten auf das MVB Fenster verloren und nicht geht mehr.
Würde mich über eine Rückmeldung von Dir sehr freuen, verstehe leider die meisten Befehle in Deinem Lösungsvorschlag zur Zeit noch nicht. Werde aber versuchen mich da rein zu arbeiten. Damit ich die Programmierung auch verstehe.
Ich hoffe, Du kannst mit meiner Antwort was anfangen. Habe versucht den Fehler möglichst genau zu beschreiben.
Danke im voraus für die Arbeit.
Saubermacher
|