if typename(selection) < "Range" Then Msgbox "Select Range"

"StargateFan" wrote in message
...
|I selected an area on the screen and then did a record macro. Here's
| what I obtained as a script:
|
| Sub CopyQuotefallToBitmap()
| '
| Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
| End Sub
|
| Is there a way for Excel to detect when no range has been selected and
| to advise the user they need to select a range (always starting at B4,
| though entire area after that can differ somewhat) and then the script
| can proceed to the rest of the "Selection.CopyPicture..." scripts
| above after that?
|
| Thanks! :oD
|