Objeto variable

14/05/2006 - 11:54 por BADDOG | Informe spam
Hola a todos:

Intento un bucle sobre 200 etiquetas las cuales están nombradas Name =
label001, label002, label003 así sucesivamente.

Mi interés radica en un "cuadro de mandos" en el cual se cambia el color de
tinta propiedad Backcolor solo cuando suceda que dicho registro esté ocupado,
sino que quede en blanco.

Mi duda y problema radica en que si uno por un lado una varible a$="label" y
otra con el valor"001" que es variable, que puede coger valores desde 001 a
200 y juntarlas, no se hacer que me reconozca el objeto ya que es el error
que me da al hacerlo correr.

con la instrucción directa label001.backcolor=rgb (a,a,a) si me lo hace pero
no quiero hacer 200 condiciones. ¿Dónde me equivoco?.

Gracias por vuestra respuesta. Juan Carlos
 

Leer las respuestas

#1 KL
14/05/2006 - 16:36 | Informe spam
Hola BADDOG,

A mi el siguiente codigo me funciona:

Private Sub UserForm_Initialize()
For i = 1 To 10
Controls("Label" & Format(i, "000")).BackColor = RGB(10, 50, 80)
Next i
End Sub

Saludos,
KL


"BADDOG" wrote in message news:
Hola a todos:

Intento un bucle sobre 200 etiquetas las cuales están nombradas Name =
label001, label002, label003 así sucesivamente.

Mi interés radica en un "cuadro de mandos" en el cual se cambia el color de
tinta propiedad Backcolor solo cuando suceda que dicho registro esté ocupado,
sino que quede en blanco.

Mi duda y problema radica en que si uno por un lado una varible a$="label" y
otra con el valor"001" que es variable, que puede coger valores desde 001 a
200 y juntarlas, no se hacer que me reconozca el objeto ya que es el error
que me da al hacerlo correr.

con la instrucción directa label001.backcolor=rgb (a,a,a) si me lo hace pero
no quiero hacer 200 condiciones. ¿Dónde me equivoco?.

Gracias por vuestra respuesta. Juan Carlos

Preguntas similares