Supportnet / Forum / Tabellenkalkulation

Hallo. Mit diesem Befehl "Selection.EntireRow.Insert" kann ich eine neue Zeile einfügen! Jedoch fügt er die neue Zeile überhalb der ausgewählten Zeile ein. Wie mache ich es, dass die neue Zeile unterhalb der ausgewählten Zeile einfügt? 2te Frage: Wie geht es, dass er 2 Zeilen unterhalb der ausgewählten Zeile einfügt? Gruß Jockel [*][sup][i] *Threadedit* 30.11.2008, 16:52:55 Admininfo: Führ bitte einen Thread nicht fort indem du Weitere eröffnest, und vermeide Mehrfachanfragen. Die Datenbank und User werden es dir danken. Siehe [u][url=https://supportnet.de/faqsthread/840]FAQ 2, #3[/url][/u].[/i][/sup]

hi Jockel

das duerfte beide fragen beantworten

gruss nighty

Rows(Selection.Row+1).EntireRow.Insert

Aber was muss ich eingeben, dass er zwei Zeilen einfügt.

Gruß
Jockel

Noch was.

Was muss ich eingeben, damit der Inhalt mit kopiert wird?

Gruß
Johannes

Hi Jockel

hier noch zwei beispiele

gruss nighty

geht eine zeile tiefer und fuegt zwei zeilen ein

Rows(Selection.Row + 1 & ":" & Selection.Row + 2).EntireRow.Insert

geht zwei zeilen tiefer und fuegt eine zeile ein

Rows(Selection.Row + 2).EntireRow.Insert

Cool Danke.

Vieleicht kannst du mir noch was zu meiner Antwort 3 zum Thema "inhalt" schreiben.

Gruß
Johannes

Hi Jockel

ein beispiel

gruss nighty

Sub SelectCopy()
Rows(Selection.Row + 1 & ":" & Selection.Row + 2).EntireRow.Insert
Rows(Selection.Row).Copy Rows(Selection.Row + 1 & ":" & Selection.Row + 2)
End Sub

Jetzt ist nur das Problem, das die 2 Zeilen drunter überschrieben werden. Das ist aber nicht gut.

Gruß
Jockel

Hi Jockel

ein weiteres beispiel fuer nur werte,altenativ paste spezial

gruss nighty

Sub SelectCopyWert()
Dim zeile As Variant
Rows(Selection.Row + 1 & ":" & Selection.Row + 2).EntireRow.Insert
zeile = Rows(Selection.Row)
Rows(Selection.Row + 1 & ":" & Selection.Row + 2) = zeile
End Sub

Hi Jockel

ich schau nochmal,welches makro benutzt du jetzt ?

gruss nighty

Hi Nighty

Hab eine Button generiert und ein normales Makro hinterlegt.

Oder was meinst du?

Gruß
Jockel

Hi Jockel

welchen vorschlag von mir benutzt du jetzt ?
dann schau ich da nochmal

gruss nighty

Hat sich alles geklärt. Danke nochmal.

Hi nighty,

Jetzt hab ich doch noch ein Problem.

Arbeite mit deiner Antwort 8. Jetzt werden zwar die Inhalte kopiert, aber die Formeln in den Zellen werden nicht kopiert.
Kannst du mir da weiter helfen?

Gruß
Jockel

• mehrere Zeilen in Excel einfügen
• Makro - Zeilen einfügen mit Spaltenbegrenzung
• Zeilen einfügen
• Zeilen nacheinander kopieren und einfügen
• Makro: bestimmte Zeilen immer wieder einfügen