首页 > Office专区 > Excel教程 >

Excel列按照指定步长进行编号的方法

来源:互联网 2023-02-20 18:20:24 392

笔者最近在实际工作中遇到了需要对Excel中的单据一列按照8行一组(每组之间的编号相同,不同组编号都不同)这样的规律进行编号的需要,由于实际工作中数据行数众多,如果手动填拉显然费时耗力,必定事倍功半。笔者根据实际工作实践经验特此分享。vih办公区 - 实用经验教程分享!

Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

工具/原料

  • Excel

方法/步骤

  • 1

    利用函数实现非常的简单,如图示A2单元格输入公式:=ROUNDUP(ROW(A1)/8,0),然后将公式下拉即可实现分组编号。vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

  • 2

    利用vba实现,我们需要先按ALT F11打开VBE编辑器,或者单击“开发工具”选项卡下的“Visual Basic”按钮打开VBE。vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

  • 3

    有些小伙伴会纳闷怎么我的Excel没有“开发工具”选项卡,那是因为你没有在自定义功能区将“开发工具”勾选,具体方法:单击“文件”-“选项”,在弹出的“Excel选项”对话框中,单击“自定义功能区”,将“开发工具”前的√打上即可在主界面显示开发工具选项卡。vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

  • 4

    在“工程”窗口右键,单击“插入”-“模块”,新建一个模块。vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

  • 5

    将如下代码复制粘贴进新建的模块。vih办公区 - 实用经验教程分享!

    Sub Djcf()vih办公区 - 实用经验教程分享!

    Dim c As Integer, i As Integer, b As Integer, x As Integervih办公区 - 实用经验教程分享!

    c = 1 '表示编号开始数字(可根据需要修改)vih办公区 - 实用经验教程分享!

    b = 8 '表示每组相同编号的行数(可根据需要修改)vih办公区 - 实用经验教程分享!

    x = 20 '表示需要编号的总行数(请根据实际需要修改)vih办公区 - 实用经验教程分享!

    For i = 2 To x Step bvih办公区 - 实用经验教程分享!

    Range("A" & i).Selectvih办公区 - 实用经验教程分享!

    ActiveCell.FormulaR1C1 = cvih办公区 - 实用经验教程分享!

    If i b > x Thenvih办公区 - 实用经验教程分享!

    Range("A" & i & ":A" & x).Selectvih办公区 - 实用经验教程分享!

    Elsevih办公区 - 实用经验教程分享!

    Range("A" & i & ":A" & i b).Selectvih办公区 - 实用经验教程分享!

    End Ifvih办公区 - 实用经验教程分享!

    Selection.FillDownvih办公区 - 实用经验教程分享!

    c = c 1vih办公区 - 实用经验教程分享!

    Next ivih办公区 - 实用经验教程分享!

    End Subvih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

  • 5该信息未经授权抓取自百度经验
  • 6

    按绿色的三角或者F5允许程序即可实现分组编号,也可以在工作表界面,单击“开发工具”-“插入”,插入一个表单按钮控件,然后指定宏为Djcf,设计模式下,右键新建的按钮控件单击“编辑文字”将按钮命名为“单据拆分”,退出设计模式,单击允许程序即可实现分组编号。vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

    Excel列按照指定步长进行编号的方法vih办公区 - 实用经验教程分享!

  • 以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!vih办公区 - 实用经验教程分享!


    标签: excelVBA函数按照指定

    办公区 Copyright © 2016-2023 www.bgqu.net. Some Rights Reserved. 备案号:湘ICP备2020019561号统计代码