请教各位,excel如何批量插入图片批注并保持原图片大小?

  • 约翰逊船长
    需求就是批量插入图片批注并且图片需要保持原大小,不变形

    下面是网上找到的vba代码,不知道什么原因, 运行后批注的图片没有正常显示
    Snipaste_2020-11-28_16-08-50.png
  • w
    wsyx87930
    感觉是.png的问题
  • 约翰逊船长
    回复2#wsyx87930


    改成jpg还是一样
  • r
    roadlala
    有批注的单元格上右键,选“显示批注” huawei fly ~
  • r
    roadlala
    另外,图片不是原尺寸显示的,作者默认的是3倍单元格大小
    我觉得单元格里放照片的本地链接比较省事,表格不太适合展示图片 huawei fly ~
  • 约翰逊船长
    找到另外一个能用的代码
  • 约翰逊船长
    回复5#roadlala


    超链接主要是会跳来跳去
  • r
    roadlala
    第一个挺好啊,操作的自由度更大一点

    .Visible = False

    这行删掉,跟第二个就一样的效果了 huawei fly ~
  • 约翰逊船长
    回复8#roadlala


    第一个我没搞懂哪里有问题
  • r
    roadlala
    回复9#约翰逊船长
    没有发现有啥问题啊,就是插入批注之后顺手隐藏了
    把隐藏批注的代码删掉还不显示吗 huawei fly ~
  • 约翰逊船长
    回复10#roadlala


    删掉后只显示空的批注框,都不显示图片了,之前是部分没有图片(编辑批注会显示出来),部分图片变形
  • r
    roadlala
    Dim cell As Range, fd, t, w As Byte, h As Byte, Lj As String


    改为

    Dim cell As Range, fd, t, w , h ,Lj As String huawei fly ~
  • 约翰逊船长
    回复12#roadlala


    可以了,感谢