加载中…
博文
标签:

excel

图片显示

分类: 技术
通过收集表收集的图片,从后台下载的excel文件中显示是url链接形式,如果想全部呈现出来,下面这个方法还是相当给力的。制作成宏的形式,目的是为了显示多图,sheet2的C、D列是多图,通过查找替换的办法将链接中的间隔逗号进行了替换。替换内容放在sheet2的A1单元格中,内容是' style='max-height:400px;' / > < img src='。
完成显现后,将sheet2中的A2至F1000单元格中的内容保存到记事本中,保证后将后缀改为html就可以看到您想要的效果了。
Sub mypic()
For i = 2 To 1000
    If Sheet1.Range('A' & i).Value < > '' Then
        Sheet2.Range('A' & i).Value = '< div>' & Sheet1.Range('A' & i).Value
        Sheet2.Range('B' & i).Value = '< img src='' & Sheet1.Range('G' & i) & '' style='max-height:400px;' / >'
        Sheet2.Range('C' & i).Value = '< img src='' & Sheet1.Range('J
个人资料
uei2
uei2
  • 博客等级:
  • 博客积分:0
  • 博客访问:1,647,770
  • 关注人气:267
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 会员注册 | 产品答疑

新浪公司 版权所有