Question

我是VBA的新手，我有一份包含股票数据的Excel表格。

A栏 - 股票代码
B栏 - 股票名称
列C - ＆＃34;变量号＆＃34;，改变所有的号码时间。

当C列中的数字介于[-4; 4]之间时，应弹出一个消息框，显示A和A列中的股票代码。 B列中的名称，C列中的数字。

例如，如果此时，C列中的Google值为-1，则消息框将显示：Google Alphabet Inc -1 [在此示例中：Googl（A列），Alphabet Inc（B列）， -1（更改值为C列）。

请帮帮我，非常感谢你！

Answer 1

将此事件更改侦听器插入工作表（例如Sheet1）。 Target.Column是您的C列（传递正确的列号）

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.column = 3 And Target.value >= -4 And Target.value <= 4 Then
    Call MsgBoxMacro(Target.value, Target.column, Target.row)
  End If
End Sub

然后添加新宏（右键单击 - ＆gt;插入 - ＆gt;新模块）。将单元格值传递给它。

Sub MsgBoxMacro(value, column, row)
    MsgBox "Ticker: " & Cells(row, column - 2) & vbNewLine & "Stock Name: " & Cells(row, column - 1) & vbNewLine & "Variable Value: " & value
End Sub

VBA，不断听取符合特定条件的单元格的变化

1 个答案: