发布网友 发布时间:2022-04-22 06:22
共1个回答
热心网友 时间:2023-09-24 04:43
方法如下|:
第一步如图:
第二步选中按确定,如图:
第三步将相关经验网页的文字和连接复制到excel工作表格中,如图:
第四步我们要录制一个新宏,宏的名称叫做jinagyan。路径:菜单栏--工具--宏--录制新宏,如图:
第五步录制新宏后编辑一下,点击菜单栏--工具--宏--宏,找到选择刚才录制的新宏,点击编辑,然后在弹出来的新窗口,将以下代码插入到里面,然后保存,如下图。
Sub jingyan()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub
最后一步,点击菜单栏--工具--宏--宏。找到录制的新宏jingyan,然后点击运行,连接全部会显示在表格的右边。