Excel的复制代码问题求助高手！

来源：百度知道 编辑：UC知道 时间：2024/06/09 03:33:44
点击Excel某个单元格，就自动复制另一个单元格，这个要怎么设置？请高手帮忙啊。
bergyan的代码不能自动复制。
我在b2做了个超链接到B5，我想点击B2后就自动复制B5的内容，这个代码要怎么写？

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.address= "$b$2" Then
[b2] = [b5]
End If
End Sub

改成以上

需要通过vba实现
产生一个鼠标单击事件