HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Werte bestimmter Zellen in anderes Tabellenblatt

Werte bestimmter Zellen in anderes Tabellenblatt
10.10.2003 13:50:51
Andreas
Hallo, habe ein kleines Problem, ich will Werte aus bestimmten Zellen ohne hinterlegte Formeln (bringt Fehler Bezug) in eine andere Tabelle übertragen.
Habe es auf diesem Weg probiert, bringt aber oben genannten Fehler.


Sub uebertragen()
Dim IRow As Long
With Worksheets("daten ps (primecast)")
IRow = .Cells(Rows.Count, 1).End(xlUp).Row + 1
Range("aa2:ai2").Copy .Cells(IRow, 1)
.Range(.Cells(IRow, 10), .Cells(IRow, 10)).Value = Date
End With
Application.CutCopyMode = True
End Sub


Wäre glücklich für eine funktionierende Lösung

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

Betreff
Datum
Benutzer
AW: Werte bestimmter Zellen in anderes Tabellenblatt
10.10.2003 14:36:04
WernerB.
Hallo Andreas,

was hältst Du hiervon:

Option Explicit

Sub uebertragen()
Dim IRow As Long
With Worksheets("daten ps (primecast)")
IRow = .Cells(Rows.Count, 1).End(xlUp).Row + 1
.Range(.Cells(IRow, 1), .Cells(IRow, 9)).Value = _
Range("AA2:AI2").Value
.Cells(IRow, 10).Value = Date
End With
Application.CutCopyMode = True
End Sub

Viel Erfolg wünscht
WernerB.

P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).
AW: Werte bestimmter Zellen in anderes Tabellenblatt
10.10.2003 14:49:53
Andreas
Salü Werner,

funktioniert einwandfrei, vielen Dank und ein schönes Wochenende!!

301 Forumthreads zu ähnlichen Themen

Meistgelesene Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Ihre Stimme zählt!