Link de archivo: 1drv.ms/x/s!Ao... En este video te enseñare como podemos forzar un formato de fecha en un textbox con Vba Excel. Suscríbete para más contenido.
Пікірлер: 64
@luisalbertopacichanadoming63197 ай бұрын
No sabes cuanto me demore en encontrar un video con este tema en específico. Muchas gracias. Nuevo suscriptor
@JohnnyXII2 жыл бұрын
Excelente un detalle mas que necesitaba en mi texbox fecha... muchas gracias... ya me suscribí... espero sigas subiendo mas tutoriales para aprender mas en este hermozo universo exceliano
@gilbertorodriguez92343 жыл бұрын
Muchas Gracias, el formato más sencillo y lo mas importante, buena dicción, claro y preciso
@MasterExcelVba3 жыл бұрын
Muchas gracias!
@claudiovillavicencio5136 Жыл бұрын
Excelente daba vueltas y lo encontre Gracias!
@felipetorresur3943 Жыл бұрын
Que Crack, felicidades por la manera tan facil en la que enseñas
@edwinfernandovizcainocasta82822 ай бұрын
Hola buenos dias, super el video, una consulta, cuando intento pegar esa fecha en una celda si elijo un dia menor al dia 13, ejemplo 11/07/2024, en la celda se cambia el dia y el mes es decir queda 07/11/2024, como se puede evitar eso?
@jesusdaniel6272 ай бұрын
Yo tengo un Txt FechaDigita. En el CommandButton de tu formulario: Range("C5").Value = Format(Txt_FechaDigita.Value, "*MM/DD/YYYY")
@Supertecno27Ай бұрын
Sería bueno q hicieras uno para la hora también
@JohnnyXII2 жыл бұрын
pero el texbox que usted explica permite ingresar cualquier numero de dos digitos es decir puedo poner 50/68/2021 y no bota error.... como corregir eso
@herberthlima40462 жыл бұрын
Buen metodo me a ayudado saludos
@charlesperdomo71622 жыл бұрын
Qué buen vídeo bro, gracias
@JJosueMachado2 жыл бұрын
Gracias me sirvió mucho.
@juanramonblazquezdevesa18509 ай бұрын
hola buenos días me ha gustado mucho tu explicación , he seguido todos los pasos y a mi no me borrar los números se me queda en la segunda / y no me borra mas , me gustaria que me echaras una mano, gracias
@wladyramirez55732 жыл бұрын
Hola, una pregunta que función se le podría agregar para que admita solo números?, Gracias
@WilliamMendez_cw Жыл бұрын
Excelente!!
@adolfosaavedra49813 жыл бұрын
Cuando ingreso el valor de la caja de texto a la hoja de cálculo no sale correctamente la fecha, es decir en el formulario ingreso 11/07/21 y a la celda la información llega así 7/11/21
@GuidoCentesimo2 жыл бұрын
Muy bueno tu método.Y si deseo que valide que los valores indicados en cada bloqué Día, Mes Año sean una fecha válida, que me recomiendas? Gracias de antemano
@eirannieves63599 ай бұрын
Tambien progunto eso. saludos
@jorgemendozaa.77946 ай бұрын
Buena tarde, un favor ya realice eso, ahora tengo que borrar esos datos cada vez que se guardan y especificamente marca error a la hora de borra la fecha, lo hago con la intruccion Empty. de que otra forma podria borra ese dato, muchas gracia.
@Basicojose4 ай бұрын
Te amo
@WilliamMendez_cw2 жыл бұрын
excelente!!
@juanandrestaborda30752 жыл бұрын
hola, muy bueno el video y la explicacion. pude programar el codigo correctamente. el problema que tengo ahora que me tira la fecha invertida y no encuentro cual puede ser la falla... por favor necesito ayuda!!!!!!
@mauropeiretti37982 жыл бұрын
me sucede lo mismo, hay solución?
@veronicaalbornoz3652 жыл бұрын
Es porque el Excel lo lee al revés!, en donde traspasas los datos, por ejemplo yo lo tengo como ; Range("E3").value = Format(txt_fechaventa, "MM-DD-YYYY") La técnica está en el Format (Ya que eso transforma el texto en FECHA) y el txt(con el nombre que tú tienes agregado en la macro, y en el range("la columna donde se pega el dato del txtbox"). Fíjate que va con MM-DD no DD-MM!, FIJARSE QUE ESTO ES CUANDO TRASPASAS EL DATO AL EXCEL!. Espero haberte ayudado! :D
@veronicaalbornoz3652 жыл бұрын
@@mauropeiretti3798 Es porque el Excel lo lee al revés!, en donde traspasas los datos, por ejemplo yo lo tengo como ; Range("E3").value = Format(txt_fechaventa, "MM-DD-YYYY") La técnica está en el Format (Ya que eso transforma el texto en FECHA) y el txt(con el nombre que tú tienes agregado en la macro, y en el range("la columna donde se pega el dato del txtbox"). Fíjate que va con MM-DD no DD-MM!, FIJARSE QUE ESTO ES CUANDO TRASPASAS EL DATO AL EXCEL!. Espero haberte ayudado! :D
@AGUI132 жыл бұрын
Buenas tardes, si Yo guardo mi hoja de Excel a pdf y tomo valores dentro de la hoja para nombrar el PDF, cómo puedo dar formato de 2 digitos a el día , mes y año? te pongo cómo lo tengo, espero me puedas ayudar. mio = ActiveWorkbook.Name nfac = Range("S10").Value cliente = Range("E6").Value correo = Range("N10").Value usuario = Range("N7").Value nombre = nfac & "_" & cliente & "_" & Day(Date) & "_" & Month(Date) & "_" & Year(Date)
@juanquiti3 жыл бұрын
muchas gracias!!!!!!!!!!!
@MasterExcelVba3 жыл бұрын
Gracias por comentar
@MrClaudioVillas3 жыл бұрын
Buenas tardes, excelente video. En mi caso el problema que tengo esque el txt lo tengo en este formato: txt_parto = Format(txt_parto, "mm/dd/yyyy") Dim nChar As Long nChar = Len(Me.txt_parto) Select Case nChar Case 2 Me.txt_parto = txt_parto & "/" Case 5 Me.txt_parto = txt_parto & "/" End Select Pero no soy capaz de borrar la fecha, cuando toco un nimero me sale esto 43122/. Ayuda!
@MasterExcelVba3 жыл бұрын
Hola Claudio, te propongo que revises el siguiente video que subí después en donde te voy a enseñar a crear un formulario calendario que puede ser utilizado desde diferentes textbox pegando unas cuantas líneas, el video es: kzbin.info/www/bejne/gV6XdKqhr5mSmbM También me parece mucho mas cómodo entregarle esta opción al usuario y por supuesto es menos el riesgo de error, me cuentas que tal te va.
@mbarradaYT3 жыл бұрын
Me ayudaste dándole el formato para un dato que estaba trayendo de una tabla. Mil graciaaaas
@veronicaalbornoz3652 жыл бұрын
Es porque el Excel lo lee al revés!, en donde traspasas los datos, por ejemplo yo lo tengo como ; Range("E3").value = Format(txt_fechaventa, "MM-DD-YYYY") La técnica está en el Format (Ya que eso transforma el texto en FECHA) y el txt(con el nombre que tú tienes agregado en la macro, y en el range("la columna donde se pega el dato del txtbox"). Fíjate que va con MM-DD no DD-MM!, FIJARSE QUE ESTO ES CUANDO TRASPASAS EL DATO AL EXCEL!. Espero haberte ayudado! :D
@JDavidAlarconMartinez17892 жыл бұрын
Pero cuando se ingresa el valor del textbox a una celda el formato cambia
@Nav-nd5mq2 жыл бұрын
buen día no se si me puedan ayudar cuando trato de guardar la fecha me lo guarda como si fuera calendario ingles me explico que si marca 12/04/2022 que seria el 12 de abril lo pega como 04/12/22 dando la fecha de 4 de diciembre del 2022 y la verdad no se que lo este provocando.
@veronicaalbornoz3652 жыл бұрын
Es porque el Excel lo lee al revés!, en donde traspasas los datos, por ejemplo yo lo tengo como ; Range("E3").value = Format(txt_fechaventa, "MM-DD-YYYY") La técnica está en el Format (Ya que eso transforma el texto en FECHA) y el txt(con el nombre que tú tienes agregado en la macro, y en el range("la columna donde se pega el dato del txtbox"). Fíjate que va con MM-DD no DD-MM!, FIJARSE QUE ESTO ES CUANDO TRASPASAS EL DATO AL EXCEL!. Espero haberte ayudado! :D
@Nav-nd5mq2 жыл бұрын
@@veronicaalbornoz365 muchas gracias te agradezco que me pasaras el dato excelente dia :D
@proyectosviviendavisvip35262 жыл бұрын
Buen video pero surge una pregunta resulta que en una celda esta un valor en fomato fecha y cuando lo llevo al textbox queda formato numerico... la pregunta es como se cambia desde el textbox el numero que muestra a formato fecha.
@mishaelgonzalez9642 жыл бұрын
Encontraste una solución?
@veronicaalbornoz3652 жыл бұрын
@@mishaelgonzalez964 Es porque el Excel lo lee al revés!, en donde traspasas los datos, por ejemplo yo lo tengo como ; Range("E3").value = Format(txt_fechaventa, "MM-DD-YYYY") La técnica está en el Format (Ya que eso transforma el texto en FECHA) y el txt(con el nombre que tú tienes agregado en la macro, y en el range("la columna donde se pega el dato del txtbox"). Fíjate que va con MM-DD no DD-MM!, FIJARSE QUE ESTO ES CUANDO TRASPASAS EL DATO AL EXCEL!. Espero haberte ayudado! :D
@veronicaalbornoz3652 жыл бұрын
Es porque el Excel lo lee al revés!, en donde traspasas los datos, por ejemplo yo lo tengo como ; Range("E3").value = Format(txt_fechaventa, "MM-DD-YYYY") La técnica está en el Format (Ya que eso transforma el texto en FECHA) y el txt(con el nombre que tú tienes agregado en la macro, y en el range("la columna donde se pega el dato del txtbox"). Fíjate que va con MM-DD no DD-MM!, FIJARSE QUE ESTO ES CUANDO TRASPASAS EL DATO AL EXCEL!. Espero haberte ayudado! :D
@nicolasp842 жыл бұрын
@@veronicaalbornoz365 y como hago para que en la planilla me quede como DD/MM/YYYY?
@MrMannu063 жыл бұрын
Hola, gracias por enseñar como se realiza esta función, la agregue a mi formulario, pero cuando trato de limpiarla el formulario me arroja un error
@MasterExcelVba3 жыл бұрын
Es complicado darte una solución sin contar con el código.
@erickdavidbernabe66422 жыл бұрын
Hola Manuel, que codigo le has puesto al boton de limpiar en el formulario? asi vere que te puedo ayudar y ampliar mas sobre tu duda.
@raulalfredospala69123 ай бұрын
Hola buenas tardes. Consulto tengo una macro en Excel pero hay un error en las fechas que no se como corregir. El textBox fecha cuando se da de alta un cliente toma la fecha correctamente y en la tabla de Excel también la guarda en el formato normal (dd/mm/yyyy). El problema es cuando realizo una búsqueda de ese mismo cliente para modificarle algún dato, si la fecha es menor a 12/03/2024 el mismo textBox me muestra todo números 256245 y si la fecha es mayor a esa por ejemplo 15/03/2024 lo muestra normal. No se como se soluciona ese error.
@MrMannu063 жыл бұрын
buenas tardes, alguien me podra ayudar con esta formula, hice un boton de limpieza y me arroja error, como puedo limpiar este textbox del formato de fecha
@MasterExcelVba3 жыл бұрын
Ya has solucionado el inconveniente?
@DirectionerLove0072 жыл бұрын
textbox1.value = clear en el bloque correspondiente al boton que creaste
@theatomo2 жыл бұрын
Cambia de ActiveContro a Tbx_Fecha.Value para el caracter 6, es decir, Sustituye: If Len(ActiveControl) = 5 Then ActiveControl = ActiveControl & "/" End If Por: If Len(txt_fecha.Value) = 5 Then txt_fecha.Value = txt_fecha.Value & "/" End If
@djcadaniel-frontend2 жыл бұрын
me bota el error 450
@Gallito_Ponce9 ай бұрын
Me rechaza "Activecontrol"
@jorgefernandez99375 ай бұрын
If (Len(txtFecha.Text) = 2 Or Len(txtFecha.Text) = 5) And bandera = False Then txtFecha.Text = txtFecha.Text & "/" ElseIf Len(txtFecha.Text) > 10 Then txtFecha.Text = Mid(txtFecha.Text, 1, 10) End If resumido
@Vic-f9n4 ай бұрын
Que buen sujeto eres Jorge
@jorgefernandez99374 ай бұрын
@@Vic-f9n Por nada
@joserobertoreyescarbajal2725Күн бұрын
Cómo le puedo hacer para que un txtbox inserte números a la celda no con valor de texto ?