在excel中，如何用代码实现单击某单元格，让另一个单元格自动填写该单元格的内容

Question

例如我单击Sheet1的D2:D51中任意一个单元格后，使Sheet2的C1单元格显示我单击了的那个单元格的内容。

Answer 1

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 4 And Target.Row > 1 And Target.Row < 52 Then
Sheet2.Range("C1") = Target
End If
End Sub追问

这个感觉有个问题，就是第二排好像并没有体现D2:D51在Sheet1工作表。因为D2:D51和C1并非在同一个工作表中

追答

这个程序是写在Sheet1工作表的，C1是在Sheet2表里

追问

OK了，非常感谢

本回答被提问者和网友采纳