Pasar fecha de un Calendar a un Textbox
Muy buenos días:
Les pido ayuda en lo siguiente: He creado un formulario con varios controles: textbox, combobox y buttons, entre otros. A su vez un botón de dicho formulario abre un control Calendar del cual selecciono una fecha y quiero que esta fecha seleccionada aparezca en el uno de los textbox del formulario original. Inicialmente cuando abro el formulario le dí la opción que cargue la fecha actual (Date) por defecto, pero una vez abro el calendario y se selecciona la fecha que desea el usuario, quiero que aparezca dicha fecha en este textbox. El código que estoy planteando y que genera error es el siguiente:
Private Sub Calendar1_Click()
TextBox2.Value = Calendar1.Value
End Sub
Y genera un error que dice "Se ha producido un Error '424' en el tiempo de ejecución: Se requiere un objeto.
Agradezco una pronta respuesta.
De antemano mil gracias y felicitaciones por esta página y por sus expertos que me han ayudado en más de una ocasión.
Jorge Escobar
Les pido ayuda en lo siguiente: He creado un formulario con varios controles: textbox, combobox y buttons, entre otros. A su vez un botón de dicho formulario abre un control Calendar del cual selecciono una fecha y quiero que esta fecha seleccionada aparezca en el uno de los textbox del formulario original. Inicialmente cuando abro el formulario le dí la opción que cargue la fecha actual (Date) por defecto, pero una vez abro el calendario y se selecciona la fecha que desea el usuario, quiero que aparezca dicha fecha en este textbox. El código que estoy planteando y que genera error es el siguiente:
Private Sub Calendar1_Click()
TextBox2.Value = Calendar1.Value
End Sub
Y genera un error que dice "Se ha producido un Error '424' en el tiempo de ejecución: Se requiere un objeto.
Agradezco una pronta respuesta.
De antemano mil gracias y felicitaciones por esta página y por sus expertos que me han ayudado en más de una ocasión.
Jorge Escobar
