★在Excel中浏览图片的例子★

renqiang851224 · 发表于 2010-8-20 12:59

谢谢分享，学习一下

aistong · 发表于 2010-8-21 10:46

原帖由 LangQueS 于 2010-8-18 14:09 发表

建议楼主做好问题附件，发表在程序版求助。

你好，附件的“员工履历表”的信息通过设定公式由“员工花名册”获取。我将员工花名册的C5、C6单元格定义名称为“姓名”，“员工履历表”的A3单元格设置数据有效性直接获取名称“姓名”，“员工履历表”！B3有效性设为“=INDIRECT($A$3)”，想请教您，当“员工履历表”的B3通过下接箭头选择员工姓名时，“员工履历表表”！H1单元格能否显示D:\photo相应的员工相片呢，公式如何编写？能否详细些，我比较笨，谢谢楼主了。

LangQueS · 发表于 2010-8-21 12:21

原帖由 aistong 于 2010-8-21 10:46 发表

你好，附件的“员工履历表”的信息通过设定公式由“员工花名册”获取。我将员工花名册的C5、C6单元格定义名称为“姓名”，“员工履历表”的A3单元格设置数据有效性直接获取名称“姓名”，“员工履历表”！B3有效性 ...

★利用有效性信息批量调用信息和图片★ http://club.excelhome.net/thread-529975-1-1.html

aistong · 发表于 2010-8-23 09:45

原帖由 LangQueS 于 2010-8-21 12:21 发表

★利用有效性信息批量调用信息和图片★ http://club.excelhome.net/thread-529975-1-1.html

对于调用图片的VBA程序我大体看得懂，但如果是进行象我提出的改动的话，我就不会了，楼主能否详细些，谢谢！

LangQueS · 发表于 2010-8-23 09:53

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) '双击单元执行

改为

Private Sub Worksheet_Change(ByVal Target As Range) '修改单元执行

aistong · 发表于 2010-8-23 10:19

原帖由 LangQueS 于 2010-8-23 09:53 发表
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) '双击单元执行

改为

Private Sub Worksheet_Change(ByVal Target As Range) '修改单元执行

很惭愧，还是不懂，楼主能否直接在我的附件上编写程序呢？谢谢了！

LangQueS · 发表于 2010-8-23 11:16

原帖由 aistong 于 2010-8-23 10:19 发表

很惭愧，还是不懂，楼主能否直接在我的附件上编写程序呢？谢谢了！

aistong · 发表于 2010-8-24 09:30

请教楼主，为什么我做这样的改动，程序就不执行呢？请帮我看看问题出在哪？谢谢！

LangQueS · 发表于 2010-8-24 09:42

原帖由 aistong 于 2010-8-24 09:30 发表
请教楼主，为什么我做这样的改动，程序就不执行呢？请帮我看看问题出在哪？谢谢！

27楼附件不行么……我可是“代码盲”呀……

aistong · 发表于 2010-8-24 10:06

原帖由 LangQueS 于 2010-8-24 09:42 发表

27楼附件不行么……我可是“代码盲”呀……

27楼的附件可以，但我想直接引用到我的文件中来，我只是把您提供的工作薄删除，把VBA程序中的“J1”改为“H3”，同时目标标录下的文件夹也有对应的照片，但不不知为何不行。请楼主费心修改下，谢谢。

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

★在Excel中浏览图片的例子★

回复 1楼 LangQueS 的帖子