Range Copy - Range PasteSpecial xlPasteValues
09.05.2008 22:41:00
Peter
Ich möchte die Werte eines benannten Bereichs (Teil einer Spalte) in eine andere Tabelle kopieren, die erste Zelle ist mit "vStart" benannt.
Bei der dritten Zelle stoppt dieser Code. Kann ich nicht beim Einfügen nur eine Zelle in Form eines benannten Bereiches angeben?
Danke für eine Antwort.
Peter
Sub CopyValorenBank()
Range("Löschen") = "" ' "Löschen" benannter Bereich in Tabelle "Vergleich"
Range("k_Bank").Copy ' "k_Bank" benannter Bereich in Tabelle "Bank"
Range("vStart").PasteSpecial Paste: xlPasteValues ' "vStart" =Zelle in Tab"Vergleich"
Application.CutCopyMode = False
End Sub