Hi:

in Excel 2000 spk1, I have a sub that copies a range and pastes i
somewhere else. It works fine if there is data to be pasted but if th
range is empty is error out. Is there a way to bypass the error an
maybe have a msgbox come up and adivise the user?

this is a portion of my rookie code:

Range("BK5").Select
Range(ActiveCell, ActiveCell.End(xlDown)).Select
Selection.Cut
'
Range("A5").Select
Do
If ActiveCell.Select < "" Then
ActiveCell.Offset(1, 0).Select
End If
Loop Until ActiveCell = ""
'
ACTIVESHEET.PAST

When it goes to ActiveSheet.Paste, if it there's no data to paste i
errors out.


thank

--
halem
-----------------------------------------------------------------------
halem2's Profile: http://www.excelforum.com/member.php...nfo&userid=993
View this thread: http://www.excelforum.com/showthread.php?threadid=49469