Poundland
09-18-2008, 01:01 AM
Dear all,
I am trying to replace a date in a column with a blank cell, the code written below does not work, yet when I use the exact same criteria manually on the spreadsheet it works, can anybody tell me what I am doing wrong?
Your help is much appreciated.
Columns("al:al").Select
Selection.NumberFormat = "dd/mm/yyyy"
Selection.Replace What:="00/01/1900", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
I am trying to replace a date in a column with a blank cell, the code written below does not work, yet when I use the exact same criteria manually on the spreadsheet it works, can anybody tell me what I am doing wrong?
Your help is much appreciated.
Columns("al:al").Select
Selection.NumberFormat = "dd/mm/yyyy"
Selection.Replace What:="00/01/1900", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False