先前一直都是在论坛里找资料、求帮助,今天我也班门弄斧一把,把我自己这段时间来,搞出来的一些经验与大伙分享下,第一次哦,不好请见谅! 很多人,都想在Excel里弄个非常漂亮的登录窗口,如图: 其实也无可厚非,不过据本人这段时间的研究表明,其实这个登录窗口并没有太实际的意义,甚至说比不上Excel自带的密码保护工具,当然这也是本人的拙见,呵呵。 下面切入正题,就是关于登录窗口制作,个人觉得可以简单点,毕竟现在真正懂VB语言的高手在实际工作中并不多,因此代码越少越好,这样也能减轻不少压力。举个实际: 这个窗口是我自己弄的,看这个感觉复杂吗? 呵呵,其实一点都不复杂,我是用PS做的背景图片,真正用VB的地方并不多。 这是原图,当然你也可以不用这个背景了,随你高兴。比如这样: 打开PS,选择想用的图片或公司外观图片 之后按自己的意愿编辑,如图: 到了这一步,接下来就是编写代码了,当然您还可以继续美化! 以上有不到位的地方,请高手们指导下! 涉及到VBA代码编写这一块,我只能粗略的说下,毕竟我也是初学者。送给像我一般初学者一句话就是,多看VBA实例,看多了,其实哪怕你不是很懂编写代码,但也可以从别人编写的代码中,找到自己能用的那一部分,不过这也是解燃眉之急时用用,更多的还得用心去学。 如今,在网上我们都可以下到一些那些高手们写好的代码,要么被锁了,要么在我们想套用的时候,经常会在我们要用的表格中出现编码错误,毕竟他们编写代码的时候,表格选用、分布上,和我们往往是不一致的,因此如何快速准确的让我们初学者套用高手的成型代码就值得我们研究了。见图: 这是一个登陆窗口成型代码,需要密码才可以登录,密码对了就进入编辑模式,错了直接退出,这些命令的字眼其实在代码中我们就可以找到,见附图 图中红色标示部分,即为我刚才所说的命令代码的文字提示。请看登陆界面样: 这个登录窗口是我按上面说的方法做的,要注意的是其中右侧的3个文本框和2个命令按钮(其中第2个是下拉菜单)。在代码中,都有与之关联的地方,当然具体代码代表什么意思,我也说不生很清楚,当然,您可以学我的一招,实在不行把其中的函数单词拿去翻译,注意就可以明白点代码的意义。下面大家下载附件,进去看看你,相信会理解得比较快。 最后,我给大家截几张图,在相应需改动的位置给新手做下标示,之后您就可以根据自己的实情,相应地做好改动。 首先打开VBA编辑器,会弹出这样的一个窗口: 试着点击Microsoft Office Excel 2003对象下的工作表,如sheet10(系统设置),右侧会弹出属性窗口,见图: 当然不是每个工作表的属性栏中都有代码的,需要用到的时候才需要编写,当然更多的VBA控件功能,要高手们才能解决,其中sheet10(系统设置)的代码意义相信大家一看就明白,再不懂的打开附件点击下看看了, ![]() 这里要特别说明的是“ThisWerkbook”这个对象,这里的代码应该是不可或缺的,因为它关系着你打开电子表格的直接反应,具体参数,见下图: ![]() 大家想了解其相关代码信息,也可以参考下面这个成品代码,这是我从网上某个高手手上“挖”来的,具体见: Private Sub Workbook_Open() Application.Visible = False '隐藏应用程序窗口 Application.EnableCancelKey = xlDisabled '不答应应用程序中止 UserForm1.Show '模态启动登陆对话框,进入登录界面 Application.WindowState = xlMaximized '登录完成后窗口最大化 Application.Visible = True '显示应用程序窗口 Application.EnableCancelKey = xlInterrupt '答应应用程序中止 End Sub 而对于窗体中的frmFace这个窗体对象,其代码的含义,无非是对登录界面最大化的要求。在您使用的我附件中“登录窗口”的时候,您可以剪切后保存试试,甚至将其导出后删除,其不影响登录窗口代码。 ![]() 最后,我们一起来研究高手们如何实现电子表格登陆窗口化的。 ![]() 点击“Login”,进入上图界面。数遍左键双击登陆窗口或鼠标右键点击“Login”选择“查看代码”,进入代码属性窗口界面 ![]() 太深奥的东西,我也不懂,能和大家分享的是,怎么去改这个“窗口代码”,使其适合大伙自己实际运用。大家仔细看截图,有标注的地方,需要注意。 ![]() ![]() 在我红线标注的地方,您只要按你工作表的实际去改动,就可以完成这个登陆窗口制作。 当然如果您还想按您自己的设计模板制作登陆界面,登陆背景什么的,您就按我上面所说,用PS或其他图形工作先做修饰、编辑等等,之后再导入工作工程窗体中,即可。 这一块,就容我再唠叨下,高手们就当做没有看见,相信这样的帖子也不会引起您们的注意,对吧,高手们? 关于如果导入自己设计好的窗口背景及模板,大家再打开刚才那个登陆窗体界面,如图 之后右键点击窗口图片,选择“属性”或者直接点击 ![]() 也可以打开,弹出属性窗口,如图 ![]() 在这一块,您就可以很好的编辑了,在按字母这边您可以找到“picture”点击并导入您制作好的图片等,如图 ![]() 调整下,即可,至于具体的,大家可以按自己的意愿去一项项的编辑,这个属性窗口参数并不难。 怎么样,写得乱糟糟的,见谅了!由衷的希望新手们能从中获取点什么,那是我最大的幸福! 还有一点要澄清的是,我开始说的,其实如果为了实用,真没的没有必要花尽心思做个登陆窗口,除了好看没有什么用处,因为电子表格你就算设置再多的权限用户,可它本身同时只允许一个操作用户打开,因此没有太实际的意义。当然了,要是高手就不一样了,多用控件等等,按钮化一键操作,这倒是值得大家深入学习的。 最后,希望版主加个精,第一次啊,新手不容易,而且附件工程不加密,服务广大新手! 新手们,给点力,支持下! |
|