Check multiple Cells and return a MsgBox Only if all are empty

Hi,

I have a task, where there are various cells that used to register contact details. These are fixed in certain cells within the spreadsheet. Let's say they are A10, A12, A14, and A16. The registration sheet requires that at least one of the 4 contact detail field must be populated, but not necessarily all of them.
I am looking to generate a MsgBox if all of these cells are Empty - but only all of them. If one of the 4 cells is populated, the macro would continue.

I have tried the following code, but it of course checks each cell individually and not ignore the others if one is populated.

Please Login or Register  to view this content.

Is there a better way to do this so that if 1 of the 4 cells is populated, there is no MsgBox, but if none are populated, that I can have a MsgBox with a more generic message such as "Please populate at least one contact field" (just as a sample text).

I am wondering if it is possible to Dim the 4 cells as a single range and then use the IsEmpty function?

Thank you for any and all assistance, and guidance in advance.