Formato de fecha VBA en inglés/francés

Resuelto
Varin -  
pijaku Mensajes publicados 13513 Fecha de registro   Estado Moderador Última intervención   -
Hola,

Quiero mostrar un cuadro de entrada de fecha en el formato "dd/mm/aaaa".

Cuando el usuario ingrese la fecha en el formato indicado, esta fecha se mostrará en el archivo en el formato "mm/dd/aaaa"

-----------------------------------------------------------------------------------------
ActiveCell.FormulaR1C1 = InputBox("Ingrese la fecha en el formato dd/mm/aaaa")
Selection.NumberFormat = "dd/mm/yyyy"
-----------------------------------------------------------------------------------------

¿Tendría alguna idea para ayudarme? Se lo agradezco de antemano.

4 respuestas

pijaku Mensajes publicados 13513 Fecha de registro   Estado Moderador Última intervención   2 772
 
Hola,

Prueba esto:
Sub test() Dim maDate As Date, strDate As String strDate = InputBox("Introduce la Fecha en el formato dd/mm/aaaa") maDate = CDate(strDate) ActiveCell.Value2 = maDate End Sub


--
Antes, nunca lograba terminar mis frases... pero ahora yo
1