Question

excel表格中鼠标点击单元格A1,自动将B1-B18中内容替换为C1中内容(C1中内容为公式)

Answer 1

在Worksheet_SelectionChange添加代码
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
‘添加代码’
End Sub

追问

能解释一下吗？
有点没看懂。或者来个示例。。谢谢大神

追答

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then
MsgBox ("这时单元格A1")
End If
End Sub

追问

这是个VB程序吗?说实话我没学过VB,不知道怎么使用.不过谢谢大神了.我先研究研究.如果能推荐个入门方法就好了.