|
Hallo ihr Lieben alle,
ich benötige Hilfe in Bezug auf ein Makro für eine Sortierfunktion die folgendermaßen aufgebaut werden soll:
Fakten:
Es besteht eine Excel Liste bei welcher in Spalte A bestimmte Nummern (NrA) stehen (können auch mehrmals vorkommen), in Spalte B stehen Nummern (NrB) welche den NrA zugeordnet sind und in Spalte C sind die Beschreibungen zu den NrB. NrB haben eine bestimmte Hirarchie (z.B. kommt als oberstes 98989 (Tabellenblatt 2), dann 88998 (Tabellenblatt 3) und dann 7897 (Tabellenblatt 4)). Für jede NrB wird ein neues Tabellenblatt angelegt in denen Spalte A die Zahl der Einträge anzeigt.
Beispiel:
A B C
1234 98989 blablaba
1234 7897 ...
1111 98989 ...
1212 88998 ...
...
Weg zur Lösung:
Mein Ziel ist eine if-Schleife, welche meine NrA in ein neues Tabellenblatt der hierarchisch höchsten NrB überschreibt bzw. zuordnet.
Bei NrA= 1234 ist NrB=98989 die hierarchisch höchste Nummer, danach kommt erst 7897. Somit sollen alle NrA= 1234 in das Tabellenblatt 98989 geschrieben werden, auch NrA= 1234 mit NrB=7897.
In dem Tabellenblatt "98989" (Tabelle 2) steht also dann in:
Spalte A Spalte B Spalte C Spalte D
1 1234 98989 blablabla
1234 7897 blablabla
2 1111 98989 blablabla
...
Und die If-Schleife sollte ja dann so ca. aussehen, dass sie heißt
Wenn die Nummer aus Spalte A (Tabellenblatt 1) die Nummer 98989 in Spalte B enthält, dann übertrage die dazugehörige Nummer aus Spalte A (Tabelle1) und alle gleichen Nummern aus Spalte A mit ihrer kompletter Zeile in Tabellenblatt 2. (Dann sind die in Tabellenblatt 1 nicht mehr enthalten und können keinem hierarchisch niedrigerem Tabellenblatt zugeordnet werden).
Ich hoffe das war einigermaßen verständlich. Ansonsten bitte ich um Kritik und in erster Linie um ganz viel Hilfe!!!
Das wäre so super, wenn mir jemand einen Anstoß geben könnte!!! Ich habe nämlich zu wenig Erfahrung mit VBA Makros und würde gerne verstehen wie ich hierfür ein Makro schreiben kann.
Vielen lieben Dank schon mal, ich zähle auf eure Expertenmeinungen :)
Liebe Grüße
Isi
|