Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1188to1192
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1188to1192
1188to1192
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Problem mit Copy Destination

Problem mit Copy Destination
Peter
Guten Abend
Was ist an dieser untenstehender Codezeile falsch (Anwendungs- oder objektdefinierter Fehler)?
Es gibt sowohl die Tabelle "VK01" als auch "VKQ1"
lngEnd1 = 14
lngEnd = 5
Wo liegt das Problem?
Gruss, Peter
Sheets("VK01").Range(Cells(5, 1), Cells(lngEnd1, 1)).Copy Destination:=Sheets("VKQ1").Cells(lngEnd, 1)

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

Betreff
Benutzer
Anzeige
AW: Problem mit Copy Destination
22.11.2010 23:14:23
Uduuh
Hallo,
mangelhafte Referenzierung. 
Sheets("VK01").Range(Sheets("VK01").Cells(5, 1), Sheets("VK01").Cells(lngEnd1, 1)).Copy Destination:=Sheets("VKQ1").Cells(lngEnd, 1)

oder in einen With-Rahmen packen 
With Sheets("VK01")
.Range(.Cells(5, 1), .Cells(lngEnd1, 1)).Copy Destination:=Sheets("VKQ1").Cells(lngEnd, 1)
End With

Gruß aus’m Pott
Udo

AW: Vielen Dank !! owT
22.11.2010 23:31:10
Peter
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige