我希望更改 Microsoft Excel 工作表中 URL 的外观。目前,当前的 URL 看起来像:http://www.example.com/101010101010101010101010101
。我知道如何通过右键单击工作表并单击“超链接”来更改 URL 的锚文本,这种方法有效,但在处理包含数千个 URL 的工作表时,这种方法并不理想。
我想删除完整的 URL 锚文本并用 ASCII 替换它,✔
但要大规模删除并确保链接仍然有效。
问题摘要
如何更改 Microsoft Excel 中数千个 URL 的外观?
答案1
尝试一下这个小虚拟专用网络宏:
Sub HyperFixer()
Dim h As Hyperlink, r As Range
For Each h In ActiveSheet.Hyperlinks
Set r = h.Parent
h.TextToDisplay = "a"
r.Font.Name = "Marlett"
Next h
End Sub
宏的安装和使用非常容易:
- ALT-F11 打开 VBE 窗口
- ALT-I ALT-M 打开新模块
- 粘贴内容并关闭 VBE 窗口
如果您保存工作簿,宏将随之保存。如果您使用的是 2003 以后的 Excel 版本,则必须将文件另存为.xlsm而不是.xlsx
要删除宏:
- 调出如上所示的 VBE 窗口
- 清除代码
- 关闭 VBE 窗口
要使用 Excel 中的宏:
- ALT-F8
- 选择宏
- 触摸运行
要了解有关宏的更多信息,请参阅:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
和
http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx
必须启用宏才能使其工作!