Nach jeder Zeile 3 Leerzeilen - Excel Makro

Hallo,

ich hätte noch ein Makro, das dir darunter eine Leerzeile einfügt mit dem überschüssigen Text. Dann wäre der lange Text in zwei Zeilen, aber nicht mit Zeilenumbruch.

Claus

Hallo Claus,

super - das sieht gut aus. Das einzige was mir daran auffällt ist, dass die Cities nach dem Komma eine Leerzeile haben. Also 1, 2, 3 und diese Leerzeile sollte nicht erscheinen also so 1,2,3,4 ect.

Was muss ich da im Makro ändern?

Gruß Alex

Hallo Sascha,



um Zeilen einzufügen muss es nicht unbedingt ein Makro sein. Du könntest eine Spalte zur Nummerierung einfügen, Zeile 51 eine 1 und Zeile 52 eine 2 eintragen, dann beide Zellen markieren und bis ans Ende deiner Daten herunterziehen. Mit der bestehenden Markierung
die Nummerierung kopieren und unterhalb der letzten Nummer nochmals einfügen. Wenn du dann nach dieser Spalte sortierst, wird dir jede zweite Zeile eine Leerzeile eingefügt. Danach kannst du die Nummerierungsspalte löschen.



Mit freundlichen Grüßen

Claus

Hmm, also ich finde es immer wieder erstaunlich wie gut Excel „erahnt“, welche Zelle ich wohl als nächstes ausfüllen möchte. Es kann gut sein, dass Excel auch deine Systematik nach einer gewissen Zeit „verinnerlicht“. Ansonsten könntest/müsstes du Excel
mit einem kleinen Makro auf die Sprünge im wahrsten Sinne des Wortes helfen. Deinem Bild habe ich entnommen, dass beim Erreichen der Zeile 35 in die Zeile 3 mit jeweils 3 Spalten Versatz gesprungen werden soll:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row = 35 Then Target.Offset(-32, 3).Select
End Sub

Das Makro muss ins Codemodul des Tabellenblatts und die Datei muss als Arbeitsmappe mit Makros (xlsm) gespeichert werden. Beim nächsten Start ist dann noch eine Sicherheitsmeldung zu bestätigen, danach sollte es funktionieren. Es reicht allerdings nicht
aus, nur den Haken in der Adressleiste zu betätigen, du musst ENTER drücken, als wolltest du in die Zeile 35 gelangen. Diese Zeile kann dann nicht mehr ausgefüllt werden.

Freundliche Grüße

Danke für die Idee: Es wäre zu schön gewesen! Leider bleibt sich das Resultat gleich.

Wenn ich aber die Inhalte der (ja eigentlich ""-leeren) Felder in den Leerzeilen manuell lösche, dann klappt der Befehl. Excel betrachtet anscheinend die ""-leeren Felder als belegt!

Mein Ablauf:

Ich kopiere X Zeilen aus Datenbank A auf ein Arbeitsblatt und sortiere nach Artikelcode, womit die Leerzeilen unterhalb der Artikel sind.

Dann kopiere ich X Zeilen aus Datenbank B auf das Arbeitsblatt - und zwar ab der bewussten letzten benutzten Zeile.

Nur: wie wähle ich die an?

Dankeschön für die freundlichen Bemühungen.