Zoom
06.01.2005 21:18:44
Jürgen
Sub Zoom()
Dim i As Integer
i = AktiveWindow.Zoom
Aktive Window.Zoom = i + 5
End Sub
Wie muss ich dieses Makro modifizieren, damit ALLE Blätter der Mappe gezoomt werden?