Tengo una duda que no se como resolver y me gustaría salir de dudas.
En un formulario he puesto a modo de prueba 18 labels y un botón que al ejecutarlo le quita el color de fondo a cada label.
Lo que no sé es si es posible mediante un ciclo que controle el nombre de cada label y así evitar repetir tantas veces el mismo procedimiento.
El procedimiento es el siguiente y lo pongo así porque no deja insertar código:
Option Explicit
Private Sub CommandButton1_Click()
' ¿Hay alguna manera para mediante una variable o función para no repetir
' "Me.Label_ 1 ---> 18" veces?
Hola a todos;
Tengo una duda que no se como resolver y me gustaría salir de dudas.
En un formulario he puesto a modo de prueba 18 labels y un botón que al ejecutarlo le quita el color de fondo a cada label.
Lo que no sé es si es posible mediante un ciclo que controle el nombre de cada label y así evitar repetir tantas veces el mismo procedimiento.
El procedimiento es el siguiente y lo pongo así porque no deja insertar código:
Option Explicit
Private Sub CommandButton1_Click()
' ¿Hay alguna manera para mediante una variable o función para no repetir
' "Me.Label_ 1 ---> 18" veces?
Me.Label1.BackStyle = fmBackStyleTransparent
Me.Label2.BackStyle = fmBackStyleTransparent
Me.Label3.BackStyle = fmBackStyleTransparent
Me.Label4.BackStyle = fmBackStyleTransparent
Me.Label5.BackStyle = fmBackStyleTransparent
Me.Label6.BackStyle = fmBackStyleTransparent
Me.Label7.BackStyle = fmBackStyleTransparent
Me.Label8.BackStyle = fmBackStyleTransparent
Me.Label9.BackStyle = fmBackStyleTransparent
Me.Label10.BackStyle = fmBackStyleTransparent
Me.Label11.BackStyle = fmBackStyleTransparent
Me.Label12.BackStyle = fmBackStyleTransparent
Me.Label13.BackStyle = fmBackStyleTransparent
Me.Label14.BackStyle = fmBackStyleTransparent
Me.Label15.BackStyle = fmBackStyleTransparent
Me.Label16.BackStyle = fmBackStyleTransparent
Me.Label17.BackStyle = fmBackStyleTransparent
Me.Label18.BackStyle = fmBackStyleTransparent
End Sub
Gracias y saludos.
Macro.xlsm