☰

在 Excel 中拼写美分减美元数字时，如何删除“无美分”？

tag-icon • tag-icon microsoft-excel vba
在 Excel 中拼写美分减美元数字时，如何删除“无美分”？

目前，我正在使用 Microsoft 支持网站上的一个模块来拼写美元值。以下是链接http://support.microsoft.com/KB/213360

我可以在 Excel 中完美地拼出美元值。但我不希望它拼出“无美分”。所以，假设我想拼出24030。它会说Twenty Four Thousand Thirty Dollars and no cents。我希望 Excel 仅在存在美分值时才拼出美分值。

如果有人能帮助我，我将不胜感激。在此先行致谢。

如果这个问题已经被问过，我提前道歉，但我无法找到正确的答案。希望有人能帮我解决这个问题。

答案1

这是一个 case 语句，根据所呈现的标准选择给出哪个选项。对于 cents，如果呈现的是空白字符串，则它会选择“and No Cents”。在本例中，只需将其提供的内容更改为空白字符串即可：

Select Case Cents
        Case ""
            Cents = ""
        Case "One"
            Cents = " and One Cent"
        Case Else
            Cents = " and " & Cents & " Cents"
End Select

相关内容