首页 > 解决方案 > 使用 NumberFormat VBA Excel 添加文本

问题描述

我写了下面的代码,现在我想像这样添加带有日期和时间的文本。

Last Update on: 3/12/2021  6:38:43 AM

我尝试使用下面的代码,但它不起作用任何帮助将不胜感激。

With Sheet9.Range("H8")
.Value = Now()
.NumberFormat = "Last update on: " & "mm/dd/yyyy h:mm:ss AM/PM"
End With

标签: excelvbaformat

解决方案


Excel(不是 VBA)中的数字格式看起来像"Last Update on " dd/ mmm yyyy- 修复文本需要放在引号中。

使用 VBA 设置数字格式时,您需要告诉 VBA(不是 Excel)您希望在字符串中包含引号。你可以通过双引号来做到这一点。看下面的语句: 第一个引号告诉 VBA 一个字符串开始。第二和第三个引号告诉 VBA 您不想结束字符串,而是在字符串中放置一个引号字符。

.NumberFormat = """Last Update on "" dd/ mmm yyyy"

推荐阅读