IR A UN RANGO con macro

[NIXONLYOS]

Hola a todos he intentado ingresar este codigo en macros VBA de excel

 

dim zelda as string

ZELDa = ActiveCell.Value
Cells(1,ZELDa).Select

pero siempre me laza error en cells

 

como puedo hacer para ir a un rango donde la columa esta siempre variando en mi hoja de calculo. por lo que necesito definir la variable ZELDA

[Dr Hyde]

 

prueba este codigo

Sub elige()
Dim zelda As String

zelda = ActiveCell.Column
Cells(1, Val(zelda)).Select
End Sub