if cancel false then blank in excel vba code example

Example: excel vba check cell not empty

'VBA to check if cell A1 has a value.

'Two different ways...

MsgBox Not IsEmpty([A1])

MsgBox Not Len([A1]) = 0