如何根据excel中的当前值来使用命令按钮来更新一系列单元格

Question

我正在excel工作，并尝试创建一个命令按钮，该按钮将根据单元格的当前值（整个列）中的当前值更新单元格中的值。

更具体地说，我的列有一个位于整数的位置ID。单击，我希望该列中包含值1或2的所有单元格更改为10。

我找到了有关级联if语句的信息，这似乎是关键。我以为类似以下功能可能会起作用，但是它一直告诉我我有逻辑错误。

Private Sub CommandButton1_Click() If Range("LocationID") = 1 Then Range("LocationID") = 10 Else If Range("LocationID") = 2 Then Range("LocationID") = 10 End If End Sub

位置是我要搜索和更改的列。我尚未将我的排序宏添加到此过程中，因为我认为它的工作方式与任何其他调用宏的按钮一样工作。

这可能真的是基本的，但是VBA对我来说完全是陌生的。整个早晨，我一直在面对这个问题。感谢您的帮助！

Answer 1

这听起来像是这样的意思：

Private Sub CommandButton1_Click()
      Dim lRow As Long
      lRow = 1
      Do Until Range("A" & lRow) = ""
        Select Case Range("A" & lRow)
          Case 1, 2
            Range("A" & lRow) = 10
        End Select
        lRow = lRow + 1
      Loop
End Sub

注意：我只是猜测是A列A。您将需要在所有3个位置将其更改为具有您想要的值的列。