3个妙招,Excel批量隔行插入标题行制作工资条


风晓
风晓 2024-01-02 07:10:55 50527
分类专栏: 资讯

工资条几乎是每一家公司都需要制作的东西,其中涉及到的一个步骤就是给每个员工的信息上都增加一个标题行,这样才方便后续的分发。这里会以下图为例,介绍3中不同的方式来给每一行都添加标题行。

 

 

方法一:

1.从第二位员工开始,每隔一行上方插入一个空行。具体的方法可以参考之前的隔行插入空行的文章:

2.然后复制标题行的内容。

3.选中这个区域,使用快捷键Ctrl+G打开“定位”窗口。

4.然后点击“定位条件”按钮。

 

 

5.在“定位条件”里面选择“空值”选项,点击“确定”。

 

 

6.这时再按Ctrl+V进行复制,标题行就复制进去了。

 

 

方法二:

使用VBA代码来实现,代码如下:

Sub InsertTitle()
    i = 3
    Do While i < ActiveSheet.UsedRange.Rows.Count + 1
        Rows(i & ":" & i).Select
        Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
        i = i + 2
    Loop
 
    Range("A1:F1").Select
    Selection.Copy
    Range("A1").Select
    Selection.SpecialCells(xlCellTypeBlanks).Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
End Sub

运行以后也可以批量隔行插入标题行。

 

 

另外要注意这里的代码适用于目前的表格,并且整个工作表中其他区域都是没有内容的。如果表格形式有变的话,都需要根据实际情况修改代码。

方法三:

使用公式来返回需要的内容。例如这里在工作表另外一个空白单元格里面输入公式:

=IF(MOD(ROW(),2)=1,OFFSET(A$1,0,0),OFFSET(A$1,ROW()/2,0))

然后向右和向下进行复制,复制需要的行数和列数即可,返回的结果就会在每一行里面插入一个标题行。

 

 

要使用公式的话,也是需要按照实际表格适当进行调整的。

网站声明:如果转载,请联系本站管理员。否则一切后果自行承担。

本文链接:https://www.xckfsq.com/news/show.html?id=33968
赞同 0
评论 0 条
风晓L1
粉丝 1 发表 522 + 关注 私信
上周热门
如何使用 StarRocks 管理和优化数据湖中的数据?  2959
【软件正版化】软件正版化工作要点  2878
统信UOS试玩黑神话:悟空  2843
信刻光盘安全隔离与信息交换系统  2737
镜舟科技与中启乘数科技达成战略合作,共筑数据服务新生态  1270
grub引导程序无法找到指定设备和分区  1235
华为全联接大会2024丨软通动力分论坛精彩议程抢先看!  165
点击报名 | 京东2025校招进校行程预告  164
2024海洋能源产业融合发展论坛暨博览会同期活动-海洋能源与数字化智能化论坛成功举办  163
华为纯血鸿蒙正式版9月底见!但Mate 70的内情还得接着挖...  159
本周热议
我的信创开放社区兼职赚钱历程 40
今天你签到了吗? 27
信创开放社区邀请他人注册的具体步骤如下 15
如何玩转信创开放社区—从小白进阶到专家 15
方德桌面操作系统 14
我有15积分有什么用? 13
用抖音玩法闯信创开放社区——用平台宣传企业产品服务 13
如何让你先人一步获得悬赏问题信息?(创作者必看) 12
2024中国信创产业发展大会暨中国信息科技创新与应用博览会 9
中央国家机关政府采购中心:应当将CPU、操作系统符合安全可靠测评要求纳入采购需求 8

加入交流群

请使用微信扫一扫!