VBA自定义的NumberFormat

我有一个应用定制的NumberFormat细胞块小宏：VBA自定义的NumberFormat

Sub Inches() 
    Dim r As Range 
    For Each r In Selection 
     r.NumberFormat = "General"" inches""" 
    Next r 
End Sub

所以，如果一个细胞中含有1.25会显示为：

1.25英寸

我需要更改此宏，以便显示英寸而不是，而是显示双引号字符。

我一直无法逃避双引号的功能。

这个工程使用单引号：'r.NumberFormat =“General”“'”“'”' –

也'r.NumberFormat =“0.00''”'工作。我认为关键是使用两个单引号创建双引号，据我可以告诉 –

@AlexP - 这是现货！ .....谢谢！！ –

如何：

r.NumberFormat = "General"" '""'"

它使用两个单引号，不是双引号，但它现在可能是一个足够的近似值。

2014-07-13 13:19:02 djikay

-1

尝试将CHR（34）附加到输出字符串，例如

NumberOfInches = 4个

Debug.Print NumberOfInches & “” & CHR（34）

2014-07-13 13:15:06

...........它不适用于* NumberFormat *属性。 –

这将改变值的内容到一个文本字符串 –

@ Gary'sStudent如果你想使用类似的东西，你可以做.NumberFormat =“General \”＆Chr（34）。 –

回答