|
Hallo zusammen,
ich bin absoluter VBA Anfänger.
Ich habe bereits dank Dr. Google eines meiner Probleme lösen können. Allerdings stehe ich nun vor einem weiteren Problem. Ich habe eine Tabelle mit 16 Spalten. Diese sieht wie folgt aus:
|
A |
B |
C |
D |
E |
F |
G |
H |
I |
J |
K |
L |
M |
N |
O |
P |
|
Re-Nummer |
Re-Datum |
Sendungsnummer |
Sendungsdatum |
Gewicht |
Referenz 1 |
Steuersatz |
Position |
Kosten |
Kosten je Container |
Empfänger |
Land |
PLZ |
Stadt |
Anzahl Container |
Referenz 2 |
|
123456 |
12.04.2019 |
123456789 |
10.04.2019 |
1000 |
abc123 |
19 |
Fracht |
1.000,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
2 |
HWX12345 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ATR12345 |
|
123456 |
12.04.2019 |
987654321 |
09.04.2019 |
1000 |
cba123 |
19 |
Nachlauf |
900,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
3 |
HWX12345 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
IUZ12345 |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
TUX12354 |
Die Spalten A bis O sollen kopiert werden und in die leeren Zeilen eingefügt werden. Die Spalte P enthält unterschiedliche Daten die bestehen bleiben müssen. Die Anzahl der leeren Zeilen variiert. Die gesamte Tabelle enthält zur Zeit über 2000 Zeilen und wird stetig ergänzt.
So soll die Tabelle aussehen:
|
A |
B |
C |
D |
E |
F |
G |
H |
I |
J |
K |
L |
M |
N |
O |
P |
|
Re-Nummer |
Re-Datum |
Sendungsnummer |
Sendungsdatum |
Gewicht |
Referenz 1 |
Steuersatz |
Position |
Kosten |
Kosten je Container |
Empfänger |
Land |
PLZ |
Stadt |
Anzahl Container |
Referenz 2 |
|
123456 |
12.04.2019 |
123456789 |
10.04.2019 |
1000 |
abc123 |
19 |
Fracht |
1.000,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
2 |
HWX12345 |
|
123456 |
12.04.2019 |
123456789 |
10.04.2019 |
1000 |
abc123 |
19 |
Fracht |
1.000,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
2 |
ATR12345 |
|
123456 |
12.04.2019 |
987654321 |
09.04.2019 |
1000 |
cba123 |
19 |
Nachlauf |
900,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
3 |
HWX12345 |
|
123456 |
12.04.2019 |
987654321 |
09.04.2019 |
1000 |
cba123 |
19 |
Nachlauf |
900,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
3 |
IUZ12345 |
|
123456 |
12.04.2019 |
987654321 |
09.04.2019 |
1000 |
cba123 |
19 |
Nachlauf |
900,00 € |
500,00 € |
ABC GmbH |
Deutschland |
12345 |
Stadt |
3 |
TUX12354 |
Das Makro soll den Inhalt der obersten Zeile kopieren, bis es auf eine gefüllte Zeile trifft. Problem hierbei ist, dass die Spalte P immer gefüllt ist. Es darf also nur die Spalten A bis O betrachten. Im Anschluss soll die nächste gefüllte Zeile wieder so oft kopiert werden, bis eine gefüllte Zeile (A bis O) auftaucht.
Ich habe bereits versucht das Makro aufzuzeichnen, aber da nimmt er natürlich immer nur die ausgewählten Zeilen und "springt" nicht weiter.
Gruß Diane
|