excel - 输入值后如何获取单元格的值？

Question

我想在输入一些文本后获取单元格的值。 基本上，我突出显示一个单元格，输入文本，按回车键，然后触发我的代码并将输入的值分配给变量。

我以为这很简单，但我被难住了!

Answer 1

您可以使用工作表级事件处理程序

Dim v As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target.Cells(1), Me.Range("A1")) Is Nothing Then
        v = Target.Cells(1).Value
    End If
End Sub

代码位于工作表模块中。