发布网友 发布时间:2022-04-23 10:20
共2个回答
热心网友 时间:2023-06-27 16:54
确保宏启用此Excel同时按Alt和F11进入宏界面点菜单插入模块粘贴下代码:
Sub test()
For Each cell In Range("A2:A48")
cell.Offset(0, 1) = cell.Hyperlinks(1).Address
Next
End Sub
把A2:A48改实际有超链接单元格区域直接按F5运行此宏对应右边格出现超链接地址追问为什么我的运行这个会报错啊 cell.Offset(0, 1) = cell.Hyperlinks(1).Address 错误在这里
追答需要放在对应的sheets下 ,
热心网友 时间:2023-06-27 16:54
用VLOOKUP函数是可以 把这个表里面的数据取到别一个表里数据对应的名字例:=VLOOKUP(F2,E:\[核对进项税摸板1月.xlsx]已认证*1月'!$C$2:$E$315,3,0)追问我只提取超链接
追答你选择性粘贴 不就可以了么 成为数值就好了