H?ctor Miguel
5/24/2009 7:56:00 AM
hi, Art !
> ... when I select the whole sheet, I get the error, overflow.
> How can I Correct this?
for xl2007 change this:
If Selection.Count > 1 Then Exit Sub
to this:
If Selection.CountLarge > 1 Then Exit Sub
regards,
hector.
__ previous __
>>> Hoe do I write the code, if the selection is anything but one cell
>>> So if I select a range all thew whole page, or a tab or a button etc.
>>> it should ignore everything, only when I select one cell then it should do ...
>>
>> i.e.
>>
>> Sub mySub()
>> If TypeName(Selection) <> "Range" Then Exit Sub
>> If Selection.Count > 1 Then Exit Sub
>> MsgBox "What's next ?", , ""
>> End Sub