Excel 日期从 yyyymmdd 转换为 mm/dd/yyyy

Question

我已经搜索了大约一个小时来了解如何在 Excel 中执行此操作。

我有一个从旧系统创建的 Excel 文件，我正在从 SQL Server 数据库中提取信息，我会将信息输入回 SQL Server 数据库并希望日期匹配。

我尝试过创建自定义格式，但我不确定我是否做得正确。我找到了几个他们想反其道而行之的地方mm/dd/yyyy至yyyymmdd但他们并没有提供任何帮助。

我不熟悉在任何 Microsoft 产品中使用 VBA，否则我确信这将是一个简单的任务。

我有两个单独的列需要更改。

如何设置 (float) 中整个列的格式yyyymmdd 到 (Date)月/日/年

Answer 1

您可以使用单元格旁边的公式将值转换为日期:

=DATE(LEFT(A1,4),MID(A1,5,2),RIGHT(A1,2))

其中A1是您需要转换的字段。

或者，您可以在 VBA 中使用此代码:

Sub ConvertYYYYMMDDToDate()
   Dim c As Range
   For Each c In Selection.Cells
       c.Value = DateSerial(Left(c.Value, 4), Mid(c.Value, 5, 2), Right(c.Value, 2))
       'Following line added only to enforce the format.
       c.NumberFormat = "mm/dd/yyyy"
   Next
End Sub

只需突出显示您想要修复的任何单元格并运行代码即可。

注释为RJohnson评论中提到，如果您选择的单元格之一为空，则此代码将出错。您可以在c.value上添加一个条件，如果为空则跳过更新。