Excel 插入图片自动适应表格大小，鼠标单击图片放大再单击缩小

linjuly16

各位大佬好，本人工作流水记录，有些流水需要插入凭证，想要实现：选择凭证对应单元格，点击“插入图片”控件，选择对应的照片，照片自适应表格大小，鼠标点击图片可以放大，再点击图片恢复。根据以前大佬的帖子找了两个对应的vba程序，一个自适应，一个点击放大，因为本人是小白不懂如何修改程序，两个程序放进去后，通过“插入图片”控件插入的图片能自适应表格大小，但是无法点击放大缩小。如果通过Excel本身的插入图片，手动缩小的图片则可以放大缩小。
求助大佬帮忙修改一下，让两个能够融合。
谢谢~

linjuly16

自己先顶一下

3190496160

经测试，在win10环境下，在wps2019中，和在微软office2010中都可以实现点击放大再点击缩小的功能的

yylucke

楼主的需求可以用类来解决，且对象用Image。

linjuly16

3190496160 发表于 2020-10-28 15:36
经测试，在win10环境下，在wps2019中，和在微软office2010中都可以实现点击放大再点击缩小的功能的

你好，你用“插入图片”那个控件来插入一张图片，插入的图片就无法放大和缩小。我重新上传了一下附件，最早那个有点小问题。

蓝桥玄霜

图片的例子：

linjuly16

蓝桥玄霜 发表于 2020-10-28 18:17
图片的例子：

蓝老师你好，刚开始那个附件有问题，我刚重新上传了一下。就是通过那个“插入图片”控件的自适应图片，就没办法点击自动放大缩小，如果是Excel正常插入图片那样，然后手动去调整到表格里面的就可以点击放大和缩小。

smiletwo

增加个控制变量，用来判断当前是放大状态还是缩小状态，点击后执行与当前状态相反的代码。

linjuly16

smiletwo 发表于 2020-10-28 18:28
增加个控制变量，用来判断当前是放大状态还是缩小状态，点击后执行与当前状态相反的代码。

谢谢你的建议，目前我还是小白，正在学习阶段还没办法自己修改程序，不知道是否有现成的帖子或者程序可以实现这种功能？

蓝桥玄霜

请见附件。