Das Archiv des Excel-Forums
Werte bestimmter Zellen in anderes Tabellenblatt
- Werte bestimmter Zellen in anderes Tabellenblatt von Andreas vom 10.10.2003 13:50:51
- AW: Werte bestimmter Zellen in anderes Tabellenblatt - von WernerB. am 10.10.2003 14:36:04
- AW: Werte bestimmter Zellen in anderes Tabellenblatt - von Andreas am 10.10.2003 14:49:53
- AW: Werte bestimmter Zellen in anderes Tabellenblatt - von Andreas am 10.10.2003 14:49:53
- AW: Werte bestimmter Zellen in anderes Tabellenblatt - von WernerB. am 10.10.2003 14:36:04
 |
Betrifft: Werte bestimmter Zellen in anderes Tabellenblatt
von: 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
 |
Betrifft: AW: Werte bestimmter Zellen in anderes Tabellenblatt
von: WernerB.
Geschrieben am: 10.10.2003 14:36:04
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).
|
Betrifft: AW: Werte bestimmter Zellen in anderes Tabellenblatt
von: Andreas
Geschrieben am: 10.10.2003 14:49:53
Salü Werner,
funktioniert einwandfrei, vielen Dank und ein schönes Wochenende!!
| |
