Live-Forum - Die aktuellen Beiträge
Datum
Titel
07.11.2025 12:58:46
Fehlersuche Ereignismakro
07.11.2025 12:34:41
Datum aus Blatt- und Dateinamen bilden.
07.11.2025 12:01:16
Summewenn, Indirekt und eine zusätzliche Bedingung
06.11.2025 16:16:08
In einer Zelle die Anzahl der Zahlen zählen die durch ; getr
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1864to1868
1864to1868
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit Button Zellbereich kopieren

Forumthread: Mit Button Zellbereich kopieren

Mit Button Zellbereich kopieren
22.01.2022 09:40:53
Holger
Hallo an alle,
ich benötige bitte Eure Unterstützung bei folgender Problemstellung:
Mittels Commandbutton soll aus Tabelle 3 der Bereich A1:D33 nach Tabelle 1 A64:D96 kopiert werden.
Beim erneuten betätigen des Commandbuttons soll der Bereich A1:D33 aus Tabelle 3 dann in Tabelle 1 A97:D129 kopiert werden usw.
Letztendlich soll mit jedem Klick auf den Button das Dokument in Tabelle 1 schrittweise ergänzt werden.
Ich hoffe mich verständlich ausgedrückt zu haben.
Vielen Dank und Gruß
Holger
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Mit Button Zellbereich kopieren
22.01.2022 10:54:17
GerdL
Moin Holger!

Sub Unit()
Dim Ziel As Range
Dim Quelle As Range
Set Quelle = Worksheets("Tabelle3").Range("A1:D33")
With Worksheets("Tabelle1")
Set Ziel = .Cells(Application.Max(97, .Cells(.Rows.Count, 1).End(xlUp).Row), 1)
End With
Quelle.Copy Destination:=Ziel
Set Quelle = Nothing: Set Ziel = Nothing
End Sub
Gruß Gerd
Anzeige
AW: Mit Button Zellbereich kopieren
22.01.2022 11:19:09
Holger
Guten Morgen Gerd,
vielen Dank für Deine schnelle Antwort.
Ich habe deinen Code getestet, allerdings wird nichts kopiert.
Habe auch im Einzelschritt probiert, leider ohne Erfolg.
Mache ich etwas falsch?
Gruß
Holger
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige