Visual Basic para Aplicaciones - Programar en una macro "hacer click" en etiqueta de formulario

Life is soft - evento anual de software empresarial
 
Vista:

Programar en una macro "hacer click" en etiqueta de formulario

Publicado por Ezequiel Bale (4 intervenciones) el 06/02/2016 13:34:50
Buenos dias como andan?
Necesito en una macro "llamar" a un "click" de una etiqueta o label de un formulario. Es decir, quiero que automàticamente se realice la acciòn correspondiente a hacer click en la etiqueta. Abajo un ejemplo simple para que me entiendan:


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
'La etiqueta toma el valor de A1 luego de hacer click en ella
Private Sub Label1_Click()
Label1.Caption = MySheet.Range("A1").Value
End Sub
 
'por otro lado tengo mi macro donde tengo que llamar al click de Label1:
 
Sub Macro1()
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "10"
End Sub
 
'Se me ocurrìa hacer algo asi pero no funciona:
 
 
Sub Macro1()
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "10"
Call Label1_Click()
End Sub


gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Programar en una macro "hacer click" en etiqueta de formulario

Publicado por jere (4 intervenciones) el 06/02/2016 15:03:30
sí funciona, pero depende del ámbito desde el cual es llamado (debe ser desde el entorno del UserForm contenedor del Label)

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Label1_Click()
Label1.Caption = Hoja1.Range("A1").Value
End Sub
 
Sub Macro1()
Range("A1").Select
ActiveCell.FormulaR1C1 = "10"
Call Label1_Click
End Sub
 
Private Sub CommandButton1_Click()
Call Macro1
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Programar en una macro "hacer click" en etiqueta de formulario

Publicado por Ezequiel (4 intervenciones) el 06/02/2016 15:34:15
Gracias por la rta. Ahora cuando pueda lo pruebo, pero... el commandbutton a pesar de llamar a la macro1 tambien esta dentro de un "click" o no?
Private Sub CommandButton1_Click()
Call Macro1
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Programar en una macro "hacer click" en etiqueta de formulario

Publicado por jere (6 intervenciones) el 06/02/2016 15:50:16
responde al click sobre el botón que está en el formulario
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar