Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
280to284
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
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeile einfügen und kopieren

Zeile einfügen und kopieren
18.07.2003 19:11:26
Udo
Hallo habe folgende VBA verändert und brauche Hilfe:
möchte eine Zeile unterhalb der aktiven Zelle löschen und mit Daten aus Zelle 100 füllen!
Frage wie kann ich beim Range anstelle die feste Zelle "A9" eine variabel oder die aktuelle Zelle als Copy Zelle einsetzen?


Sub Ohne_Format_Verschieben()
z = ActiveCell.Row
s = ActiveCell.Column
Cells(z + 1, s).Value = Cells(z, s).Value
Selection.ClearContents
Rows("100:100").Select
Selection.Copy
Range("A9").Select
ActiveSheet.Paste
End Sub

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

Betreff
Datum
Anwender
Anzeige
AW: Zeile einfügen und kopieren
18.07.2003 19:35:02
Mike E.
Hallo,
wenn es die Zelle unterhalb der Aktiven Zelle sein soll, dann so:
ActiveCell(2,1).Select
Gruß
Mike

AW: Zeile einfügen und kopieren
18.07.2003 19:56:38
Udo
Hat prima geklappr aber der Curser bleibt bei Zeile 100 stehen.
Wie kann ich ihn auf die eingefügte Leerzeile springen lassen?

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige