Jump to content

Archived

This topic is now archived and is closed to further replies.

alba

aplicar formato hora en un textbox

Recommended Posts

buenos dias y saludos ayuda excel

Tengo el sgt inconveniente

En la hoja 1  tengo 2 botones, uno carga un formulario para registrar datos y se depositan en una hoja (1 )

Y otro botón que llamo a un formulario ("buscar" ), en el tengo varios textbox donde llamo datos de  hoja1 de excel y me los presenta en el formulario, ok,,

El formulario tiene un solo botón que nombre "buscar dato"

Yo dígito en el primer textbox po ejem el munero de regitro o cedula y clic en buscar dato, ok

Entonces,,

en Un de los texbox que representa la hora, o más bien debe mostrar la hora, este me la muestra así .: 0,71563324889, una serie de números,

En la celda de excel d la hoja 1 esta escrita correctamente, por ejm 11:43:00 pm .y tiene el formato de hora
y así se debería mostrarla en el formulario,,

que formato utilizo para corregir ese detalle y me la muestre como debe ser

para resumir :
Que en el texbox del formulario de búsqueda aparezca 10:30:00pm y no 0.456985222etc

 

este es mas o menos el codigo

Dim nom As String

 nom = Range("d" & fila).Value
 
 TextBox2 = nom
 TextBox3 = Range("o" & fila).Value
 TextBox4 = Range("q" & fila).Value
 TextBox5 = Range("r" & fila).Value  <---------------- este es el textbox del fomulario donde debe mostrar la hora
 TextBox6 = Range("s" & fila).Value
 TextBox7 = Range("G" & fila).Value
 TextBox8 = Range("L" & fila).Value
 

TextBox1.SetFocus

End Sub

gracias

Share this post


Link to post
Share on other sites

Hola

Prueba de este modo:

TextBox5 = Cdate(Range("r" & fila).Value)  <---------------- este es el textbox del fomulario donde debe 

TextBox5 = Format(Range("r" & fila).Value,"hh:mm")  <---------------- este es el textbox del fomulario donde debe 

 

Share this post


Link to post
Share on other sites

Para eso estamos:

Recuerda que puedes usar las funciones de conversion :

Función    Tipo 
CBool        Boolean
CByte        Byte
CCur         Currency
CDate       Date
CDbl         Double
CDec        Decimal
CInt          Integer
CLng        Long
CSng        Single
CStr          String
CVar         Variant

 

Damos como tema solucionado?
 

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.

INFORMACIÓN BÁSICA SOBRE PROTECCIÓN DE DATOS

Responsable: Sergio Andrés Celemín

Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.

Legitimación: Consentimiento del interesado.

Destinatarios: Hetzner Online GmbH.

Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso,
rectificación, supresión, oposición y demás derechos legalmente establecidos a
través del email sergio@ayudaexcel.com.

Información adicional: Encontrarás más información en la política de privacidad.




×
×
  • Create New...

Important Information

Privacy Policy