03/05/2010, 13:52
|
 | | | Fecha de Ingreso: julio-2006 Ubicación: Lima, Peru
Mensajes: 708
Antigüedad: 17 años, 9 meses Puntos: 18 | |
| Respuesta: VBA Excel - Array de objetos
En este ejemplo se recorren los controles diferentes de un userform y dependiendo del tipo se pintan de un determinado color
Dim objeto As Object
For Each objeto In Me.Controls
Select Case TypeName(objeto)
Case "Label"
objeto.BackColor = vbBlue
Case "TextBox"
objeto.BackColor = vbGreen
Case "CheckBox"
objeto.BackColor = vbYellow
Case "CommandButton"
objeto.BackColor = vbBlack
End Select
Next objeto
Abraham |