Excel 通过组合框应用于范围的货币转换器

是否有一种方法可以应用vba代码转换一系列单元格的货币，而无需根据下拉框中选择的货币类型更改单元格内的公式

例如：

1.）下拉框（香港、伦敦、柏林）

2.）你选择（香港）

3.）表1.范围（“A5:A7”）和表1.范围（“G5:G7”）和表10.范围（“B5:B6”）均更改为所选地点的货币（即港币）

4.）您选择（柏林），然后将所有单元格调整为欧元

这种类型的vba可能吗？我应该如何着手编写代码呢

---

谢谢。

1-使用数据验证在代码中创建下拉列表

2-使用以下事件处理程序检查单元格的值是否已更改

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = Range("A1").Address Then
        'your code
    End If 
End Sub

其中A1是具有下拉列表的单元格

---

3-使用宏记录器确定要添加哪些代码以应用于格式更改。

如果不更改单元格中的公式，则无法执行此操作。您只需在所有公式中添加一个因子即可。当该系数=1时，则货币为美元（作为示例），当您在组合框中更改货币时，它将被更新（更高或更低）。