PDA

Vollständige Version anzeigen : Bloß wert einfügen


Westi30
15.09.2011, 09:26
Hi Leute,
ich habe glaube ich ein Denke Fehler.

Ich Kopiere ein Formel aus einen Tabellenblatt in ein anders und will bloß den Wert in der Zeile stehen haben, aber irgendwie will es nicht klappe.

Hier ein Teil des Code:

Range("AG2").Copy ZieldateiÜbersicht(j + 1, 7).PasteSpecial (xlPasteValues)

Kann mir wer sagen wo mein Fehler liegt ?

Gruß
Westi

only Coding
15.09.2011, 09:34
Hallo, Westi,

warum weist Du nicht den Wert der Zele direkt zu?

ZieldateiÜbersicht(j + 1, 7).Value = Range("AG2").Value
HTH
only Coding

Westi30
15.09.2011, 15:15
Hi Coding,

daran habe ich garnet gedacht.

Klappt so thx.


Gruss

Westi

IngGi
15.09.2011, 15:48
Hallo Westi,

falls dich dein ursprünglicher Denkfehler trotzdem noch interessiert:

Die Einzeilermethode (Copy und Paste in einer Programmzeile) funktioniert nicht mit PasteSpecial. Es wird dann unabhängig vom übergebenen einschränkenden Parameter immer alles eingefügt. Als Zweizeiler sollte das Ganze funktionieren:

Range("AG2").Copy
ZieldateiÜbersicht(j + 1, 7).PasteSpecial xlPasteValues

Um xlPasteValues herum gehören auch keine Klammern. In eine Programmzeile geschrieben - ohne diese Klammern - ergibt sich allerdings bereits ein Kompilierungsfehler. Dass der Kompiler die Programmzeile akzeptiert, sobald man eine Klammer um den abschließenden Parameter setzt, erstaunt mich. Im Endeffekt mach das Programm dann nicht, was es soll.

Gruß Ingolf

Westi30
16.09.2011, 07:25
Moin IngGi,
danke für die Info.

Werde auch mal diese Version testen.

Gruß
Westi