用日期格式替换单元格上的字符“ - ”

时间:2014-10-31 16:05:41

标签: excel vba

我想用“。”替换“ - ”字符。包含日期信息的单元格内部。

使用下面的代码,这是在具有文本格式的单元格中获得的,但不是日期:

 Worksheets("Sheet1").Columns("A").Replace _ 
 What:="-", Replacement:=".", _ 
 SearchOrder:=xlByColumns, MatchCase:=True

我可以这样做但是对于具有日期格式的单元格吗?

1 个答案:

答案 0 :(得分:3)

尝试,

With Sheets("Sheet1")
    .Cells(1, 1).CurrentRegion.Columns(1).NumberFormat = "mm.dd.yyyy;@"
End With

将日期保留为您可以计算的日期,而不是将它们转换为在实际日期的直观表示之外无用的文本。