VBA-Einkopieren von unterschiedlichen Daten
18.09.2007 11:51:57
unterschiedlichen
Ich versuche gerade einen "Copy&Paste" Prozess zu vereinfachen, indem ich VBA benutze. Ich benutzte eine Exceltabelle, in die ich monatlich diverse Daten einkopieren will. Ist es nun möglich folgenden Quelltext so abzuändern, dass es egal ist, wie das Excel heisst(in dem Fall habe ich aus Benötigte_Werte_01 "Copy&Paste"vorgenommen, die nächste Datei heisst dann halt Benötigte_Werte_0x)?
Sub CopyValues()
' CopyValues Macro
' Macro recorded by ...
Windows("Benötigte_Werte_01.xls").Activate
Windows("Copy (2) of 20070917_Beispiel.xls").Activate
Windows("Benötigte_Werte_01.xls").Activate
Selection.Copy
Windows("Copy (2) of 20070917_Beispiel.xls").Activate
Range("A260:I262").Select
ActiveSheet.Paste
End Sub
Anzeige