Hallo liebe Forum-Gemeinde,
ich bin absoluter VBA (Makro) Noob und habe ein Problem in Excel, welches sich anscheinend nur damit lösen lässt. Ich versuche schon seit einigen Tagen eine Lösung zu finden, ich verzweifle aber so langsam.
Es handelt sich um folgendes Problem:
Ich hole Daten aus einem anderen Programm (mehrere hundert Zeilen lang - das hier ist ein Beispiel):
Name Kategorie Data1 Data2
Lorem Ipsum111 Application Verantwortung1 SAP;JAVA
Lorem Ipsum222 Service Verantwortung2 JAVA
Lorem Ipsum333 End-User Computing Verantwortung3 Others
Lorem Ipsum444 End-User Computing Verantwortung4
Lorem Ipsum555 Service Verantwortung5 JAVA;Others
Lorem Ipsum666 Modul Verantwortung6 Mainfraime A;Mainframe B;Java
Lorem Ipsum777 Application Verantwortung7
Ich möchte bzw. muss die Daten aus "Data2", welche hinter dem ";" liegen aus der Zeile löschen und in die darunter liegende ZEILE in "Data2" einfügen und die Spalten Name, Kategorie und Data1 sollen ebenfalls dahin kopiert werden. Sodass ich in der Spalte "Data2" nur noch maximal einen einzigen Wert habe. Manche Zellen besitzen keinen Wert, manche direkt nur einen, manche aber auch drei oder mehr Werte durch ein ";" getrennt.
Das Ergebnis sollte dann folgendermaßen aussehen:
Name Kategorie Data1 Data2
Lorem Ipsum111 Application Verantwortung1 SAP
Lorem Ipsum111 Application Verantwortung1 JAVA
Lorem Ipsum222 Service Verantwortung2 JAVA
Lorem Ipsum333 End-User Computing Verantwortung3 Others
Lorem Ipsum444 End-User Computing Verantwortung4
Lorem Ipsum555 Service Verantwortung5 JAVA
Lorem Ipsum555 Service Verantwortung5 Others
Lorem Ipsum666 Modul Verantwortung6 Mainfraime A
Lorem Ipsum666 Modul Verantwortung6 Mainframe B
Lorem Ipsum666 Modul Verantwortung6 Java
Lorem Ipsum777 Application Verantwortung7
Um diese Daten für meinen Zweck weiter zu verwerten reicht es nicht aus, die Daten aus "Data2" in mehrere Spalten zu verteilen, weil das mein Ergebnis verfälscht :(
Ich hoffe ihr könnt mir bei dem Problem irgendwie weiter helfen!?
Liebe Grüße
|