="<table><img src="&C2&" height=190 width=100></table>"
提取超链接地址:
Sub ExtractHL() Dim HL As Hyperlink For Each HL In ActiveSheet.Hyperlinks HL.Range.Offset(0, 1).Value = HL.Address Next End Sub
留个言,露个脸啦。。
鸟叔来串门,通过虫洞穿梭至此,期待回访!
您的电子邮箱地址不会被公开。 必填项已用 * 标注
评论 *
显示名称 *
电子邮箱地址 *
网站
在此浏览器中保存我的显示名称、邮箱地址和网站地址,以便下次评论时使用。
留个言,露个脸啦。。
鸟叔来串门,通过虫洞穿梭至此,期待回访!