Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1772to1776
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
Inhaltsverzeichnis

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

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

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
Anzeige

320 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige