EXCEL表中怎么才能隔数行插入数行标题(含合并栏),如图:以25行为一个...

发布网友 发布时间:2024-10-24 09:09

我来回答

2个回答

热心网友 时间:2024-10-27 02:26

如果是为打印服务,可直接在“页面布局”选项中,选择“打印标题”,实现每页都有标题。

如果是为查看数据方便,可在“视图”选项下的“冻结拆分窗格”中,冻结标题行。


热心网友 时间:2024-10-27 02:33

处理前确保标题行只出现了一次,也就是最开始的位置,另外标题行只有三行,Alt + F11 打开 VBE,右键左侧的工程资源管理器选择插入、模块,在右侧的代码编辑器粘贴下列代码,关闭 VBE,按 Alt + F8 选择 InsertHeader,单击运行。

Sub InsertHeader()
    Dim HeaderRowCount As Integer, PasteNum As Integer, i As Integer
    HeaderRowCount = 25
    PasteNum = (ActiveSheet.UsedRange.Rows.Count - 3) / HeaderRowCount
    For i = 1 To PasteNum
        Application.ActiveSheet.Range("1:3").Copy
        Application.ActiveSheet.Rows(i * 28 + 1).Insert
    Next
End Sub

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com