Foros del Web - Ver Mensaje Individual

abrahamvj · 31-jul-2006, 17:17

Haber. Agrega un CONTROL CALENDAR a tu hoja. En sus propiedades en LINKEDCELL pon el rango de la celda donde deseas se vea la fecha elegida. Digamos que el calendar se llama CALENDAR1. Ahora agrega un boton de comando y colocale este codigo:

Private Sub CommandButton1_Click()
If Calendar1.Visible = True Then
Calendar1.Visible = False
Exit Sub
End If
If Calendar1.Visible = False Then
Calendar1.Visible = True
End If
End Sub

Con ese boton se vera y ocultara el calendario. La ultima parte de tu pregunta no la comprendi

Abraham

31-jul-2006, 17:17	#4 (permalink)
abrahamvj Fecha de Ingreso: julio-2006 Ubicación: Lima, Peru Mensajes: 529	Haber. Agrega un CONTROL CALENDAR a tu hoja. En sus propiedades en LINKEDCELL pon el rango de la celda donde deseas se vea la fecha elegida. Digamos que el calendar se llama CALENDAR1. Ahora agrega un boton de comando y colocale este codigo: Private Sub CommandButton1_Click() If Calendar1.Visible = True Then Calendar1.Visible = False Exit Sub End If If Calendar1.Visible = False Then Calendar1.Visible = True End If End Sub Con ese boton se vera y ocultara el calendario. La ultima parte de tu pregunta no la comprendi Abraham