一份大而无当的员工生产能力评价表

联谊会 · 发表于 2009-7-2 10:04

厉害，学习

SSSABC123 · 发表于 2009-7-2 21:34

楼主特历害,输入员密码多少?
XIANG.DH_2008@163.COM

konray · 发表于 2009-7-2 23:55

能不写一个HELP文件,是如何设置的,如何因地制宜的复制楼主的杰作呢,

我觉得这是最重要, 如果楼主没有告诉大家如何作出来的,东西始终还是你家里的,请楼主不念赐教

lgs30425 · 发表于 2009-7-31 11:20

呵呵，做的很好，可以把密码告诉我吗？谢谢！邮箱：lgs30425@126.com

hotleon · 发表于 2009-12-2 15:12

各位参考VB程序就可以看见，密码是 20031125

Sub Login() '系统登陆
Application.ScreenUpdating = True
Set Dialog = DialogSheets("DH-Login")
Begin:
DBOXOK = Dialog.Show
If Not DBOXOK Then GoTo Begin
If Dialog.OptionButtons("S01").Value = xlOn Then
Sheets("VAR").Range("A2").Value = 1
MsgBox "现在您的身份是审查员！"
End If
If Dialog.OptionButtons("S02").Value = xlOn Then
Set Dialog = DialogSheets("DH-Pass")
Dialog.EditBoxes("Pass").Text = ""
DBOXOK = Dialog.Show
If Not DBOXOK Or Dialog.EditBoxes("PASS").Text <> "20031125" Then
MsgBox "　密码错误！您没有修改数据的权限！"
Sheets("VAR").Range("A2").Value = 1
MsgBox "现在您的身份是审查员！"
Exit Sub
End If
Sheets("VAR").Range("A2").Value = 2
MsgBox "现在您的身份是输入员！"
End If
End Sub

yuxin-shi · 发表于 2009-12-2 20:56

楼主真的是好厉害，能留下联系方式吗？有问题想向你请教！我的QQ 121356592

飞云楼主 · 发表于 2010-2-15 20:53

功能基本齐全，不错。

438865758 · 发表于 2010-2-24 23:12

楼主真的是好厉害，能留下联系方式吗？有问题想向你请教！我的QQ 438865758

konray · 发表于 2010-3-17 15:40

这个要顶起来,请楼主提供HELP文件,谢谢!

异域游弋 · 发表于 2010-5-13 16:02

宏，功能强大

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

一份大而无当的员工生产能力评价表

回复 1楼 HLAI 的帖子

回复 1楼 HLAI 的帖子