例如,我在A1中输24 ,鼠标就跳转到24所在的单元格里,再点下24所在的单元格能返回A1,数据太多,拉横条有时拉不过来,求教高手!
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
r = ActiveSheet.Range("A2").End(xlDown).Row
If Target.Row > r And Target <> "" Then
If Target.Column = 1 Then
x = Val(Left(Target, 1))
y = Mid(Target.Text, 4, 5)
c = Rows(2).Find(y).Column + x - 1
Cells(r, c).Select
Else
我这图只是个例子,当然要跳转的数据可以放在同一个区间,比如说 B2行里,有人给我做了个宏,很类似,但我不知道怎么去修改它,太菜了