Cita:
Iniciado por alberto4888
Hola a todos :
If CC.Value = "B1" Then
For I = 0 To 50
N = Replace("B1" + Str(I), " ", "", 1, -1)
N.Visible = True
Next
End If
Basicamente lo que no quiero es escribir 50 veces b1 .visible =true, y de esta forma no funciona.
Un saludo.
Puedes crear una matriz de controles. En ese caso sería:
Código:
For I = 0 To 50
B1(I).Visible = True
Next I