Visual Basic - Manejo de Variables

Tengo una serie de checkbox con los nombre A1, A 2, ..., An y quiero hacer un procedimiento generico para habilitar o desabilitar estos componentes pero como hago referencia al checkbox, por ejemplo:

A1.enabled = False

Pero si uso una variable que maneje el numero como le hago para manejarla

Contador = 1
A&Contador.Enabled = False

Logico que lo anterior no funciona pero como puedo hacer que si funcione...URGE

Gracias desde Mexico

Creo que te dará resultado empleado una matriz de controles, en este caso una matriz de checkbox.

Espero que te resulte.

No te entiendo muy bien como soy nuevo en esto del VB ...

Mira tengo una hoja de excel con algunos checkbox listas y botones, entonces en base a valores de los componentes quiero que un procedimiento me cambie el estado los checkbox , puedes poner algo de codigo para darme una idea... o no se si conces alguna comando en VB que execute texto similar al CallbyName para hacer esto:


Espero y exista algo asi :)

Gracias por responder...

en vb6:
A1.value = vbchecked
A1.value = vbunchecked

Aunque es mucho más recomendable que uses una matriz de controles, lo que pretendes hacer también es posible. Prueba la siguiente funcion a ver si te sirve

Sub OnOff(NombreControl As String, Valor As Variant)
Dim Ctl As Control
For Each Ctl In Me.Controls
If Ctl.Name = NombreControl Then
Ctl.Enabled = Valor
End If
Next
End Sub

Para encender:
OnOff "A1", True

Para apagar:
OnOff "A1", False

Espero que te sirva...

Gracias carnal!!!!

Pero como todo este rollo es bajo excel, resulta que en el ME no existe la propiedad Controls y pues no jala.... si se te ocurre otra cosa te agradeceria me heches una mano...

Ya estuvo....

En excel los controles no tienen la propiedad Index asi que eso de crear un arreglo de controles esta fuera de discucion hasta cierto punto, si creo un arreglo de objetos que posteriormente apuente a los controles por medio del comando SET es posible crear una rutina que me permita ahorrar codigo :D bueno al fin encontre la respuesta

Hasta pronto...