excel中如何实现双击单元格后跳转到另个一工作表(或另一个文件)
展开全部
要实现这个功能,在工作表的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
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
比如
双击A1,就自动跳转到 查询 这个工作表
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
Sheets("查询").Select
End If
End Sub
双击A1,就自动跳转到 查询 这个工作表
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
Sheets("查询").Select
End If
End Sub
追问
我试了一下,这还是单击,单击就跳到了“查询”工作表,不是双击跳到“查询”工作表。
另外如果要跳到另外的文件,而不是另外的工作表,又该怎么写啊?
请高手给予答复,谢谢!
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询