excel中用VBa自动设置单元格与工作表的超链接是什么?
2个回答
2018-02-21 · 知道合伙人软件行家
关注
展开全部
其实你只需要一个工作表事件就可以了,不需要增加超链接
"首页"工作表放在第一个标签位置
"首页"工作表标签,单击右键,查看代码,粘贴下面的代码
Sub 链接()
For i = 2 To Sheets.Count
range("A"&i).Value = Sheets(i).Name
Next
END SUB
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count = 1 Then
If Target.Column = 1 and target.value<>"" Then
Sheets(Target.Value).Activate
Sheets(Target.Value).Range("A10").Select
Else: Exit Sub: End If
Else: Exit Sub: End If
End Sub
"首页"工作表放在第一个标签位置
"首页"工作表标签,单击右键,查看代码,粘贴下面的代码
Sub 链接()
For i = 2 To Sheets.Count
range("A"&i).Value = Sheets(i).Name
Next
END SUB
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count = 1 Then
If Target.Column = 1 and target.value<>"" Then
Sheets(Target.Value).Activate
Sheets(Target.Value).Range("A10").Select
Else: Exit Sub: End If
Else: Exit Sub: End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询