Excel 中的货币

Currency in Excel

我想根据行中另一个单元格中的值更改单元格中的货币符号。

例如,如果单元格 A1 包含 "EU",则单元格 A2 将为 "€ 5.00"(如果计算结果为 3+2),并且如果单元格 A1 中的内容更改为 "GB" 然后 £ 5.00 将显示在 A2.

是否可以在 VBA 中执行此操作?我不想做一个简单的 IF 语句。

如果只针对一个单元格,那么一个非常短的宏就可以做到。 只需更改代码中的自定义格式即可: 子宏 2()

   If Range("a1").Value = "EU" Then Range("A2").Select: Selection.NumberFormat = """€""#,##0"
If Range("a1").Value = "GB" Then Range("A2").Select: Selection.NumberFormat = """£""#,##0"


End Sub

您不需要 VBA 为此 - 只需良好的 'ol 条件格式。选择 A2 单元格后,转到主页 --> 条件格式。然后点击"New Rule" --> "Use a Formula to determine which cells to format".

对于英镑格式,使用公式=$A="GB",然后点击"Format",到顶部的"Number",选择"Currency",然后找到英镑象征。一直点击 "OK"。给你!

对于 EUR 部分,重复上述操作,但使用 =$A="EU" 并在 Currency 中找到 EUR 符号。

你当然可以!在您的范围内使用货币值的条件格式。这是我在测试中完成此操作的方法...

  1. Select "amount" 范围内的第一个单元格,然后单击条件格式 -> 新规则。

  2. Select "Use a formula to determine which cells to format"

  3. 在框中,键入 =if([Cell w/ Country] = "USA", 1, 0 )。请注意,[Cell w/ Country] 是指示货币类型的任何单元格。在我的例子中,公式是 =if($A6="USA", 1, 0)。 [密切注意单元格引用 $A6 - 您希望公式适用于整个列(在此示例中),因此不要输入 $A。]

  4. 输入公式后,单击 "Format" 按钮。

  5. 单击 "Number" 选项卡并在类别列表中选择 "Currency"

  6. 使用符号下拉菜单,select 对应于您刚创建的规则的符号 - 在本例中为 $,然后单击确定。

  7. 最后,您只剩下规则管理器 window。您需要 select 规则适用的范围。输入范围,或单击范围 select 或按钮并突出显示范围。然后,单击“确定”。

以下是一些可能有用的屏幕截图:

交换国家,符号改变。