Kann man feststellen, ob
Microsoft Outlook gestartet ist ?
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal szClass$, ByVal szTitle$) As Long�
Sub Outlook_offen()
hFenster = FindWindow(vbNullString, "Microsoft Outlook")
If hFenster = 0 Then MsgBox "Outlook ist nicht gestartet !"
End Sub
�
|
