Hallo,
ich habe ein Makro aufgezeichnet, dass soweit auch funktioniert.
Das Makro ist in der Datei "BSH-Monatsreport_04_2006.xls" gespeichert.
Diese Datei hat jedoch im nächsten Monat einen anderen Namen, was bewirkt, dass ich im Makro den Namen monatlich ändern muss.
Geht es auch eleganter?
Indem das Makro immer in der aktuellen Datei ausgeführt wird, egal welchen Namen diese hat?
Unten ein Teil des Makros, damit mein Problem klar wird.
Vielen Dank für die Hilfe.
Jens
Sub BSH()
'
' BSH Makro
' Makro am 30.03.2006 von ehj5mb2 aufgezeichnet
'
'
ActiveSheet.Select
Windows("BSH - kurz.xls").Activate
Range("E14:E23").Select
Selection.Copy
Windows("BSH-Monatsreport_04_2006.xls").Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("BSH - kurz.xls").Activate
Range("F14:H23").Select
Application.CutCopyMode = False
Selection.Copy
Windows("BSH-Monatsreport_04_2006.xls").Activate
Range("G10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveWindow.SmallScroll Down:=12