VBA格式化为会计格式

Posted 2023-04-14

【中文标题】VBA格式化为会计格式

【英文标题】：VBA Formatting to accounting format

【发布时间】：2018-11-25 13:01:56

【问题描述】：

我正在尝试让 VBA 以“会计”格式（欧元）格式化单元格。我已经从显示

的选项中复制了格式

_-* #.##0,00 €_-;-* #.##0,00 €_-;_-* "-"?? €_-;_-@_-

当我尝试将其应用于

.Cells(1, 1).NumberFormat = "_-* #.##0,00 €_-;-* #.##0,00 €_-;_-* " - "?? €_-;_-@_-" 

我收到 400 错误。我做错了什么？

【参考方案1】：

双引号（在字符串变量中）：

Sub kjdsffh()
    With ActiveSheet
        s = "_-* #.##0,00 €_-;-* #.##0,00 €_-;_-* ""-""?? €_-;_-@_-"
        .Cells(1, 1).NumberFormat = s
    End With
End Sub

【讨论】：

谢谢。比想象的要容易！

欢迎您。轻微的后续问题：***.com/questions/53468715/vba-formatting-issue