Pregunta para luismondelo eliminar fechas incompletas?
Hola amigo,
Quisiera quitar con una macro las filas que tengan datos erróneos e incompletos. Me refiero a incompletos como por ejemplo fecha incompleta ("12/19/201").
Agradezco tu colaboración gracias de ante mano!
Adjunto link de ejemplo.
https://www.dropbox.com/home?select=fechas%20incompletas.xlsx
Respuesta de Luis Mondelo
1
No puedo entrar en el enlace, me pide usuario y contraseña
En el siguiente enlace te dejo tu archivo con la solución. Al abrirlo solo tienes que pulsar el botón que hay en pantalla
http://share.cx.com/CxRXBY
No olvides finalizar la consulta
experto, me faltan por eliminar las fechas que están incompletas. Como por ejemplo que salga fechas de :
10/30/201
y debería salir :
10/302012
Gracias por tu ayuda.
Disculpa la demora utiliza esta macro
Sub proceso2()
Range("i2").Select
Do While ActiveCell.Offset(0, -1).Value <> ""
ActiveCell.Formula = "=iserror(year(" & ActiveCell.Offset(0, -3).Address & "))"
MsgBox ActiveCell.Value
If ActiveCell.Value = "Verdadero" Then
ActiveCell.EntireRow.Delete
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
End Sub
