From c95946cad428292a50bd6d4ed82c57b3d816af41 Mon Sep 17 00:00:00 2001
From: embivert2 <72922416+embivert2@users.noreply.github.com>
Date: Thu, 15 Oct 2020 17:16:19 +0530
Subject: [PATCH] Update Functions

Better to use Messagebox type instead of number so that user can read and understand easily
---
 Functions/Functions | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Functions/Functions b/Functions/Functions
index 7b0f68f..2b44425 100644
--- a/Functions/Functions
+++ b/Functions/Functions
@@ -158,7 +158,7 @@ Dim OutlookMessage As Object
     If OutlookApp Is Nothing Then Set OutlookApp = CreateObject(class:="Outlook.Application") 'If not, open Outlook
     
     If Err.Number = 429 Then
-      MsgBox "Outlook could not be found, aborting.", 16, "Outlook Not Found"
+      MsgBox "Outlook could not be found, aborting.", vbcriticle, "Outlook Not Found"
       Exit Sub
     End If
   On Error GoTo 0