I don't understand what you mean? The code below works just fine for me:

Sub Test()

Dim objRG As Range

Set objRG = ActiveWorkbook.ActiveSheet.Cells(1, 35)
MsgBox objRG.Address
Set objRG = Nothing

End Sub

It get a message box of AI1.
--
Hmm...they have the Internet on COMPUTERS now!


"HotRod" wrote:

If finding it difficult to jump from Coulmn "Z" to "AA" when I need to.