Zellen einfügen per 4.0 Makro

Question

Hallo zusammen,

ich habe eine etwas knifflige Angelegenheit. Ich möchte ein Makro erstellen (4.0 Makrovorlage, nicht VBA) bei dem folgendes passieren soll:

Ich habe eine Liste mit ca. 30.000 Zeilen mit Daten. Das Makro soll alle 30.000 Zeilen durchlaufen und sollte in der Zelle A1 "xy" stehen unterhalb des Zellbereiches B1:G1 Leerzellen einfügen, wobei die Anzahl der Spalten fix ist 6 und Anzahl der Zeilen in der Zelle G1 definiert ist. Es ändert sich somit in jeder Zeile der einzufügenden Zellen.
Die Sache mit der Schleife habe ich schon hinbekommen das Makro durchläuft die 30.000 Zeilen, aber die Leerzellen einfügen klappt gar nicht.

Wer kann mir helfen???

Gruß Steffen

Answer 1

hi steffen ^^

dann nicht so schüchtern und zeige uns mal deinen bisherigen code :-))

gruss nighty

Answer 2

Mein bisherig geschriebenes Makro:

=ECHO(FALSCH)
=JETZT()

=ARBEITSMAPPE.AUSWÄHLEN("Locations with priority";"Locations with priority")
=AUSWÄHLEN(!$L$2)
=KOPIEREN()
=ARBEITSMAPPE.AUSWÄHLEN("Locations with priority";"Locations with priority")
=AUSWÄHLEN(!$M$1)
=EINFÜGEN()
=ARBEITSMAPPE.AUSWÄHLEN("Locations with priority";"Locations with priority")

=AUSWÄHLEN(!$N$6)
=FÜR("shelftyp";1;30000)
=WENN(AKTIVE.ZELLE()=!vglshelftyp)
=NAMEN.FESTLEGEN("space1")
=KOPIEREN("Z(0)S(2)")
=AUSWÄHLEN(!$P$1)
=EINFÜGEN()
=NEUBERECHNEN()
=ARBEITSMAPPE.AUSWÄHLEN("Locations with priority";"Locations with priority")
=AUSWÄHLEN(!space1)
=AUSWÄHLEN("Z(0)S(0):Z()S(5)")


=AUSWÄHLEN(BEREICH.VERSCHIEBEN(AUSWAHL();(!$P$1-1);0))
=AUSWÄHLEN(!space1)
=ENDE.WENN()
=AUSWÄHLEN("Z(1)S(0)")
=WEITER()



=JETZT()
=ARBEITSMAPPE.AUSWÄHLEN("Locations with priority";"Locations with priority")
=AUSWÄHLEN(!$A$1)
=SPEICHERN()
=WARNUNG(TEXT(B34-B3;"HH:MM:SS"))
=RÜCKSPRUNG()

Answer 3

hi steffen und all ^^

einige syntax kenne ich ,aber mit dieser kenne ich mich leider nicht aus :-(

ein versuch war es allemale wert :-)

hoffe nun das andere user vielleicht helfen koennen :-)

gruss nighty