主页 / coding / 问题 / 79595871
Accepted
SCM
Asked: 2025-04-28 14:00:12 +0800 CST

录制宏来查找和替换日期分隔符

  • 772

我有一列日期格式为 dd-mm-yyyy。

我尝试用“.”替换“-”，这样选定的所有日期看起来都像 01.01.2025，而不是 01-01-2025。

当我在 Excel 表中使用 ctrl+H 时它可以工作，但记录的 VBA 代码不起作用。

Selection.Replace What:="-", Replacement:=".", LookAt:=xlPart, _
  SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
  ReplaceFormat:=False
excel

1 个回答

  1. Best Answer

    在 Excel 中，日期以序列号的形式存储。例如，2025 年 1 月 1 日存储为 44601。您在屏幕上看到的格式 (dd-mm-yyyy) 只是一种显示格式。

    您的宏试图将“-”替换为“.”，因为它认为这些数字是数字，而不是文本。由于序列号中没有“-”字符，因此替换不会发生。

    您可以直接使用单元格格式更改日期格式，而不必替换字符：

    Sub FormatDates()
    Dim rng As Range
    Set rng = Selection
    
    rng.NumberFormat = "dd.mm.yyyy"
End Sub
    • 1

相关问题