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

Question

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

例如：

1。）下拉框（香港，伦敦，柏林）

2。）您选择（香港）

3。）sheet1.range（“A5：A7”）和sheet1.range（“G5：G7”）和sheet10.range（“B5：B6”）都变为所选位置的货币（即HKD） ）

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

这种类型的vba甚至可能吗？我应该怎么去尝试编码呢。

谢谢。

Answer 1

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-使用宏录制器确定要添加的代码以应用格式更改。