Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
816to820
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
816to820
816to820
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

zeile einfügen auf 2 Seiten

zeile einfügen auf 2 Seiten
09.11.2006 08:46:17
Alex
Hallo Excelisten,
habe zwei Tabellen die genau Identisch sind. Jetzt möchte ich gerne per makro eine Zeile einfügen und dies soll auf beiden Seiten erstellt werden.
Mit folgendem Makro macht er mir dies nur auf einer Seite.

Sub zeile()
Sheets(Array("Geplante Schulung 2007", "Ausgeführte Schulung 2007")).Select
Selection.EntireRow.Insert
End Sub

Hoffe ihr könnt mir helfen
Gruß Alex

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zeile einfügen auf 2 Seiten
09.11.2006 08:54:08
Bertram
Hallo Alex,
du hättest auch im alten Thread bleiben können. hab's jetzt auch mal ausprobiert:
Nimm das EntireRow raus, dann geht's.
Gruß
Bertram
AW: zeile einfügen auf 2 Seiten
09.11.2006 11:11:36
Alex
Hi Bertram,
also wenn ich EntireRow entferne fügt er eine Zelle ein und ich möchte ja eine Zeile einfügen auf beiden Tabellenblättern.
Gruß Alex
AW: zeile einfügen auf 2 Seiten
09.11.2006 11:36:34
EtoPHG
Hallo Alex,
So:

Sub ZeileRein()
Dim ws As Worksheet
For Each ws In Worksheets(Array("Geplante Schulung 2007", "Ausgeführte Schulung 2007"))
ws.Rows(Selection.Row).Insert xlShiftDown
Next ws
End Sub

Gruss Hansueli
Danke jetzt klappt es o.T.
09.11.2006 11:40:18
Alex
Hi Hansueli,
super vielen Dank damit klappt es.
Gruß Alex
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige