Let me try this again. I set up an area of about 10 colums by 12 rows. Then
I used this macro with the variable re-set to include CurrentRegion and it
worked OK.


Sub currgn()
Set myRng = Range("C9:C11")
Set myRng = myRng.CurrentRegion
myRng.Interior.ColorIndex = 3
MsgBox "Take a look"
myRng.CurrentRegion.Interior.ColorIndex = xlNone
End Sub

"Barb Reinhardt" wrote:

Let's try this again.

I have the following code:

Set mySourceRange = mySourceRange.CurrentRegion

where mySourceRange is already a defined range. There is a region of data
that's bounded by blank cells, but it only seems to find the first row of
data and I can't seem to figure out why.

Can someone assist?

Thanks,
Barb Reinhardt