Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
544to548
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
544to548
544to548
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Kopieren in die letzte Zeille eine Tabelle
13.01.2005 08:36:38
OliKoch
Hallo
ich möchte gerne aus dem aktiven Tabellenblatt (der Name ändert sich immer wenn ich ein neues Blatt einfüge), bestimmte Zellen ( K28, J 28) in ein anderes Tabellenblatt (Übersicht) kopieren und zwar immer in die letzte frei Zeile.
Wer kann mir diese Lösung schreiben?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopieren in die letzte Zeille eine Tabelle
Galenzo
Activesheet.Range("J28:K28").Copy Sheets("Tabelle2").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)
die erste freie Zelle wird hier in Spalte A gesucht.
AW: Kopieren in die letzte Zeille eine Tabelle
13.01.2005 09:00:56
OliKoch
hallo Galenzo
danke für die schnelle Hilfe. Aber ich bekomme einen Fehlerhinweis. Die "1" nach Offset ist dann blau makiert und der Hinweis lautet: außerhalb der Prozedur nicht möglich
welchen fehler habe ich gemacht?

Private Sub CommandButton1_Click()
ActiveSheet.Range("j28:K28").Copy Sheets("Tabelle2").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)
End Sub

AW: Kopieren in die letzte Zeille eine Tabelle
Galenzo
kann ich nicht nachvollziehen - funktioniert anstandslos.
prüfe mal auf Schreibfehler - oder füge mit Kopieren/Einfügen ein...
Anzeige

271 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige