Excel 通过电子邮件发送此单元格时，如何将单元格中的数字转换为时间格式？

我使用VBA通过Outlook发送电子邮件。“我的邮件”宏包含的占位符工作正常。例如，我可以在我的消息中使用

[Date]

，它会被单元格B2中的日期替换

我还有一个单元格，其中包含以下格式的时间：

HH:MM

（

07:00

或

20:30

等） 但问题是，当我通过Outlook发送电子邮件时，我看不到

07:00

，而是被

02916667

Abs1=Replace（Abs1，[Von]”，表（“保留”）。单元格（2，“C”）。值）

此行用单元格中的值替换占位符。 现在我需要一些东西通过代码将这个数字转换成这种格式：

HH:MM

---

这是如何工作的？

您可以使用

格式

功能：

在您的代码中，这将是：

Abs1 = Replace(Abs1, "[Von]", Format(Sheets("Reservierung").Cells(2, "C").Value,"hh:mm"))

---

您可以使用

格式

功能来这样做：

在您的代码中，这将是：

Abs1 = Replace(Abs1, "[Von]", Format(Sheets("Reservierung").Cells(2, "C").Value,"hh:mm"))

---

问题是您使用的是

值

而不是

文本

：

Abs1 = Replace(Abs1, "[Von]", Sheets("Reservierung").Cells(2, "C").Value)

请尝试以下操作：

Abs1 = Replace(Abs1, "[Von]", Sheets("Reservierung").Cells(2, "C").Text)

---

并确保将“时间”格式应用于单元格（使用Ctrl-1）。

问题是您使用的是

值

而不是

文本

：

Abs1 = Replace(Abs1, "[Von]", Sheets("Reservierung").Cells(2, "C").Value)

请尝试以下操作：

Abs1 = Replace(Abs1, "[Von]", Sheets("Reservierung").Cells(2, "C").Text)

并确保将“时间”格式应用于单元格（使用Ctrl-1）。

使用

格式（范围（“任何范围”）。值，“hh:mm”）

如果单元格显示日期，则应能够使用

单元格（2，“C”）。Text

。或者，您可以使用

Format

强制将格式设置为您想要的任何样式。使用

Format（范围（“任意范围”）。值，“hh:mm”）

如果单元格显示日期，则您应该能够使用

单元格（2，“C”）。文本

。或者，您可以使用

格式

强制将格式设置为您想要的任何样式。