[原创]职工档案系统

yuanzhuping

<p>作为一名财务人员，在工作中经常要查询XX人的社会保险号码、住房公积金号、身份证号码等等，还经常要查询职工的出生年月，年龄什么的，每次东翻西找的很不方便，所以做了个[职工档案系统]以方便工作，提高工作效率。顺便也能当通讯录来用。</p><p>如果人员太多在姓名栏选择不方便的话，也可以模糊查询，比如在姓名框输入张* *，点查询，可以把所有姓张的人员档案一 一在窗体中出现，直到查到为止，当然也可以用 *&nbsp;张 * 、* * 张进行查询。</p><p>最近经常看到有网友在找人事管理或档案管理方面的东西，因此把所做的[职工档案系统]贴上来，欢迎大家指正或者扩展功能。</p><p>VBA密码：123456，源码公开。</p><p><font color="#ff0033">请下载报错的朋友看29楼！</font></p><p>&nbsp; TcmzqPPk.rar (52.57 KB, 下载次数: 33995)

2007-4-20 08:09 上传

点击文件名下载附件
[原创]职工档案系统

<br/>

[此贴子已经被作者于2007-5-5 19:46:58编辑过]

LangQueS

不错，谢谢<strong><font color="#da2549">yuanzhuping</font></strong>兄！

kunny

<p>谢谢了，</p>

xolf

<p>很不错。实用和有效的工具。人员信息的查询在日常人事管理中经常用到。</p><p>学习了，呵呵。[em10]</p>

yuanzhuping

忘了说明一点，本系统女性职工的退休年龄是按55周岁来设置的，有的单位分为50周岁和55周岁两种退休年龄的，如果要区分的话，我想可以在录入和修改时根据职务或岗位来写入退休年龄的公式，这样要根据单位的实际情况来改代码了。

henrich

用不了啊,提示无法设置VALUE属性,类型不匹配

cntest

<p><br/>打开职工档案V1.1.xls时出现下图出错提示：</p><p><img src="attachments/dvbbs/2007-4/20074231961498820.jpg" border="0" onclick="zoom(this)" onload="if(this.width>document.body.clientWidth*0.5) {this.resized=true;this.width=document.body.clientWidth*0.5;this.style.cursor='pointer';} else {this.onclick=null}" alt="" /></p><p><br/>点击“结束”后，EXCEL窗口全部不见了，实际上并没关闭，当打开另一个EXCEL窗口时，其它的EXCEL窗口又全部出现了。<br/>后来发现UserForm_Activate()中的“Me.Controls("TextBox" &amp; i).Value = Cells(R, 1).Offset(0, i).Value”　出现“无法设置Value属性。类型不匹配。”错误提示，还有其它类型的语句也出现这个错误。<br/>我的Excel是 2003 (11.5612.5606)版。</p>

yuanzhuping

我的也是XP+2003的,重新上传了一个. WlEUkI0f.rar (49.98 KB, 下载次数: 2326)

2007-4-23 20:26 上传

点击文件名下载附件
[原创]职工档案系统

<br/>

cntest

<p>不知怎么回事，还是一样。</p>

yuanzhuping

<div class="msgheader">QUOTE:</div><div class="msgborder"><b>以下是引用<i>cntest</i>在2007-4-23 21:33:12的发言：</b><br/><p>不知怎么回事，还是一样。</p></div><p>没用什么特别的控件啊，应该没问题的，换台PC试试？</p>