工资表转换成工资条方法整理-各种方法-快速转变优质资料.doc
工资表转换成工资条方法整理,各种方法,快速转变优质资料(可以直接使用，可编辑 优质资料，欢迎下载）方法一：右侧两列中，交叉输入任意数字，然后选中交叉的四个单元格，双击右下角的“填充柄”，使这种格式一直填充至工资表的结束行（如图）。：“编辑”“定位”“空值”“确定”。：“插入”“行”。：复制表头的细目，选中A列区域，“编辑”“定位”“空值”“确定”，这时会选中刚插入的空行，“编辑”“粘贴”。制作完成。方法二：如果第一张表为“工资表”，单击Sheet2标签，重命名为“工资条1”，在“工资条1”工作表的A1单元格中输入=IF(MOD(ROW(),3)=0,"",IF(MOD(ROW(),3)=1, 工资表!A$1,INDEX(工资表!$A:$N,INT(ROW()+4)/3),COLUMN()。回车。：选定A1单元格，向右填充拖到J1单元格(注：拖的长度应与原表长度相同)。：选择A1:J1区域向下拖拖到最后一行即可(注：拖的时候可能拖多或拖少，这时要看一下原表)，加一下边框便成功了方法三：本工资簿包含两张表。第1张表就是工资表。它第一行为标题行包括序号、姓名、工资项目。第2张表就是供打印的表，称为“工资条”。它应设置为每三行一组，每组第一行为标题，第二为序号、姓名和各项数据，第三行为空白行。就是说能被3整除的行为为空行，整张表被3除余1的行为标题行，引用标题行，被3除余2的行为各项数据的行。用INDEX(区域,行,列)函数引用，公式为：=IF(MOD(ROW(),3)=0,"",IF(MOD(ROW(),3)=1,工资表!A$1,INDEX(工资表!$A:$M, (ROW()+4)/3,COLUMN()语法解释：如果行数除3余数为0，则空；如果行数除3余数为1，则取工资表A到M列，第1行（不可引用）；如果如果行数除3余数为2，则返回工资表A到M列，对应的列；行+4/3解释：行+4/3：行是工资条的行2， 5，8，11的行+4/3是返回的工资表是的对应的2，3，4行。如工资条的第2行返回工资表中（2+4）/3=2，工资条的第5行返回工资表中（5+4）/3=3，工资条的第8行返回工资表中（8+4）/3=4。方法四：OFFSET(reference,rows,cols,height,width)OFFSET的参数用法(以某个单元格（参数1referenc）为参照点（起点），下偏移（参数2 rows）行，右偏移（参数3 cols）列，按偏移后的单元格为起点选定下（参数4 height）行数，右（参数5 width）列数的一个区域）=IF(MOD(ROW(),3)=0,"",IF(MOD(ROW(),3)=1,工资表!C$1,OFFSET(工资表!$A$1,(ROW()+1)/3),COLUMN()-1)方法五：=IF(MOD(ROW(),3)>0,OFFSET(工资表!$A$1,(MOD(ROW()-1,3)*(ROW()+1)/3),COLUMN()-1),"")语法解释：此公式是自动生成循环序数.以工资条的7/8/9行的引用来理解：如果以A7为例：(MOD(ROW(),3)意思是行7除3余数为1>0，则以工资表!$A$1为参照系引用（(7-1)÷3的余数）×（7+1）÷3）=0，列0；如果以A8为例：8除3余数为2>0，则以工资表!$A$1为参照系引用（(8-1)÷3的余数）×（8+1）÷3）=3行，列0；如果以A9为例：9除3余数为0则空行。方法六：运用工资表转换成工资条模板、邮件方式、宏。等。以下详细设置：第一、基本设置假设工资的内容都放在名为“工资”的工作表中 工资的内容如下：第二、输入公式（在工资条中单中进行） 1、将工资复制到工资条第一行和第二行中2、在A3输入公式=OFFSET(工资!A$3,ROUNDDOWN(ROW()/4,0),0) 红色部分为工资表的名称,除以4是因为加抬头和一行空格行总共有四行 3、拖动填充柄将其向后拖到实发工资，调整好格式 4、选择A1:H4，按ctrl键向下填充,效果如下：第三、工资条变动 如果有减少人员，则后边的那些就删除掉就可以，增加人员的话就选择最后那一个下拉填充即可。2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：2021年月份日临时工工资表姓 名工种天数日工资金额实发工资签 名合 计小写：￥大写：制表人： 批准人：如何快速实现让每一条工资条加上表头内容方法一、利用excel排序功能请看下面图解：1、假设下图为一张简单的工资表2、在最后一列设辅助列，即将上图F列设为辅助列，在第二行输入数字1，剩下编码下拉填充实现，如下图3、在最后一行，即上图第六行黏贴第一行（表头）内容，并将辅助列设为编码1.1，然后整行下拉复制，使表头个数和工资条数量一致，如下图4、按照辅助列排序，操作步骤：菜单-数据-排序，如图5，最终效果图见下图6、如果不想还原工资表，就把辅助列那一列直接删掉，如果需要还原，就留下。方法二、利用公式下面是另一种实现此功能的公式，但是需在第一行，原有数据右边输入公式，例如：在F1输入 =IF(MOD(ROW(),2)=1,A$1,OFFSET(A$1,ROW()/2,0)公式向右复制到J1，把F1到J1向下复制到J10；再用格式刷把A到E列的格式刷到F到J列.这样可以实现：A1到E1是表头，A2到E6是数据，然后F1到J10是表头加数据，效果如下图。方法三 、执行VBA实现选择A1 执行VBA打开文件选项主选项卡开发工具打勾。如果有11条数据，i=1 to 10，100条就用1 to 99，先以5条数据为例，代码如下：Sub 工资条()Dim i%For i = 1 To 4ActiveCell.Rows("1:1").EntireRow.SelectSelection.CopyActiveCell.Offset(2, 0).Rows("1:1").EntireRow.SelectSelection.Insert Shift:=xlDownActiveCell.SelectNextEnd Sub下图是效果图
