Question

我正在努力寻找一种方法来格式化注释中必须为货币值的行。

我已将变量设置为货币，但在注释中使用时会恢复为基本。

Dim wage As Currency
wage = Range("b14")

Range("C14") = wage

Range("D14").AddComment
Range("D14").Comment.Visible = False
Range("D14").Comment.Text Text:=
 Application.UserName & Chr(10) & wage & Chr(10) & "Joe Bloggs"

当我将鼠标悬停在休息模式下时，工资变量将b14中的值显示为纯值，但是我要求它以货币（£＃。##）出现

当我开始写

时出现以下语法

文本（[文本]，[开始]，[覆盖]）为字符串

我不确定，但是覆盖部分可以作为关键吗？

预先感谢

Answer 1

如果单元格 B14 的格式已设置为正确的货币格式，请替换：

Dim wage As Currency
wage = Range("b14")

具有：

Dim wage as String
wage = Range("B14").Text

使用VBA设置注释中的行格式

1 个答案: