Vba excel将单元格转换为希伯来货币（ILS）

我试图将带有数字的单元格转换为希伯来货币格式，而不是获得货币符号，我得到了问号符号，如所附示例中所示。 我重新录制了一个宏，但它似乎不起作用

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

---

提前感谢，如果有人能回答我的问题，我将不胜感激。

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

例如：

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

---

结果:

---

好吧，它基本上完成了任务，非常感谢。”范围（“I4”、“I”和LastRow）。数字格式=“[$”&ChrW（8362）和“-10D]*、#0.00[$”&ChrW（8362）和“-10D]*-#、#0.00[$”&ChrW（8362）和“-10D]*-“这比0编写“-tt”时效果更好，谢谢。