MsgBox beim Öffnen Datei
23.07.2002 15:36:45
Bernd
Private Sub Workbook_BeforeOpen(Cancel As Boolean)
Dim i As Integer
i = MsgBox("Um die Makros zu aktivieren ist es zwingend erforderlich,dass das Tool vorher abgespeichert wird." _
& Chr(13) & " ", 1 + 16 + 256, " Achtung !!! Zwingende Notwendigkeit ! ")
End Sub
Oder gibt es eine Anweisung, welches die Makros alle automatisch aktiviert????
Grüße
Bernd