Multiple Conditional Message Boxes

Hi,

I am looking for a VBA with multiple message boxes based on following criteria:

1) Check if specific cells are blank. If blank --> Message Box " Mandatory fields still blank - please fill cells"

2) Check all other cells if there are blanks. If there are blanks--> Message Box "There are still empty cells - Proceed?"

3) If both boxes have been passed, then Message Box "Control Check Complete"

I found this VBA online which really helped - but i'm not sure how to add the other two conditions to make it work - any help please??? Thanks!!



Sub FormatCheck()

Dim CheckCell As Range

For Each CheckCell In Sheets("FeederSheet").Range("E9,E15,E16,E18,E19").Cells
If Len(Trim(CheckCell.Value)) = 0 Then
CheckCell.Select
MsgBox "Cell " & CheckCell.Address(0, 0) & " is a Mandatory Field. Click OK and fill the cell.", , "Missing Information"


Exit Sub
End If
Next CheckCell

Hello. Your first answer;

Please Login or Register  to view this content.

second answer;

Please Login or Register  to view this content.

and last answer;

Please Login or Register  to view this content.

Thanks both!

I ended up using Olly's code which worked really well.

Is there a line I could add to the code so that after stMessage = "There are still empty cells - Proceed?" and they click "Enter" , another message box showing "Control Check Complete" would pop up?

Wow that was simple to add.

Thanks so much!

Hi Olly,

Sorry but is it possible to add two more criteria to the cases? So same code as you had above, but to check if:

1) Cells ("E60:E64") are dates, and if not a Message Box will for example say: "Please enter valid date in cell E60".
2) Final check for ranges E1:E60 if there are any #VALUE! or #REF! to prompt the user with a message box as well?

Thanks!

Thanks so much Olly. For the code:

For Each c In rngDates
If Not IsDate(c.Value) Then
iStatus = 2
stMessage = stMessage & vbCr & " " & c.Address

How could I change it so it is "If it is not a date" --> show message status 2. But if it is Blank, it will still move on to "Check Complete?"
Basically check complete will only pop up if it is either: 1) A date or 2) blank.

Sorry for all the questions - thanks so much for your help! I've been trying to modify it myself the whole day but couldn't figure it out

Wow you are amazing. Thank you so much for all of your help!