Vba excel将细胞转换为希伯来语货币（ILS）

Question

我正在尝试将带有数字的单元格转换为希伯来语货币格式，而不是获得货币符号，我会在附加示例中获得问号标记。 我重新录制了一个宏，但它似乎无法正常工作

Range("I4", "I" & LastRow).NumberFormat = _
    "_ [$?-40D] * #,##0.00_ ;_ [$?-40D] * -#,##0.00_ ;_ [$?-40D] * ""-""??_ ;_ @_ "

提前感谢，如果有人能回答我的问题，我会非常感激

Answer 1

VBA编辑器无法识别希伯来语货币符号，因此您可以使用ASCII字符。你要找的是ChrW（8362）。我从this website找到了正确的字符代码。

示例：

ActiveCell.NumberFormat = _
"_ [$" & ChrW(8362) & "-10D] * #,##0.00_ ;_ [$" & ChrW(8362) & "-10D] * -#,##0.00_ ;_ [$" & ChrW(8362) & "-10D] * ""-""tt_ ;_ @_ "

结果：