分享

如何填写序号在Excel中跳过隐藏的行?

 zhouhualibrary 2019-06-24

填写序号跳过隐藏行:

Kutools for Excel插入序列号 实用程序可以帮助您快速在单元格范围或过滤列表中插入唯一的序列号,还可以根据需要将序列插入合并的单元格中。

DOC-重新编号 - 过滤 -  8,8

Kutools for Excel:比200方便的Excel加载项,可以在60天免费试用。 下载并免费试用现在!


填写序号可以用公式跳过隐藏的行


要仅将序列号填充到可见单元格中,一个简单的公式可能会对您有所帮助,请按照以下步骤操作:

1。 输入这个公式: = SUBTOTAL(103,$ B $ 3:$ B3)(B3 是与要开始填充序列号的单元格对应的可见单元格)放入要为此实例填充序列号A3的第一个单元格中,然后按 输入 键,你会得到一个数字1,看截图:

doc填写下来跳过隐藏3

2。 然后选择单元格A3,然后将填充手柄向下拖动到要填充序列号的单元格中,请参见截图:

doc填写下来跳过隐藏4


填写序列号用VBA代码跳过隐藏的行

以下VBA代码也可以帮助您将序列号填充到可见单元格中,请按照以下步骤操作:

1。 按住 ALT + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2。 点击 插页 > 模块,并将以下代码粘贴到 模块 窗口。

VBA代码:填写序号跳过隐藏行:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub FillValue()
'updateby Extendoffice 20151228
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim xVal As Long
    Dim I As Long
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
    Set xRg = xRg.SpecialCells(xlVisible)
    Debug.Print xRg.Address
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        xVal = xVal + 1
        xCell = xVal
    Next
End Sub

3。 然后按 F5 键以运行此代码,并弹出提示框提醒您选择要填写的数据范围,请参阅屏幕截图:

doc填写下来跳过隐藏5

4。 然后点击 OK 按钮,序列号仅填充到可见单元格中。


使用Kutools for Excel填充序列号跳过隐藏行

以上两种方法只能帮助您将序列号填充到可见单元格中,如果您想将序列填充为 AA-0001-BB,AA-0002-BB,AA-0003-BB ...,上述方法将不起作用。 但是,请不要担心, Kutools for Excel插入序列号 实用程序可以帮助您快速轻松地完成它。

Kutools for Excel : 与超过300方便的Excel加载项,在60天免费试用没有限制.

安装后 Kutools for Excel请按照以下步骤进行:

1。 选择要填充序列字符串的单元格。

2。 点击 Kutools > 插页 > 插入序列号 插入序列号 对话框,单击 最新上市 按钮,看截图:

doc填写下来跳过隐藏6 2doc填写下来跳过隐藏7

3。 在展开的对话框中,请根据需要在左下方区域中指定设置,同时您可以在右下方的窗格中预览序列,请参阅截图:

doc填写下来跳过隐藏8

4。 完成设置后,单击 添加 按钮将这个新项目保存到上面的列表框中,参见截图:

doc填写下来跳过隐藏9

6。 然后选择您创建的项目并单击 填充范围 按钮,序列字符串已被填充到可见单元格中,请参阅截图:

doc填写下来跳过隐藏10

立即下载并免费试用Kutools for Excel!


演示:使用Kutools for Excel,填充序列号跳过隐藏行

Kutools for Excel:比200方便的Excel加载项,可以在60天免费试用。 下载并免费试用现在!



推荐的Excel生产力工具

Kutools for Excel帮助您提前完成工作,并从人群中脱颖而出

  • 超过300强大的高级功能,专为1500工作场景设计,通过70%提高生产力,让您有更多时间照顾家庭和享受生活。

  • 不再需要记忆公式和VBA代码,从现在起让你的大脑休息一下。

  • 成为3分钟的Excel专家,复杂和重复的操作可以在几秒钟内完成,

  • 每天减少成千上万的键盘和鼠标操作,现在告别职业病。

  • 110,000高效人才和300 +世界知名公司的选择。

  • 60-day full功能免费试用。 60天退款保证。 2多年的免费升级和支持。


将选项卡式浏览和编辑带到Microsoft Office,远比浏览器的选项卡强大

  • Office选项卡专为Word,Excel,PowerPoint和其他Office应用程序设计:Publisher,Access,Visio和Project。

  • 在同一窗口的新选项卡中打开并创建多个文档,而不是在新窗口中。

  • 通过50%提高您的工作效率,每天为您减少数百次鼠标点击!

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多