连接使用VBA从单元中减去的细胞

Question

我希望将按钮连接到 i3 和 l3 中的单元格。因此，每当单元格 i3 中的数字与 l3 中的数字相加或相减时，总是从 500 美元开始减去。因此，如果 40 在单元格 i3 中，则单元格 l3 应读取为 460。如果 60 在单元格 i3 中，则单元格 l3 应读取 440。我已在下面添加了代码。我下面的代码现在只是从单元格 i3 中添加和减去。

Sub Lower()
    Range("i3").Value = Range("i3").Value - 1
End Sub

Sub Higher()
    Range("i3").Value = Range("i3").Value + 1
End Sub

Answer 1

用i3的设置总额

是最简单的方法是使L3 = 500 -i3的公式。

如果您想在VBA中进行操作，请尝试以下操作：

Private Sub Worksheet_Change(ByVal Target As Range)
    Cells(3, 12) = 500 - Cells(3, 9)
End Sub

它使用更改触发Cell L3的计算。

---

将子与

标准命令按钮的命令按钮相关联，在设计模式下，右键单击每个按钮，然后单击分配宏。然后从列表中选择子。

对于ActiveX按钮，在设计模式下，右键单击按钮，然后单击查看代码（或只需双击命令按钮）。在添加的单击事件子中，将关联的代码移至新创建的代码。

示例：

Private Sub Lower_Click()
    Range("I3").Value = Range("I3").Value - 1
End Sub

注意：< / strong>子名称将 /必须匹配命令按钮的（名称）而不是字幕（显示的文本）。默认情况下，第一个命令按钮将是commandbutton1_click（）。