Testing Range Extent

[Guest]

Hi All
How can I test in VBA if the selected range is a single cell or multiple
cells or multiple range of cells?

Many thanks

Cheers

 

[Guest]

Sub howmany()
MsgBox (Selection.Count)
MsgBox (Selection.Areas.Count)
End Sub

 

[Guest]

Many thanks