ich habe folgendes Problem. In meiner Tabelle "Übersicht" die wie folgt aufgebaut ist:
A B C D E .... AU
Spaltenüberschrift SNR SATZART SYS MUSTER .... TEXT1
2 x-Adresse Start 1 22 24 28 601
3 x-Adresse Ende 21 23 27 31 1000
4 x-Adresse von - bis 1-21 22-23 24-27 28-31 601-1000
5 x-Adresse Länge 21 2 4 4 400
stehen im Bereich (B6:AU999) meine Werte:
6 A1234 01 xyz 0123 test
7 Y12 01 yxzw 0123 test-test
8 Z12398 01 x 4321 test-test-test-test
9 X0008 01 qwet 518 test
... .... ... ... .... ....
999 B1234889 01 yxzw 518 test
Ich würde gerne per VBA-Makro, die Information die in den jeweiligen (B6:AU6), (B7:AU7),...,(B999:AU999) also datensatzweise in einen String pro Zeile (z.B. Zeile 6: A1234 01xyz 0123test) verketten. Hierbei soll aber nicht nur verkettet werden, sondern vielmehr immer die jeweilige erlaubte Länge pro Spalte (siehe Excel-Zeile 5) berücksichtigt werden. D.h. für Zelle B6 gesprochen ist die Information 5 Zeichen lang, die Maximallänge laut Zelle B5 für diese Spalte ist jedoch 21 Zeiche, d.h. es sind noch 16 Leerzeichen anzuhängen um auf die Maximallänge zu erhalten. Für jede Zelleninhalt im Bereich B6:AU999 ist also der jeweilige Wert, mit dem jeweiligen Feldlängenwert in der Zeile 5 zu vergleichen und evt. Leerzellen einzubinden. Das Non-Plus-Ultra wäre dann noch wenn das Ergebnis, sprich die "Strings" in eine txt-Datei mit fester Breite exportiert werden können.
Hintergrund ist, das testdaten für eine Schnittstelle erzeugt werden sollen. Der gesamte String pro Datensatz hat eine Länge von 1.000 Zeichen und wir sequentiell von der Schnittstelle aus der TXT-Datei gelesen.
Ich hoffe meine Erläuterungen von oben sind verständlich genug. Kann mir einer hierbei helfen?
Ich bin für jeden Input dankbar!
VG
M.May