Hi Everyone,

I'm having some trouble with this code below. Would someone be able to give me some pointer.
I keep getting a compile error"user- defined type not defined"

Thank You as always for your support!!!

Mike,

Sub Box()

Dim msg As String
Dim title As String
Dim style As MsgBoxStyle
Dim response As MsgBoxResult
msg = "Large Order?"   ' Define message.
 'MsgBoxStyle.DefaultButton2 Or _
   'MsgBoxStyle.Critical Or
  style = MsgBoxStyle.YesNo
title = "Order Area"   ' Define title.
' Display message.
response = MsgBox(msg, style, title)
If response = MsgBoxResult.Yes Then   ' User chose Yes.
   ' Perform some action.
   Call AddHeader
Else
   ' Perform some other action.
   Call AddHeader2
End If

End Sub