VBA - PROGRAMMIERUNG -
AUTOMATISCHE PROCEDUREN
' Ereignisse
Option Explicit
' Hinweis: Seit Excel 97 können statt Auto-Prozeduren auch
' Workbook_Open- und _Close-Ereignisprozeduren verwendet werden
' (im Codefenster »Diese Arbeitsmappe«). Die Auto-Prozedur verkleinert
' alle geöffneten Fenster anderer Arbeitsmappen in Icons
Sub Auto_Open()
Dim Table_No As Variant
MsgBox "Die Auto_Open-Prozedur wird ausgeführt."
For Each Table_No In Windows
If Table_No.Parent.Name <> ActiveWorkbook.Name And Table_No.Visible Then
Table_No.WindowState = xlMinimized
End If
Next f
End Sub
Sub Auto_Close() ' automatische Routine beim Schliessen der Datei
MsgBox "Die Auto_Close-Prozedur wird ausgeführt."
End Sub