|
Hallo,
ich habe eine große Tabelle in der in einer Zeile mehrere Strings stehen. Diese sind durch Leerzeichen getrennt.
In der Zeile kommen nun einige dieser Strings doppelt vor. Diese will ich auomatisch suchen und löschen.
Jetzt suche ich nach einem VBA Code mit ungefähr diesem Ablauf: (meine VBA Kenntnisse sind eher auf Status Anfänger)
10 Wähle (ersten) String innerhalb der Zeile
20 Vergleiche Strings der anderen Zeilen ob gleich
20 wenn ja lösche diesen String
30 Gehe zu nächstem Sting innerhalb gleicher Zeile / naächstem String in nächster Zeile
40 GOTO 20
Die Tabelle sieht z.B. so aus:
In Zeile A sollen doppelte Strings von oben nach unten gesucht und ersetzt werden.
Hier würden z.B. die fett gedruckten Werten gelöscht werden weil schon weiter oben vorhanden.
-
| |
A |
B |
| 1 |
A101 A102 A103 |
aa |
| 2 |
A104 A105 |
bb |
| 3 |
B101 B102 B303 B304 |
cc |
| 4 |
B105 A102 |
dd |
| 5 |
B106 B101 |
ee |
| 6 |
A104 A110 |
ff |
| |
|
|
| |
|
|
| |
|
|
| |
|
|
| |
|
|
| |
|
|
| |
|
|
Für Hinweise und Lösungen wäre ich sehr dankbar.
VG Johannes
|