EXCEL如何迅速逐行插入
在做好的工资中，如何能快速每行插入标题栏（基本薪，技术津贴，加班费，伙食补贴）这样的，怎么实现迅速每行都插入呢？？之前自己做都是一行复制，粘贴的，然后又复制，粘贴。有没有什么函数之类快速的方法。谢谢~~
使用排序技巧来处理
Excel版本参考：2010
1、B1输入1，下拉到B5
2、复制B1：B5内容，粘贴到B6
3、选中B列，点击数据-排序（AZ图标）
4、右击删除B列内容
5、查看效果
温馨提示：答案为网友推荐，仅供参考
第1个回答 2010-01-24
工资条设置
1 假设你的工资表数据库在sheet1，另加两个空表sheet2和sheet3 。工作表表签不能为文本
2 假设sheet1的表头在第1行，数据从A列到J列，在sheet2的A1单元格输入公式： =sheet1!A1 ，
然后向右拖动公式至J1，然后复制第一行，粘贴到第二行。这时，sheet2的第1行和第2行就把sheet1的表头和第一行数据引用过来了。如果表头在第二行在sheet2的A1单元格输入公式为： =sheet1!A2
3在sheet2的第3行A3里输入公式：=A$1 ，然后向右拖动公式至J3 ；选择A2：J3，把鼠标 放在右下角出现黑色十字的时候往下拉（这个操作就是把公式往下拉），有没有出现让你惊喜的东西？但是别高兴太早，仔细看看你会发现这里只是引用了行号为双数的数据。因为比如在第2行的单元格A2的公式是：“=sheet1!A2”，当把公式下拉的时候，第3行放的是表头，而第4行的公式就会变成：“=sheet1!A4”，而sheet1里的第3行的数据没有被引用，因此你还要做sheet3，步骤是一样的，只是把第二行的公式改动一下，比如在A2里输入公式：“sheet1!A3”这里就会把sheet1里行号是单数的数据引用过来了大功告成！看看能不能解决你的问题？
4 表3 sheet3应该这样做，步骤不一样，按sheet2的第1行复制，粘贴到sheet3第一行，然后复制，第一行到第三行（一定要隔一行）再在第四行输入公式 =A$1 。其它的步骤按sheet2是一样的。
1 假设你的工资表数据库在sheet1，另加两个空表sheet2和sheet3 。工作表表签不能为文本
2 假设sheet1的表头在第1行，数据从A列到J列，在sheet2的A1单元格输入公式： =sheet1!A1 ，
然后向右拖动公式至J1，然后复制第一行，粘贴到第二行。这时，sheet2的第1行和第2行就把sheet1的表头和第一行数据引用过来了。如果表头在第二行在sheet2的A1单元格输入公式为： =sheet1!A2
3在sheet2的第3行A3里输入公式：=A$1 ，然后向右拖动公式至J3 ；选择A2：J3，把鼠标 放在右下角出现黑色十字的时候往下拉（这个操作就是把公式往下拉），有没有出现让你惊喜的东西？但是别高兴太早，仔细看看你会发现这里只是引用了行号为双数的数据。因为比如在第2行的单元格A2的公式是：“=sheet1!A2”，当把公式下拉的时候，第3行放的是表头，而第4行的公式就会变成：“=sheet1!A4”，而sheet1里的第3行的数据没有被引用，因此你还要做sheet3，步骤是一样的，只是把第二行的公式改动一下，比如在A2里输入公式：“sheet1!A3”这里就会把sheet1里行号是单数的数据引用过来了大功告成！看看能不能解决你的问题？
4 表3 sheet3应该这样做，步骤不一样，按sheet2的第1行复制，粘贴到sheet3第一行，然后复制，第一行到第三行（一定要隔一行）再在第四行输入公式 =A$1 。其它的步骤按sheet2是一样的。
第2个回答 2020-12-23
EXCEL如何快速插入多行
第3个回答 2010-01-23
假设原表序号1、2、3、4......，在后面空白处编辑序号1.1、2.1、3.1、向下填充，再把标题栏复制、粘贴在1.1、2.1.....里。光标在序号任意格，点“排序”按钮，就OK了。
复制粘贴时，起初一行，第二次复制2行，第三次复制4行，第四次复制8行。粘贴8行，然后按“F4”（重复操作键）按一下，粘贴8行。
复制粘贴时，起初一行，第二次复制2行，第三次复制4行，第四次复制8行。粘贴8行，然后按“F4”（重复操作键）按一下，粘贴8行。
第4个回答 2010-01-23
Sub 宏1()
For i = 1 To 48
Selection.EntireRow.Insert
Rows("1:1").Copy
ActiveSheet.Paste
ActiveCell.Offset(2, 0).Range("a1").Select
Next i
End Sub
以上代码是插入首行,定位在A3单元格执行宏就会在A3-A51每行插入首行本回答被网友采纳
For i = 1 To 48
Selection.EntireRow.Insert
Rows("1:1").Copy
ActiveSheet.Paste
ActiveCell.Offset(2, 0).Range("a1").Select
Next i
End Sub
以上代码是插入首行,定位在A3单元格执行宏就会在A3-A51每行插入首行本回答被网友采纳