Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA: Zellbereich kopieren und in anderes Blatt einfügen

VBA: Zellbereich kopieren und in anderes Blatt einfügen
09.09.2024 20:28:15
Fritz_W
Hallo Forumsbesucher,

ich benötige eure Hilfe wie folgt:
Ich möchte aus dem aktiven Tabellenblatt den Zellbereich S25:V25 kopieren und in das Tabellenblatt "Ergebnisse" in die erste leere Zeile der Spalte D in den Zellbereich D:G als Werte einfügen.
Für eure Unterstützung vielen Dank!

mfg
Fritz
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Zellbereich kopieren und in anderes Blatt einfügen
09.09.2024 20:43:03
Christian
ungetestet:

Sub Kopieren()

Dim wsAktiv As Worksheet
Dim wsErgebnisse As Worksheet
Dim letzteZeile As Long
Dim zielbereich As Range

Set wsAktiv = ActiveSheet
Set wsErgebnisse = Worksheets("Ergebnisse")

letzteZeile = wsErgebnisse.Cells(wsErgebnisse.Rows.Count, 4).End(xlUp).Row + 1

wsAktiv.Range("S25:V25").Copy

Set zielbereich = wsErgebnisse.Range("D" & letzteZeile & ":G" & letzteZeile)
zielbereich.PasteSpecial Paste:=xlPasteValues

Application.CutCopyMode = False

MsgBox "Zellbereich erfolgreich kopiert und eingefügt!"
End Sub
Anzeige
AW: VBA: Zellbereich kopieren und in anderes Blatt einfügen
09.09.2024 20:54:31
Fritz_W
Hallo Christian,
jetzt auch getestet, funktioniert wie gewünscht. Super!

Vielen Dank
mfg
Fritz
AW: VBA: Zellbereich kopieren und in anderes Blatt einfügen
09.09.2024 21:32:50
Christian
Hallo Fritz,

wenn du die absolute Kurzversion bevorzugst, probier es mit

Sub Kopieren()
With Worksheets("Ergebnisse")
.Cells(.Rows.Count, 4).End(xlUp).Offset(1, 0).Resize(1, 4).Value = ActiveSheet.Range("S25:V25").Value
End With
End Sub

auch ungetestet
Anzeige
AW: VBA: Zellbereich kopieren und in anderes Blatt einfügen
09.09.2024 22:29:38
Fritz_W
Hallo Christian,
Vielen Dank für die Alternative, die ich jedoch noch nicht testen konnte.
Werd ich morgen früh nachholen.
Ich gehe aber fest davon aus, dass auch dieser Code funktioniert.
Ich finde es aber großartig, wenn bei einer einwandfrei funktionierenden Lösung die Helfer sogar noch Alternativen anbieten.

VG Fritz

Anzeige
AW: VBA: Zellbereich kopieren und in anderes Blatt einfügen
10.09.2024 08:33:37
Fritz_W
Hallo Christian,

jetzt auch nach Test: auch diese Variante entspricht voll und ganz den gewünschten Anforderungen.

Vielen Dank und Gruß

Fritz
AW: VBA: Zellbereich kopieren und in anderes Blatt einfügen
10.09.2024 09:49:11
Christian
Gerne, freut mich dass ich helfen konnte.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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