kann mir jemand sagen, wie die Dialoganweisung lautet, um den Dialog "Info" aufzurufen? D.H. unter "?" "Info"!
Folgende Zeile muß ich nur noch ergänzen, aber leider finde ich nicht die richtige Anweisung!
Application.Dialogs (...
mfg Andre
Sub dialog_suchen()
Dim i As Integer
On Error Resume Next
For i = 1 To Application.Dialogs.Count
Application.Dialogs(i).Show
Next
End Sub