Excel或Excel的VBA：我怎样才能让一个小区用户点击并把它作为一个匹配结果到现有的细胞(ex

通缉

附件中是我想要做的剪断图片。 我有一列，列出了所有的选项，并在第二列中的某些项目。 对于每个项目我希望用户选择身体细胞，然后我可以使用该选择作为比赛的项目。 例如，如果在“用户1”使用点击然后我需要填充单元格D4与文本“USER1”。 我怎样才能做到这一点？ 谢谢！

Answer 1:

论对要使用选择的工作表中的代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Target.Column = 1 Then
        Dim s As String
        s = Cells(Target.Row, Target.Column)
        Sheets("SHEETNAME").Range("D4") = s
    End If

End Sub

Answer 2:

您可以使用工作表的事件处理程序。 根据您的具体情况，使用SelectionChange或DoubleClick。

例如，工作表代码模块中：

该代码查找用户选择在第1列的单元格，然后更新D4与选择的价值。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count = 1 Then
        If Target.Column = 1 Then
            Range("D4").Value = Target.Text
        End If
    End If
End Sub

请记住，这也将如果用户选择使用键盘，这就是为什么你可能更喜欢双击事件之前，使用小区更新：

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

（您还需要为true，如果您使用此添加取消=要在上面的代码，否则它将允许用户编辑单元格中的数值）

希望这可以帮助！

文章来源: excel or excel VBA: how can I let user click on a cell and use it as a match result to an existing cell