Makro in allen Blättern einer bestimmten Mappe
19.11.2003 21:49:47
Markus
ich brauche bitte Eure Hilfe.
Ich habe folgenden Code:
Sub asw()
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub
Diesen möchte ich gern in allen Blättern einer bestimmten Mappe ausführen.
Wie kann ich das machen?
Der Hintergrund ist der ich möchte nach einem "Monatsabschluss", alle Daten in der Mappen inlusive aller Formeln in absolute Werte umwandeln und damit gegen Änderungen schützen.
Wenn Ihr noch eine andere Idee habt, als das kopieren und einfügen wäre ich Euchg sehr dankbar.
MFG
Markus
Anzeige