Cargar un calendar desde un command button.
Hola quisiera saber cómo puedo cargar un calendar desde un command button (que me lo muestre y yo pueda seleccionar una fecha), yo estaba ensayando lo siguiente pero no me funciona.
Private Sub CommandButton1_Click()
Load Calendar1
Calendar1.Show
End Sub
Me pueden decir qué hago mal.
Muchas gracias.
Private Sub CommandButton1_Click()
Load Calendar1
Calendar1.Show
End Sub
Me pueden decir qué hago mal.
Muchas gracias.
1 Respuesta
Respuesta de Abraham Valencia
1
Pues, si tu "Control calendar" esta dentro de un userform, lo que debes hacer es activar dicho userform:
Private Sub CommandButton1_Click()
Load Userform1
Userform1.Show
End Sub
OJO, si tu "Control Calendar" esta en la hoja, solo puedes usarlo desde ahí
Abraham
Private Sub CommandButton1_Click()
Load Userform1
Userform1.Show
End Sub
OJO, si tu "Control Calendar" esta en la hoja, solo puedes usarlo desde ahí
Abraham
El command button es el que está dentro del userform y lo que quiero es que al dar clic en el botón se me active el calendario. Para no poner el calendar en el userform porque me ocupa mucho espacio.
Gracias,
Gracias,
Los "controles de calendario" son objetos ActiveX que necesitan de una interface obligada para poder usarse (una hoja, un userform).
La alternativa a lo que tu deseas es colocar tu calendario en el userform, ir a sus propiedades y en "visible" colocar "false", y en tu botón:
Private Sub CommandButton1_Click()
if calendar1.visible = False Then
Calendar1.visibile=True
Else
Calendar1.visibile=False
end if
End Sub
De ese modo, el botón lo oculta/desoculta
La alternativa a lo que tu deseas es colocar tu calendario en el userform, ir a sus propiedades y en "visible" colocar "false", y en tu botón:
Private Sub CommandButton1_Click()
if calendar1.visible = False Then
Calendar1.visibile=True
Else
Calendar1.visibile=False
end if
End Sub
De ese modo, el botón lo oculta/desoculta
