Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
1164to1168
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
Inhaltsverzeichnis

Zeilen einfügen mit VBA-Code

Zeilen einfügen mit VBA-Code
HaKa
Hallo Forum
Ich möchte in einer bestehenden Tabelle, Bereich A3:U150, resp. nach jeder der 147 Zeilen jeweils 10 neue, leere Zeilen einfügen. Wie lautet der Code?
Gruss Heinz

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zeilen einfügen mit VBA-Code
06.07.2010 20:53:12
Josef

Hallo Heinz,
vielleicht so?

Sub insertRows()
  Dim rng As Range
  Dim lngRow As Long
  
  On Error GoTo ErrExit
  Application.ScreenUpdating = False
  
  Set rng = Range("A3:U150")
  
  
  For lngRow = rng.Rows.Count - 1 To rng.Row - 1 Step -1
    rng.Rows(lngRow).Resize(10, rng.Columns.Count).Insert xlDown
  Next
  
  ErrExit:
  Application.ScreenUpdating = True
  Set rng = Nothing
End Sub

Gruß Sepp

Anzeige
AW: Zeilen einfügen mit VBA-Code
06.07.2010 21:06:56
HaKa
Hallo Sepp
Vielen Dank, funktioniert super.
Ich wünsche Dir einen schönen Abend.
Gruss Heinz

330 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige