Foro Excel

Tengo un problema con los formatos
kisiera que al poner un formato de fecha en un textbox y despues ese valor pasarlo a una celda, se pasa con el formato Fecha de excel,formato celda.
para asi despues poder compararlo con otra celda que contiene una fecha que se ingresa directamente en la celda, nose si me explico correctamente?
ej. en un textbox pongo 17/5/2006 y eso lo pega en una celda y en otra celda ingreso 17/5/2006, asi nomas excel no los toma como iguales, y no me deja comparalos.

El control TextBox almacena y devuelve datos solo en formato Texto - es ahi donde radica tu problema. Deberas transformar el texto en una fecha valida, p.ej. mediante la funcion CDate.

Podrias hacer algo como lo siguiente:

1) Si usas un control TextBox en un UserForm (Formulario de VBA) entonces usa el evento Exit del objeto TextBox, asi:

Código: Seleccionar todo

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
   Range("A1") = CDate(TextBox1)
End Sub

o mejor aun crea un boton digamos Finalizar que pase todos los datos a sus respectiavas celdas al cerrar el formulario. Para ello usa el evento Click del objeto CommandButton(Finalizar):

Código: Seleccionar todo

Private Sub Finalizar_Click()
    Range("A1") = CDate(TextBox1)
    Unload Me
End Sub

2) Si usas un control TextBox de la barra de herramientas Visual Basic en la hoja de Excel, entonces prueba usar el evento LostFocus del objeto TextBox, algo asi:

Código: Seleccionar todo

Private Sub TextBox1_LostFocus()
    Range("A1") = CDate(TextBox1)
End Sub

q buena respuesta, 3 opciones para 3 posibles casos
sos un grande KL, muchas gracias, me anduvo perfecto