Hi

I am trying to name the variable name1 by an offset of
range a1 by a1 rows and 1 column.

But the following codes not working can anyone help me?

TIa

Sub TestName()

drp = Range("A1")
name1 = Worksheets("control").Range(drp).Offset(drp, 1)
MsgBox (name)

End Sub