试着点击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”点击并导入您制作好的图片等,如图
调整下,即可,至于具体的,大家可以按自己的意愿去一项项的编辑,这个属性窗口参数并不难。
怎么样,写得乱糟糟的,见谅了!由衷的希望新手们能从中获取点什么,那是我最大的幸福!
还有一点要澄清的是,我开始说的,其实如果为了实用,真没的没有必要花尽心思做个登陆窗口,除了好看没有什么用处,因为电子表格你就算设置再多的权限用户,可它本身同时只允许一个操作用户打开,因此没有太实际的意义。当然了,要是高手就不一样了,多用控件等等,按钮化一键操作,这倒是值得大家深入学习的。
最后,希望版主加个精,第一次啊,新手不容易,而且附件工程不加密,服务广大新手!
新手们,给点力,支持下!
写给需要附件的新手们:
很对不起,附件超过200K,我权限不够,要的回复,留下邮箱。见谅!