input值后如何获取单元格的值？

我想在input一些文字后得到单元格的值。 基本上，我突出显示一个单元格，input文本，按回车，然后我的代码触发，我分配input值的variables。

认为这将是直接的，但我很难过！

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 

代码放在工作表模块中。