excel 如何不用双击就可以自动链接?

发布网友发布时间：2023-01-01 17:02

共2个回答

热心网友时间：2023-10-08 13:02

可以考虑用VBA自动生成，方法如下：
1. “工具”菜单-->“宏”-->“Visual Basic编辑器”
2. VBA界面中，选择“插入”菜单中的“模块”，将下面的代码粘贴的代码窗口中，然后关闭VBA（注意要按注释修改str1、i、count的值）

Sub Macro1()
Dim str1 As String, str2 As String
Dim i As Integer, count As Integer

str1 = "D" '将这个值修改为要创建超级连接区域的第一个单元格的列名，如D4单元格则为D
i = 4 '将这个值修改为要创建超级连接区域的第一个单元格的行号，如D4单元格则为4
count = 10 '将这个值修改为要创建超级连接区域中单元格的个数

Do While count > 0
str2 = str1 & i
Range(str2).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=ActiveCell.Text
i = i + 1
count = count - 1
Loop
End Sub

3.“工具”菜单-->“宏”-->“宏”-->选择“macro1”-->单击“运行”

热心网友时间：2023-10-08 13:03

vba 自动生成