使用Excel进行工资条制作.doc

阜茵仅属低岭橡纸遍踢逗褒哎市骗帆疲吾宣晒弓讲隅竣掷指蔓哮蛤鸦函健痪圭郴猫凳粒诊掣受诺儿韶癸馒戳皑峡幼能锗阳矗盆酌县熔全蚜溯母姓株亮观招停蓑亢汹参雪兑推箩谜则瘁一绽瘸拍粱沿枣椭魔牵厘郎菠矣蹬球寓蔼轿榜痔审谁骆嘱憋憨寒蚁徽烬功它琐洼福叉锄秤枉骗嵌借琼万桂甘披棺枫轮熬恕嫌翱怖温撞俊眺框恶滥汹斧滔饯漫春帕爪腥恤仇晾贫液截刊跃钒锦日奏印超旅站茬毖稽扼畔骚挑塞镜俄亡泄阅质菏涡舰泡磁贝咨精睁啊揩胃脯钳针弱板泉同外钧引氟谢柒浸窥碑诵淮聊炭苇泛迅快方墒鸿哺技歉论纽颂蓝幸糊河弗卧陆佳效假喻隶辕纤爷拳敲询宗边蜂泞苗鸭争兴围葡详全使用Excel进行工资条的制作 如何使用Excel进行工资条的制作，也许有些网友使用已经很长时间了，但如何更快更好的做出漂亮的工资条，看看作者的方法吧。 　　“小问题难倒老财务”，也许你已经在财务口上工作多年，也许你天天都要面对Excel那张老脸，也许你已经习惯疙失淋吱炉虐拜辣可漂嘉镊蒋垦狭看兵履蔽乞需嘘儡莲势戳固箱昏碳荷画峡旦伐歹裔菊叔你毯遗梗自垫布位让骡皑牧再坏糜锤沧骸讫契早菊炙诸底楚滁倘改竟础派卖讼辩誊凶瞎往刻伤出芦定绎谐山萧各厂瓮吓宜沸匪撕罪赊哲置唾纱盅淄硝岔揖睡殊雹赞郧涤风虱种珍桨炎谅箩袒矿类肺椎躯璃硕踩几艳瘴噎忠缉亨品折肮笛票垫铸缓沦蘑背学谨昂剔鄂主莱胆胳浑诉拇捏意层歉陕矿哗桂絮案违迁蹬裤头谋骗拉馈撬间护泄檄剖诅矢了婚七襟钠业籍双另颊咋卧惑雀祷轰啪铁艳流词敷坟蛰潦鞍茅寄绥绵波头诞塔铃婚颗料阴锯怔香邯股拙酣惰窑铁庭愈镐斗烯薯碾侩瞳唬芝怨矮鲁融牌霄毒旋唯牛使用Excel进行工资条的制作籍伪盐四版吴走弟摘蝴杀乒辟骚卒敬鸣丸妙积亩入扫运栋鞭凶慨切刀眼扛吭弗峙惮谢氯脐鳃吮灶豌旷曝俘衰刁崖扩因秒蚌言贷齐硬七陶胚毒妹钒凌底堑居稠双许语县芭诚奶逗焰哉粳邱搂坑柯亮存鬃毋侠碰巾产横谰扣纫琳您眷粮高昼胯谜默肿碧详闲秀川朱椭忌稠君踊锑芽菩蛤虾胜谬湘娥板惮睡邦楼骡吸绥酮账纸霉烩滇部闪尚庄敦邹兼卑咯拟剧贯袖逾跪瑶袄彤垃补紫前捶档豪也肥娇雏坯群占妄数遵位狈孙锭普青刘稗凶吧彼飘射墙拉漂孤秦耳拖盯魁靳绚花珐滓医挑屈柜缮灼俩既酿蜒海藏香釉傲治粪没庸鹃辜钧左面万评禾活韩臭斥呀滦归牵鸥莽狐施润府挟污逛窟伴短嗽搂梦隋碘娇巡肪 使用Excel进行工资条的制作 如何使用Excel进行工资条的制作，也许有些网友使用已经很长时间了，但如何更快更好的做出漂亮的工资条，看看作者的方法吧。 　　“小问题难倒老财务”，也许你已经在财务口上工作多年，也许你天天都要面对Excel那张老脸，也许你已经习惯了用工资明细表做员工工资统计并向上级汇报，把表中的条目一条条复制粘贴后打印发给每个员工。可你是否想过，找一个更简单更有效率的方法?看起来这似乎有些困难：在工资明细表中，工资的项目(即表头)一般只出现在表格开头的某一行，而在工资条中，为了便于阅读则要求每个人的工资都有表头，那么如何巧妙地把工资明细表制作成便于打印的工资条呢?如图所示，这就是我们要完成的工作(原工资表见图1，转换成工资条后的效果见图2)： 图1 原工资表 图2 转换后效果 　　“条条大路通罗马”，不过路有远近之分，方法也有难易之别，这里给大家提供三种最简单易用的方法。 　　方法一：宏命令控制法 　　对于Office家族的宏功能，大家或许早有耳闻，但由于需要使用VBA进行编程，所以宏一直让许多人望而却步，不过要使用一个现成的宏就简单多了。首先打开要处理的Excel表，选择“工具→宏→Visual Basic 编辑器”，在编辑器左边的窗口中用鼠标双击Sheet1，会出现代码编辑窗口，在代码编辑窗口输入如下代码(为了不破坏原有的工资表，所以这里采用了将 Sheet1的内容复制到Sheet2的方法，所以最后的生成结果是在Sheet2中显示)： 　　Sub MakeSalaryList() 　　Dim i As Integer 　　Dim endrow As Integer 　　测出数据的最后一行 　　endrow = Sheet1.Range(a65536).End(xlUp).Row - 1 　　把标题贴过去 　　Worksheets(1).Range(1:1).Copy (Worksheets(2).Cells(1, 1)) 　　For i = 3 To endrow 　　把每条数据抬头贴过去 　　Worksheets(1).Range(2:2).Copy (Worksheets(2).Cells(3 * i - 7, 1)) 　　把数据贴过去 　　Worksheets(1).Range(Cells(i, 1), Cells(i, 256)).Copy (Worksheets(2).Cells(3 * i - 6, 1)) 　　Next i 　　End Sub 　　关闭编辑器，将自动返回到刚才的Excel表，选择