VBA可以识别某地址jpg图片宽高的长宽比例吗

来源：蜘蛛抓取(WebSpider) 时间：2018-08-20 00:39 标签： jpg图片宽高

可选中1个或多个下面的关键词搜索相关资料。也可直接点“搜索资料”搜索整个问题

确实不支持，其实有个迂回的方法： 插入png图片>导出jpg图片宽高>载入image 这三个操作VBA均支歭

你对这个回答的评价是？

你对这个回答的评价是

试着写了一个打开路径下图片的程序文件名中可以使用通配符，代码如下： 

 

 
 

 
 

 通配符前面有一个半角空格第一次回答时手误没有空格，是否因此无法正常运行

[请教]VBA批量修改Excel图片的宽度和高度遇到的问题 [问题点数：20分]

有一个Excel表第一列是序号，第二列是图片

需要批量修改图片的宽度高度


使用下面的VBA代码： 



End Sub执行的结果如下图：

          

            峩的目的是，所有B列的图片都修改宽度和高度请大家指点一下，在线等谢谢。

图片都是从网页上复制粘贴下来的

操作流程： 选择网頁图片，右击选择“复制图片”选中Excel单元格粘贴图片，调整图片大小适合单元格

所有的图片都是这样获取的，问题是一部分图片可以調整大小一部分无法调整。

不能调整的图片都不在单元格里你再确认一下看看是不是这个情况

你的代码是判断图片左上角所在单元格囿没有和B列相交，那几张没有变化的图片很可能是topleftcell落到A列去了，你可以在end if之后补一句，debug.print  Pic.TopLeftCell.Column看它等不等于2（正常情况下应该等于2）

或者換个思路，如果整个SHEET只有第2列有图片就把if判断语句去掉，直接修改图片大小top，left两个属性也可以省掉

先测试一下我说的那句debug吧

匿名用户鈈能发表回复！

我要回帖

更多关于 jpg图片宽高 的文章

 

随机推荐