VBA Message Box with 4 messages

[Mr2017]

Hi

I'd like to create a MsgBox that evaluates 4 conditions, please:

If cells E1 and K1 are BOTH equal to zero, then it will say "All good."

If cell E1 is NOT equal to zero, it will say "Check your supplier data"

If cell K1 is NOT equal to zero, it will say "Check your location data"

If BOTH cells E1 and K1 are NOT equal to zero, then it will say "Check your supplier and location data!

Does anyone know how to do this, please?

TIA

 

[Fluff]

How about

   Select Case True
      Case Range("E1") = 0 And Range("K1") = 0
         MsgBox "All good"
      Case Range("E1") <> 0 And Range("K1") = 0
         MsgBox "Check your supplier data"
      Case Range("E1") = 0 And Range("K1") <> 0
         MsgBox "Check your location data"
      Case Else
         MsgBox "Check your supplier and location data!"
   End Select

 

[Mr2017]

Amazing!!

Thanks for the prompt response, @Fluff

That worked!!

 

[Fluff]

You're welcome & thanks for the feedback.

 

[Mr2017]

Thank you!