删除正斜杠

Question

我一直使用相同的代码来格式化日期很长时间，突然之间我遇到了错误。

Columns("E").Replace _
What:="/", Replacement:="", _
Searchorder:=xlByColumns, MatchCase:=True

Range("E:E").Select
For Each cell In Range(Range("E1:E1"), Range("E1:E1").End(xlDown))
cell.NumberFormat = "00000000"
Next cell 

我的返回值为06/7/3849。有谁知道发生了什么？我已经尝试了各种各样的事情来解决这个问题并且日期不断被抛弃。