Saltar al contenido

Fecha cambia sola de formato después de ser insertada


Recommended Posts

Buenas, cambiando estas lineas.

'TextBox1.value = Format(TextBox1.value, "dd-mmm-yy")
 Range("B" & ultimo).EntireRow.Insert
 Range("A" & ultimo).value = CDate(Format(TextBox1, "dd-mm-yy"))

inhabilita estas otras 

'     Dim Celda As Range
'    FILA = ActiveCell.Row
'    With Hoja1
'        .Cells(FILA, 1).Select
'        For Each Celda In Selection
'            Celda.value = CStr(Celda)
'        Next Celda
'    End With

si te hace falta comvertir todas las celdas , omite la de la fecha.

Enlace a comentario
Compartir con otras webs

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.