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

Makro; Zeile an aktueller Pos. einfügen

Makro; Zeile an aktueller Pos. einfügen
03.06.2003 13:56:34
Michael
Hallo zusammen,

ich habe folgendes Problem:

ich möchte eine bestimmte,formatierte Zeile (incl.Formeln) per Makro an einer aktuell, markierten Zeilenposition einfügen.
Am besten über ein Schaltflächensymbol.

Wer kann mir da helfen?

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

Betreff
Datum
Anwender
Anzeige
Re: Makro; Zeile an aktueller Pos. einfügen
03.06.2003 14:50:32
Mike E.

Hallo Michael,

angenommen, die zu kopierende Zeile ist Zeile1, dann folgenden Code deiner Schaltfläche zuweisen:

Gruß
Mike

Re: Makro; Zeile an aktueller Pos. einfügen
03.06.2003 15:32:29
Michael

Danke Mike,

hat super funktioniert!!

Re: Makro; Zeile an aktueller Pos. einfügen
04.06.2003 16:05:30
Michael

Hallo Mike,

ich bin´s doch nocheinmal.
1.Kann man den Befehl auch so schreiben, dass die Zeile eingefügt wird und die bereits bestehenden Zeilen nach unten verschoben werden.(z.Zt. überschreibt er die bestehenden Zeilen)
2.wie müßte der Befehl aussehen, wenn die einzufügenden Zeilen in einem anderen Arbeitsblatt stehen würden

Danke im voraus für Deine Hilfe.

Gruß
Michael

Anzeige
Re: Makro; Zeile an aktueller Pos. einfügen
05.06.2003 15:11:42
Mike E.

Hallo Michael,

das wundert mich etwas; es wird eine Zeile eingefügt (diese ist leer und wird zur ActiveRow...
Versuche es mit

Destination:=Rows(AciveCell.Row + 1)

Deine zweite Frage:

angenommen, die zu kopierende Zeile befindet sich in Tabelle2, so muss die zweite Zeile des obigen Codes wie folgt lauten:

Sheets("Tabelle2").Rows(1).Copy Destination:=ActicveSheet.Rows(ActiveCell.Row)

Viele Grüße
Mike

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige