Outlook VBA - если условие основано на теме письма

Question

Я пытаюсь отфильтровать условие if по теме письма, но я получил следующую ошибку:

Ошибка времени выполнения '91':
Переменная объектаили с неустановленной переменной блока

Пока у меня есть это:

Private Sub Application_Startup()
    Dim mail As MailItem

    If mail.Subject = "test 123" Then
        MsgBox "ok"
    Else
        MsgBox "no ok"
    End If
End Sub