单元格引用图片

ivccav · 发表于 2020-12-27 17:16

①然如故发表于 2020-12-27 11:16
ivccav老师您好，运行时错误“91”对象变量或WITH块变量未设置要怎么处理，请您赐教，谢谢！

我的win10 64位+wps 2019 运行没有任何问题，不知道你的是什么原因。

你试试用管理员身份注册MSSTKPRP.DLL，因为win10可能无法原生支持ImageCombo等控件

DLL文件在附件中。修改了只在P4：P区域可用，且插入新图片前删除旧图片

单元格下拉图片.zip (140.38 KB, 下载次数: 32)

wowo000 · 发表于 2020-12-27 18:26

ivccav老师一出手就是非凡！！高！！！俺用WIN10+office2016完美运行。

①然如故 · 发表于 2020-12-27 19:08

ivccav 发表于 2020-12-27 17:16
我的win10 64位+wps 2019 运行没有任何问题，不知道你的是什么原因。

你试试用管理员身份注册MS ...

ivccav老师您好，非常感谢您耐心的帮助，我的win10 64位+Microsoft Office Excel2016运行正常结果很完美，遗憾的是我把代码及控件复制到实际工作簿中出现如图：
错误424.png

现将实际工作簿呈上，请您再帮完善，在下万分感谢！
另：图片改为png格式

单元格下拉图片更新件.rar (1.45 MB, 下载次数: 10)

①然如故 · 发表于 2020-12-27 19:14

本帖最后由 ①然如故于 2020-12-27 19:51 编辑

ivccav 发表于 2020-12-27 17:16
我的win10 64位+wps 2019 运行没有任何问题，不知道你的是什么原因。

你试试用管理员身份注册MS ...

ivccav老师您好，能不能把图片源直接放在工作簿中的一工作表上，这样就可以少去”FilPath“这个文件夹了。
选项框.jpg

ivccav · 发表于 2020-12-27 20:28

①然如故发表于 2020-12-27 19:08
ivccav老师您好，非常感谢您耐心的帮助，我的win10 64位+Microsoft Office Excel2016运行正常结果很完美 ...

加了一个“选择图片”的窗体，你原来的代码都没有改，只是注释掉了。

LoadPicture函数不支持PNG格式，你用画图打开，另存为JPG格式吧！

单元格下拉图片更新件.zip (1.46 MB, 下载次数: 31)

①然如故 · 发表于 2020-12-27 21:06

ivccav 发表于 2020-12-27 20:28
加了一个“选择图片”的窗体，你原来的代码都没有改，只是注释掉了。

LoadPicture函数不支持PNG ...

ivccav老师您好，在您的帮助下完美的实现了结果，如果能把 “UserForm”控件中的图片显示小些那就更完美了。

ivccav · 发表于 2020-12-27 21:37

①然如故发表于 2020-12-27 21:06
ivccav老师您好，在您的帮助下完美的实现了结果，如果能把 “UserForm”控件中的图片显示小些那就更完美 ...

单元格的尺寸单位和窗体中控件的不一样，不好转换，设置得差不多就行了。

单元格下拉图片.zip (141.81 KB, 下载次数: 23)

①然如故 · 发表于 2020-12-27 22:34

ivccav 发表于 2020-12-27 21:37
单元格的尺寸单位和窗体中控件的不一样，不好转换，设置得差不多就行了。

ivccav老师您好，在实际工作簿中运行时基本正常，但有时会出现错误：“1004”如图片，请指教，谢谢！

①然如故 · 发表于 2020-12-27 22:48

ivccav 发表于 2020-12-27 21:37
单元格的尺寸单位和窗体中控件的不一样，不好转换，设置得差不多就行了。

ivccav老师您好，如图
水平对齐.jpg

①然如故 · 发表于 2020-12-28 16:20

ivccav 发表于 2020-12-27 21:37
单元格的尺寸单位和窗体中控件的不一样，不好转换，设置得差不多就行了。

ivccav老师您好，在实际工作簿中运行有时会出现错误：“1004”如图片（在18楼），有时正常运行，请您指教，谢谢！

		自动登录	找回密码
密码			免费注册

[已解决] 单元格引用图片