没有找到合适的产品?
联系客服协助选型:023-68661681
提供3000多款全球软件/控件产品
针对软件研发的各个阶段提供专业培训与技术咨询
根据客户需求提供定制化的软件开发服务
全球知名设计软件,显著提升设计质量
打造以经营为中心,实现生产过程透明化管理
帮助企业合理产能分配,提高资源利用率
快速打造数字化生产线,实现全流程追溯
生产过程精准追溯,满足企业合规要求
以六西格玛为理论基础,实现产品质量全数字化管理
通过大屏电子看板,实现车间透明化管理
对设备进行全生命周期管理,提高设备综合利用率
实现设备数据的实时采集与监控
利用数字化技术提升油气勘探的效率和成功率
钻井计划优化、实时监控和风险评估
提供业务洞察与决策支持实现数据驱动决策
翻译|其它|编辑:郝浩|2004-07-12 16:49:00.000|阅读 1997 次
概述:
# 界面/图表报表/文档/IDE等千款热门软控件火热销售中 >>
在Excel工作表中,通过VBA可以很容易地实现当某些单元格内容发生变更时,相关图片也进行同步变更的效果。但实际工作中,VBA程序的运行常常会受到各种原因限制而不能达到预期目的,况且并不是人人都能熟练运用VBA。那么,如果不借助于VBA的话,是否就不可能办到呢?
我们来看这样一个实例:这是一个利用Excel制作的“万年历”,功能是查询任一年的公历、农历、节气、节日、生肖等。在使用过程中,当使用者指定查询日期为1月份时,它能够显示1月份的日历,并配有当前月份插图及当前年份生肖图,如图(1)所示。当查询日期为2月份时,它显示2月份的日历并自动刷新月历插图,同时,由于正好跨了一个阴历年,工作表还一并刷新了生肖图片,由“蛇”变为“马”如图(2)所示。
图(1)
图(2)
这个“万年历”的制作过程没有使用任何VBA程序,那么,它是如何实现动态刷新图片这一神奇的效果的呢?
自从Excel 5.0 开始,Excel在原有“窗体”控件之外新增了 ActiveX 控件。实际使用中,当我们往工作表中添加某个ActiveX 控件时,比如 “CommandButton” 控件,很少人会在意“编辑栏”发生的变化,如下图:(如果您的工作表视图中没有“控件工具箱”,请右击工具栏,选择“控件工具箱”)
(图三)
在工作表中新建一个按钮控件以后,“编辑栏”中显示为“=EMBED("Forms.CommandButton.1","")”,这是该嵌入对象的表达式。这个表达式就是关键所在。如果我们在A1单元格里存入一张图片,再将表达式改写为“=A1”会怎样呢?结果这个CommandButton控件获得了“A1”单元格的“视”(视:即view,其定义为用户和文档之间可资完成全部输入、选择及文档编辑的中介物。文档管理着数据,但由视来显示它的部分或全部并反馈信息。此处“视”作类比)。如下图所示:
(图四)
由此我们可以知道,假如预先向某些单元格中存入图片,那么,当我们改变这个CommandButton控件所指向的单元格地址后,就能使之“看”到不同的被指向单元格所显示的内容。这样,就可以有规则地实现图片内容的“刷新”了。
掌握了上面这个技术特点以后,我们只需要实现能动态变更目标单元格地址即可。下面仍以“万年历”来举例说明该方案的具体实现方法。在这个例子里,我们要实现的是当月份发生变更时,显示不同的月历插图。
设计好“万年历”工作表后,将一空白工作表命名为“月历图”,在该工作表的A1-A12单元格中分别预置12张图片,图片预先调整为实际要显示的大小,并取消网格线(网格线也是该单元格“视”的一部分,如果需要显示的话可以一并保留),以备12个月份使用,如下图所示:(图五)
然后回到工作表“万年历”,将用于输入查询月份的单元格命名为“月份”,该单元格中的数值将作为指向工作表“月历图”中不同图片的指针。命名的目的是为了增加函数的可读性。在工作表“万年历”中插入一CommandButton控件,将其表达式写为“=月历插图”,虽然当前的变量“月历插图”尚未定义,不过没关系,这可以通过插入名称来进行内部定义:点击“插入->名称->定义”,这时弹出“定义名称对话框”,在“在当前工作薄中的名称”中键入“月历插图”,令“引用位置 =OFFSET(月历图!$A$1,月份-1,0)”,点击“添加”“关闭”完成操作。
这里用到了OFFSET() 函数,该函数的语法简述如下:
OFFSET(起始单元格,下偏移行数,右偏移列数),起始单元格自身偏移量为零,偏移数值为负数时则向相反方向移动。
文中公式“=OFFSET(月历图!$A$1,月份-1,0)”的意思是告诉CommandButton控件,从工作表“月历图”的A1单元格开始,根据不同的月份向下移动月份-1个单元格,并将该单元格的内容显示出来。上述操作完成后,其结果显示如下:(图六)
随着“月份”的变更,这个CommandButton控件将指向不同的图片,这也就完成了Excel 工作表中图片的智能刷新。
上述方法对于利用Excel工作表来处理配有图片的人事档案、产品及零备件库存等资料,可以实现同步调用相关图片并显示于指定位置,达到图文并茂的效果。其它方面的应用,读者可以自行发挥。
(编者注:示范文“万年历”,可到Excel Home(http://www.excelhome.net下载使用及参考)
"images/win0201/image014.jpg" v:shapes="_x0000_i1027">
(图三)
在工作表中新建一个按钮控件以后,“编辑栏”中显示为“=EMBED("Forms.CommandButton.1","")”,这是该嵌入对象的表达式。这个表达式就是关键所在。如果我们在A1单元格里存入一张图片,再将表达式改写为“=A1”会怎样呢?结果这个CommandButton控件获得了“A1”单元格的“视”(视:即view,其定义为用户和文档之间可资完成全部输入、选择及文档编辑的中介物。文档管理着数据,但由视来显示它的部分或全部并反馈信息。此处“视”作类比)。如下图所示:
(图四)
由此我们可以知道,假如预先向某些单元格中存入图片,那么,当我们改变这个CommandButton控件所指向的单元格地址后,就能使之“看”到不同的被指向单元格所显示的内容。这样,就可以有规则地实现图片内容的“刷新”了。
掌握了上面这个技术特点以后,我们只需要实现能动态变更目标单元格地址即可。下面仍以“万年历”来举例说明该方案的具体实现方法。在这个例子里,我们要实现的是当月份发生变更时,显示不同的月历插图。
设计好“万年历”工作表后,将一空白工作表命名为“月历图”,在该工作表的A1-A12单元格中分别预置12张图片,图片预先调整为实际要显示的大小,并取消网格线(网格线也是该单元格“视”的一部分,如果需要显示的话可以一并保留),以备12个月份使用,如下图所示:(图五)
本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@evget.com
面对“数字中国”建设和中国制造2025战略实施的机遇期,中车信息公司紧跟时代的步伐,以“集约化、专业化、标准化、精益化、一体化、平台化”为工作目标,大力推进信息服务、工业软件等核心产品及业务的发展。在慧都3D解决方案的实施下,清软英泰建成了多模型来源的综合轻量化显示平台、实现文件不失真的百倍压缩比、针对模型中的大模型文件,在展示平台上进行流畅展示,提升工作效率,优化了使用体验。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
服务电话
重庆/ 023-68661681
华东/ 13452821722
华南/ 18100878085
华北/ 17347785263
客户支持
技术支持咨询服务
服务热线:400-700-1020
邮箱:sales@evget.com
关注我们
地址 : 重庆市九龙坡区火炬大道69号6幢
慧都科技 版权所有 Copyright 2003-
2025 渝ICP备12000582号-13 渝公网安备
50010702500608号