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

Forumthread: VBA: Daten in anderes Tabellenblatt

VBA: Daten in anderes Tabellenblatt
27.07.2020 21:41:35
Fritz_W
Hallo Forumsbesucher,
erneut brauche ich Hilfe durch VBA-kundige in folgender Angelegenheit:
Ich möchte den Zellbereich A2:A18 des Tabellenblatts "Daten" kopieren und als Werte in das Tabellenblatt "Datensicherung" in den Zeilenbereich 2:18 einfügen und zwar immer in die erste leere Spalte der Zeile 2.
Beispiel: Sind in "Datensicherung" in A2 und B2 Werte enthalten und ist C2 leer, sollte Daten!A2:A18 als Werte in Datensicherung!C2:C18 eingefügt werden.
Im Voraus besten Dank für eure Unterstützung.
mfg
Fritz
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: VBA: Daten in anderes Tabellenblatt
27.07.2020 23:51:23
fcs
Hallo Fritz,
hier ist das Makro
LG
Franz

Sub prcCopyA2_A18()
Dim wksQ As Worksheet, wksZ As Worksheet
Dim spaZ As Long
Set wksQ = ActiveWorkbook.Worksheets("Daten")
Set wksZ = ActiveWorkbook.Worksheets("Datensicherung")
With wksZ
spaZ = .Cells(2, .Columns.Count).End(xlToLeft).Column
If spaZ = 1 And .Cells(2, 1) = "" Then
spaZ = 1
Else
spaZ = spaZ + 1
End If
wksQ.Range("A2:A18").Copy
wksZ.Cells(2, spaZ).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End With
End Sub

Anzeige
AW: VBA: Daten in anderes Tabellenblatt
28.07.2020 04:45:03
Fritz_W
Hallo Franz,
super, funktioniert wie gewünscht.
Hast mir sehr geholfen.
Nochmals vielen Dank
mfg
Fritz
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige