Auto open
21.12.2005 17:31:33
Gunter
ich möchte beim starten eines Arbeitsblattes, das der Cursor auf das aktuelle Datum springt. Dazu habe ich folgendes Makro gefunden, modifiziert und es fktn. auch prinzipiell
Sub Auto_open()
Dim Suchbegriff As Range
Set Suchbegriff = Range("C3:IT3").Find(What:=Date, LookAt:=xlWhole)
If Suchbegriff Is Nothing = False Then _
Range(Suchbegriff.Address).Activate
Range(Suchbegriff.Address).Font.ColorIndex = 3
Range(Suchbegriff.Address).Interior.ColorIndex = 2
End Sub
Problem: das Makro startet nicht automatisch beim öffnen der Datei,
auch andere Makro's die ich mit Auto_open deklariert habe starten nicht automatisch.
Gibt es auch eine Möglichkeit ohne Makro mit dem aktuellen Datum zu starten?
Dank und Gruss
Gunter