Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
284to288
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
284to288
284to288
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

VBA: Copy_Destination

VBA: Copy_Destination
30.07.2003 17:20:29
Franz W.
Hallo Fachleute,
ich versuche wie folgt zu kopieren:
Worksheets("Offene").Range(Cells(rw, 1), Cells(rw, 11)).Copy _
Destination:=Worksheets("bez" & jZahl).Range(Cells(loLetzte + 1, 1), Cells(loLetzte + 1, 11))
Geht aber nicht, es kommt: " Anwendungs- oder objektdefinierter Fehler. "
Könnt Ihr mir bitte helfen, was ich da falsch mache?
Ein herzliches Dankeschön im Voraus und Grüße
Franz

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Copy_Destination
30.07.2003 18:13:27
Knut
Worksheets("Offene").Range(Cells(rw, 1), Cells(rw, 11)).Copy _
Worksheets("bez" & jZahl).Cells(loLetzte + 1, 1)
Knut

AW: VBA: Copy_Destination
30.07.2003 18:13:51
GerdZ
Hallo Franz,
mit der Angabe von .Address bei Cells() sollte es funktionieren:

Worksheets("Offene").Range(Cells(rw, 1).Address, Cells(rw, 11).Address).Copy _
Destination:=Worksheets("bez" & jZahl).Range(Cells(loLetzte + 1, 1).Address, Cells(loLetzte + 1, 11).Address)
Gruß
Gerd

Vielen Dank!!
30.07.2003 18:42:08
Franz W.
Hallo Knut, hallo Gerd,
danke Euch beiden, es klappt beides. Und, Knut, wenn ich Deines anpasse, dann geht sogar mein Ansatz:
Worksheets("Offene").Range(Cells(rw, 1), Cells(rw, 11)).Cut _
Destination:=Worksheets("bez" & jZahl).Cells(loLetzte + 1, 1)
Vielen Dank und Grüße
Franz

Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige