Excel 2016如何删除带超链接表格前空格?

原创
2020/07/10 19:54
阅读数 166

本文演示文档包含超链接。如图

先尝试使用trim和clean函数,=substitute(a1,char(9),"")公式。效果完全一致,超链接被删除。如下图

再次使用搜索引擎,网友给出建议,先提取超链接,删除空格后重新复制回表格。继续接上文操作。

首先创建宏。点击视图选项卡-宏-录制宏-给宏取名-确定。本文宏名称提取表格超链接。

再次点击宏-查看宏-编辑。

宏代码如下所示

Sub 提取表格超链接()
'
' 提取表格超链接 宏
    Columns("B:B").EntireColumn.AutoFit
    ActiveWindow.SmallScroll Down:=-6
    Application.Goto Reference:="'2019中国综合类大学排名.xlsx'!提取表格超链接"
'
For Each cell In Range("A1:A25")
cell.Offset(0, 1) = cell.Hyperlinks(1).Address
Next
End Sub


#注意不要超界 本文表格为A1-A25
#注释内容可以不复制

点击F5或绿色按钮运行宏代码。

提取结果如图所示

D1单元格使用hyperlink函数。如下图

 

展开阅读全文
打赏
0
0 收藏
分享
加载中
更多评论
打赏
0 评论
0 收藏
0
分享
返回顶部
顶部