Paso del nombre de un LABEL a subrutina

Poseo un form con varias etiquetas (Label) que cambian sus valores según una evaluación. Deseo crear una Subrutina a la que pueda pasarle el nombre de la etiqueta a la que le voy a realizar los cambios.

1 Respuesta

Respuesta
1

Te dejo un ejemplo sencillo. Mis controles tienen por nombre Label1 y Label2

'vuelca el valor de un textbox al label según condición
If TextBox1 < 100 Then
    etiqueta = "Label1"
Else
    etiqueta = "Label2"
End If
Me.Controls(etiqueta).Caption = TextBox1

Si son muchos controles mejor utilizar un bucle del tipo Select ... End Select.

Si necesitas un ejemplo con este método aclara un poco cuál será la condición.

¡Gracias! Muchísimas gracias.

No olvides valorar la respuesta para darla por cerrada. Al pie encontraras botones psra ello. EXCELENTE o BUENO.

Sdos!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Tengo una duda access 2010 Reporte vba

Tengo la siguiente sintaxis para filtrar un reporte pero no se filtra no se que tenga mal. DoCmd.OpenReport "ALLM2CONTEDOR", acViewPreview, "FECHA = #" & Format(Me.FECHAOK, "mm-dd-yyyy") & " # AND CONTENEDOR= " & Me.NUMEROCONTENEDOR.Column(1) & ""...
2 respuestas

Conocer en VBA donde se encuentran las bases de Datos

Necesito a través de VBA conocer el emplazamiento de las Bases de Datos.
3 respuestas

¿Cómo hacer una copia del libro activo en Excel VBA?

Quiero una macro para crear una copia del libro activo con otro nombre en la misma ruta y con diferente nombre, cuando haga la copia (sera un libro .xlsm" ) habilitado para macros. Una vez hecha la copia (no se abre) y mi libro original que cierre...
1 respuesta

Filtrar un Formulario con vba para un único valor

Necesito filtrar en vba un form para un solo numero o números. Busco extraer los valores que necesito unicamente cuando los solicite en Campos numéricos pero solo los que contengan unicamente el valor solicitado. Encontrar los valores que sen igual a...
2 respuestas

Poner una x cuando doy click en una label y si doy otro click quitar la x

Tengo varias labels en un formulario: estoy usando este código pero seria mucho código. Private Sub Label31_Click() If Label31 = "" Then Label31.Caption = "X" Else Label31.Caption = "" End If End Sub Como hacerle para mejorar el código
1 respuesta

ACCESS: Crear campo tipo combo con codigo vba en tabla

Tengo qu hacer una importacion y en access creo una tabla y un campo necsitaria que sea tipo combo, porque correspode a un valor con id y nombre.. ¿Se entiende? El campo lo creo asi: Set campo = tabla.CreateField("PROVEEDOR", dbText) Tabla. Fields....
2 respuestas

Bloquear celdas al escribir y poder actualizar solo por medio de Formulario VBA

Profesionales me dirijo hacia ustedes con el motivo que deseo bloquear varias hojas de un libro, que la información solo se pueda ingresar por medio del formulario y la actualización de los datos sea por el mismo formulario.
1 respuesta

Varias opciones en AutoFilter de VBA EXCEL

Estoy intentado seleccionar varias opciones en un mismo AutoFilter en VBA EXCEL pero con Array solo consigo 2, alguien sabe como hacer más opciones. El código que utilizo es : Range("A1").AutoFilter FIELD:=1, Criteria1:=Array("Pantalones" & "*",...
2 respuestas

Pegar datos de una celda de Excel a otra celda, creando un ciclo for.

Necesito un ciclo que copie los datos de la celda G41 y los pegue en la celda D11, luego los datos de la celda G72 a la celda D42 y así sucesivamente hasta la celda 2000, se van incrementando de a 31 celdas.
3 respuestas

Correcto formato para Buscar Fechas con VLookup en Excel VBA

Estimados Expertos Muy cordiales saludos. Me encuentro entrampado en algo muy simple, pero que no había tocado, búsqueda de fecha usando application. Worksheetfunction. Vlookup Me propuse un cuadro simple, para buscar fechas, para tratar de ser más...
3 respuestas