I was mildly surprised that the code Hans used [post=”773191″]here[/post] worked with the line
Range(oCell, Range("Z65536")).ClearContents
without the address property of oCell (as shown below), used.
Range(oCell.Address, Range("Z65536")).ClearContents
But work it did. This led me to do a little testing through which I discovered that the following code works through line 30, but fails at line 40.
Sub test() Dim oCell As Range 10 Set oCell = Cells(4, 1) 20 Range(oCell.Address) = Timer 30 Range(oCell, oCell) = Timer 40 Range(oCell) = Timer End Sub
Can someone help me understand what is going on?