Werte Kopieren / Arbeitsmappen
03.02.2004 15:56:34
Fritz
Ich möchte gerne von einer Arbeitsmappe per VBA gewisse Werte in eine andere Arbeitsmappe übertragen. Per Makro Rekorder habe ich den folgenden Code generiert:
Sub Conditon_Code_update_2()
Sheets("CCode").Select
On Error Resume Next
Windows("Price_tool-4_02.xls").Activate
Sheets("CCode").Select
Range("F17:L51").Select
Selection.Copy
Windows("Price_tool-4_03work-dataimport.xls").Activate
Sheets("CCode").Select
Range("F17").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("F17").Select
End Sub
Soweit läuft eigentlich alles auf meinem Computer. Lasse ich aber diese beiden Dateien auf anderen PC`s laufen funktioniert das nicht immer (Die Werte werden nicht kopiert). Ich bin aber darauf angewiesen, dass das funktioniert, da diese Funktion montalich auf verschiedenen Rechnern laufen sollte.
Besten Dank zum voraus für Feedback
Gruss
Fritz
Anzeige