publicado el 27 de febrero3 años No consigo que se ponga la fecha en el formato deseado a no ser que cuando cierro el formulario presione F2 + ENTER que tampoco se hacerlo automáticamente después de la inserción. AYUDA formato deseado 27-feb-22 Consumo Total 2022_MASTER_fecha.xlsm
publicado el 27 de febrero3 años 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.
No consigo que se ponga la fecha en el formato deseado a no ser que cuando cierro el formulario presione F2 + ENTER que tampoco se hacerlo automáticamente después de la inserción.
AYUDA formato deseado 27-feb-22
Consumo Total 2022_MASTER_fecha.xlsm