【问题标题】:Font formatting and or condition字体格式和或条件
【发布时间】:2021-02-24 21:18:12
【问题描述】:

我有一个表的数据集,其中包含 10 种不同的货币并附有价值。
对于每种特定货币,值的字体颜色必须更改为 RAG(红色、琥珀色、绿色)条件。
我尝试使用 CASE、IF AND OR 等重建几个 VBA 示例。

检索到的数据和要求。

【问题讨论】:

  • 在录制宏时在 Excel 中设置条件。这应该让你开始。

标签: excel vba if-statement formatting conditional-statements


【解决方案1】:

好吧,我在录音机上没有运气 我休息了几天,想出了以下 每当我改变 D4 的值时,E4 的颜色就会改变

If Range("D4") > 60 And Range("C4") = "RUB" Then
    Range("E4").Interior.color = RGB(0, 176, 80)
ElseIf (Range("D4") > 30 And Range("D4") < 60) And Range("C4") = "RUB" Then
    Range("E4").Interior.color = RGB(225, 192, 0)
ElseIf Range("D4") < 30 And Range("C4") = "RUB" Then
    Range("E4").Interior.color = RGB(255, 0, 0)
ElseIf Range("D4") > 60 And Range("C4") = "USD" Then
    Range("E4").Interior.color = RGB(0, 176, 80)
ElseIf (Range("D4") > 30 And Range("D4") < 60) And Range("C4") = "USD" Then
    Range("E4").Interior.color = RGB(225, 192, 0)
ElseIf Range("D4") < 30 And Range("C4") = "USD" Then
    Range("E4").Interior.color = RGB(255, 0, 0)
Else
    Range("E4").Interior.color = RGB(1, 111, 44)
End If

我设法让它在工作表上自动运行 现在只想知道这是否可以简化

【讨论】:

    猜你喜欢
    • 2015-12-03
    • 2014-07-07
    • 2014-03-30
    • 1970-01-01
    • 1970-01-01
    • 2020-02-09
    • 1970-01-01
    • 1970-01-01
    • 2016-12-20
    相关资源
    最近更新 更多