Anzeige
Archiv - Navigation
160to164
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
160to164
160to164
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Leerzeilen einfügen

Leerzeilen einfügen
25.09.2002 07:31:59
Josef
Guten Morgen!
Ich habe z.B. in Tabelle1 Spalte A Daten stehen.
Nun möchte ich nach 106 Zeilen 10 Leerzeilen einfügen.
Danach wieder nach 106 Zeilen aber von Zeile 117 weg usw.
Gäbe es hier vielleicht eine VBA Lösung?

Danke für eine eventuelle Hilfe

Josef

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Leerzeilen einfügen
25.09.2002 08:00:36
Jimmy
Hi Josef.

Mit diesem Code müsste es klappen:


Sub ZellenEinf()
'Dieses Makro fügt nach jeweils 106 Zeilen 10 leere Zeilen ein.
'Das ganze wird 30 mal wiederholt
Dim x As Integer
Dim y As Integer
Dim z As Double
z = 1
For y = 1 To 30 'wiederholungen
z = z + 106
For x = 1 To 10
Rows(z).Select
Selection.Insert Shift:=xlDown
z = z + 1
Next
Next
End Sub


Gruß,
Michael

Re: Leerzeilen einfügen
25.09.2002 08:39:17
Josef
Hallo Michael!

Danke, klappt alles.

Schönen Tag noch


Josef

Re: Leerzeilen einfügen
25.09.2002 08:48:14
Becker
Wenn diese Leerzeilen für Spaltenbeschriftungen genutzt werden soll, dann schau das Menü [Datei]-->[Seite einrichten] an. Oder eine Schleife muss das Problem lösen

mfg Becker

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige