VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 421|亚博足彩app下载安装: 5
打印 上一主题 下一主题

请教一个插入图片的问题

[复制链接]
跳转到指定楼层
1
发表于 2019-8-27 21:11:31 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
用这个过程向EXCEL单元格插入图片后为什么存在链接呢?图片所在的文件夹删除或者图片路径改变了就无法在EXCEL中正常显示图片?有什么办法弄成“插入图片”这种永久型的?
Sub Pict(x, y, z As String)
  With Sheets("SHEET1").Pictures.Insert(Pict_Selt & z)
    .ShapeRange.LockAspectRatio = msoFalse
    .Placement = xlMoveAndSize
    .ShapeRange.Left = Range(x).Left
    .ShapeRange.Top = Range(x).Top
    .ShapeRange.Height = Range(x & ":" & y).Height
    .ShapeRange.Width = Range(x & ":" & y).Width
  End With
2
 楼主| 发表于 2019-8-28 16:37:02 | 只看该作者
好像这是office2010及以后版本的bug,求高手支持,谢谢!
3
发表于 2019-8-28 18:03:57 | 只看该作者
试试录制宏,看看自动生成的代码是什么样的。
4
 楼主| 发表于 2019-8-28 19:45:59 | 只看该作者
第一次录制宏用插入图片一切正常,第二次执行宏后和用代码的效果一样,改变图片路径后图片不可显示。
5
 楼主| 发表于 2019-8-28 19:46:18 | 只看该作者
第一次录制宏用插入图片一切正常,第二次执行宏后和用代码的效果一样,改变图片路径后图片不可显示。
6
 楼主| 发表于 2019-8-28 19:47:18 | 只看该作者
Apple_0 发表于 2019-8-28 18:03
试试录制宏,看看自动生成的代码是什么样的。


第一次录制宏用插入图片一切正常,第二次执行宏后和用代码的效果一样,改变图片路径后图片不可显示。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2019-10-30 04:54

VB爱好者乐园(VBGood)
快速亚博足彩app下载安装 返回顶部 返回列表