Cuando importamos un reporte desde un programa contable como hoja excel, en ocaciones no reconoce la fecha como tal, esto nos dificulta trabajar con fórmulas usando estas celdas que deben contener fechas, lo podemos corregir en algunas ocaciones dando F2 y enter, y excel los convierte al formato deseado, ¿pero si son muchas celdas?, esto se los comento porque me pasó hace poco, ya lo resolví con una macro que les dejo, seleccional en rango y la ejecutan ya sea mediante un botón o directamente, espero les sea de utilidad.
Sub FormatoFecha()
'Create ByPaco
Dim cell as Range
For Each cell In Selection
If Not cell.Value = "" Then
If cell.HasFormula = False Then
Dim lafecha As Date
lafecha = Format(cell.Value, "dd/mm/yyyy")
cell.Value = lafecha
End If
End If
Next
End Sub
[/size]
« Antes de que los reinos cambien, los hombres deberán cambiar »
Paso a Paso Activación Buzón IMSS
Anexo+7+1a+RMRMF+2020+versio?n+anticipada.pdf
Iniciativa de reforma al 27 y derogación del 32 de LSS
Carga batch sua dispmag