Outlook.Application

Jeg har ikke outlook på min pc, men hvis formålet er at finde OUTLOOK og hvis den er lukket, så åbne den, tror jeg dit script vil gå istå efter 1. linie. Prøv med dette script..........

  On Error Resume Next
  Set olkApp = GetObject("","Outlook.Application")
  if err.number = 0 Then
    Else
      Set olkApp = CreateObject("Outlook.Application")
  End If
  err.clear
  on error goto 0

tak