- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：\→＄へ、＄→￥へ変換したい）
＄から￥への変換方法と価格表示について
このQ&Aのポイント
- 質問者は＄から￥への変換方法について質問しています。リンゴとバナナの価格において、＄立てと￥立ての値段を関連付ける方法を知りたいようです。
- 質問者はＢ番地に入力した金額に対応するＣ番地の価格を表示させたいと考えています。具体的には、Ｂ1番地に入力した金額に基づいてリンゴの＄立ての価格をＣ1番地に表示させる方法を知りたいとしています。
- また、質問者はＣ3番地に入力した値に対応するＣ2番地の価格を表示させたいとも考えています。具体的には、Ｃ3番地に入力した値に基づいてバナナの￥立ての価格をＣ2番地に表示させる方法を知りたいとしています。さらに、オレンジの価格表示についても質問しており、Ｂ番地かＣ番地のどちらか一方に価格を入力するだけで、両方の価格を表示させる方法を知りたいようです。
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
Ｑ１：C1セルに =B1/120 を入力。ただし頭に\,$を着けたいなら書式→通貨で記号を選択して下さい。 Ｑ２：Ｂ１、Ｃ１のいずれかに数値を入れたときに他方の値を計算で出したいのであればマクロが必要です。マクロで実現する方法でも良いですか？（ＶＢＡを多少ご存じでないと品目やレートが変わったときに手直しできませんよ） 「マクロはちょっと」というのであれば、別セルに =C1*120 で計算させるしかありませんね Ｑ３：Ｑ２で回答した通りです。マクロなら円、ドルどちらか一方に入力したら他方を計算できます。 最後にマクロの一例です。シート名タブ右クリック→コードの表示で開く画面に貼り付けて、シートに戻りＢ、Ｃ列に数字を入れてみてください。 Private Sub Worksheet_Change(ByVal Target As Range) With Target If IsNumeric(.Value) Then If .Column = 2 Then .Offset(0, 1) = .Value / 120 End If If .Column = 3 Then .Offset(0, -1) = .Value * 120 End If End If End With End Sub
