将VBA代码应用于每个单元格以构成另一个单元格

时间:2018-11-28 11:36:33

标签: excel vba

我仍在学习如何编写VBA,这非常具有挑战性。希望有人能帮助我。

当我在列D:E中选择“添加CCG / CC / PCG / PC”时,我想突出显示GB列中的单元格。但是我想从B15:B114开始应用。当我在B15D14:E15G15中选择它时,应突出显示。如果我选择B18,则D18E18G18应该突出显示,依此类推。我只能在一排中做到这一点,但是我又如何不将其一一应用到我想要的范围内。 预先感谢

Private Sub Worksheet_Change(ByVal Target As Range)

    If Range("B15").Value = "Add CCG/CC/PCG/PC" Then

    Range("D15:E15,G15").Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorLight1
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With

    ElseIf Range("B15").Value = "" Then
    Range("D15:E15,G15").Select

        With Selection.Interior
        .Pattern = xlNone
        .TintAndShade = 0
        .PatternTintAndShade = 0

    End With

    End If

End Sub

1 个答案:

答案 0 :(得分:0)

仅使用条件格式进行操作:

  • 选择单元格Tree *bsttemp = (Tree *)malloc(sizeof(Tree));
  • D15:E15, G15中选择新规则
    • 选择使用公式来确定要格式化的单元格
    • 添加公式Conditional Formatting
      注意-行号前没有=$B15="Add CCG/CC/PCG/PC"
    • 设置所需的格式。
  • $拖至D15:E15, G15

要通过VBA做到这一点:

D114:E115, G114

进一步阅读: