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

我试图将数字转换为希伯来货币格式，而不是获得货币的标志，我得到问号标志，如附加的一个例子。 我重新录制了一个macros，但它似乎不工作

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

在此先感谢，如果有人能回答我的问题，我将非常感激

Answer 1

VBA编辑器不能识别希伯来货币符号，所以您可以使用ASCII字符。 你要找的是ChrW（8362）。 我从这个网站find了正确的字符代码。

例：

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

---

结果：