excel - 单击另一个单元格并进行其他一些修改更改后，我需要在上一个单元格上运行宏

Question

基本上，我正在尝试创建这个 excel 宏表，以便当我单击任何单元格（在表格区域内）并输入一些值时，如果它的总和等于该行的键值（如附图中给出）并且列，它会更改单元格颜色或保留它。

Sub Add_Nos()

Dim r As Integer
Dim c As Integer
Dim active As Integer

r = Worksheets("Sheet1").Cells(ActiveCell.Row, "A").Value
c = Wor

Worksheets("Sheet1").Cells(1, ActiveCell.Column).Value

active = ActiveCell.Value
If active = r + c Then        
    ActiveCell.Interior.ColorIndex = 4
Else
    ActiveCell.Interior.ColorIndex = 0
End If

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Selection.Count = 1 Then
    Call Add_Nos
End If

End Sub

我希望当我在一个单元格中输入一些值然后单击另一个单元格时，它会验证输入的值并相应地制作颜色。但是，输入一些值后，当我点击离开然后再次点击返回时，只有它验证并显示一些颜色....

=>另外，我想锁定关键单元格的值并更改它们的颜色以保持它们在视觉上的区别。

标签： excelvba

Answer 1

正如imgur 评论中提到的，去条件格式！

如果单元格的值不等于行和列的总和，则此等式使单元格变为红色。您可以替换<>by=并将格式更改为绿色，现在，您完全相反（具有良好值的单元格以绿色突出显示）。不要忘记$你的范围内的（或缺乏），因为这就是使这个有效的原因。