excel中如何实现双击单元格后跳转到另个一工作表（或另一个文件）

excel中如何实现双击单元格后跳转到另个一工作表（或另一个文件）

比如

双击A1，就自动跳转到 查询 这个工作表
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
Sheets("查询").Select

End If
End Sub追问我试了一下，这还是单击，单击就跳到了“查询”工作表，不是双击跳到“查询”工作表。
另外如果要跳到另外的文件，而不是另外的工作表，又该怎么写啊？
请高手给予答复，谢谢！

要实现这个功能，在工作表的VBA程序代码里边可以使用“Worksheet.BeforeDoubleClick 事件”处理。

其程序代码如下：（写在Sheet1代码里面，亲测可行）Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim ro, co
On Error Resume Next                '忽略运行过程中可能出现的错误
Application.EnableEvents = False    '开启代码只执行一次
Set mysheet2 = ThisWorkbook.Worksheets("查询")
ro = Target.Row         '获取双击单元格所在的行
co = Target.Column      '获取双击单元格所在的列
If ro = 1 And co = 1 Then       '如果是双击A1单元格，则
 mysheet2.Select                '跳转到“查询”工作表
 
End If
Application.EnableEvents = True   '开启代码只执行一次
End Sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！