- ベストアンサー
エクセルで通貨を表示する方法について
エクセルのリボンに通貨という項目があり、マウスでクリックすると 円を始め、主要通貨が表示されますが、そこの表示されていない通貨を追加することはできますか? (現在は、その他の通貨をクリックして選択しているため、非常に時間がかかる) また、Ctrl + Shit + 4で円表示(¥)のショートカットになりますが、 これを自分が使いたい通貨(円ではない)に変更は可能でしょうか?
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
デフォルトの通貨を変更することで可能になるかと思います。 ただ、言語が日本語だとデフォルト通貨を変更できるのは「¥・$・€」のどれかから選択することになるかと思います。 https://ja.gouma.org/Windows/How-to-Change-Windows-Default-Currency-from-Dollars-to-Euros/
その他の回答 (1)
- imogasi
- ベストアンサー率27% (4737/17069)
例えばブック単位とか、エクセルでは常時とかの設定は、WEBなどを調べた程度では、不明です。 https://docs.microsoft.com/ja-jp/visualstudio/vsto/globalization-and-localization-of-excel-solutions?view=vs-2022 のような記事がありますが、小生経験不足で、よくわかりません。 ーー この質問の答えになってないかもしれませんが、 VBAなら、FormatCurrencyやNumberFormatLocal で個別に必要な都度設定できますが。 内容的には、アラビア数字での記述は前提として、通貨記号、桁どりの3,4ケタ、「,」と「.」の国における使い方の違いなどは、盛り込めるでしょう。 一例で漢数字表示などは別途でしょう。 Sub test02() Dim curMoney 'curMoneyに \1000 がセットされます。 curMoney = FormatCurrency(1000, 0, 0, 0, 0) MsgBox curMoney 'curMoneyに \1,000 がセットされます。 curMoney = FormatCurrency(1000, 0, 0, 0, -1) MsgBox curMoney End Sub ーーー Sub test03() Range("A1:A4").Value = 123456 Range("A1").NumberFormatLocal = "$ #,##0" Range("A2").NumberFormatLocal = "\ #,##0" Range("A3").NumberFormatLocal = "#,##0""円""" Range("A4").NumberFormatLocal = "#,##0""en""" End Sub