如何在 Excel 中以反向(降序或递减)顺序填充序列?
通常,我们在 Excel 中创建的序列都是升序的——即随着向下移动行或向右移动列而递增。然而,在许多实际场景中,您可能需要以反向、降序(递减)顺序填充序列。例如,创建倒计时、逆序分配任务,或为报告目的对数据进行格式化。本文将为您演示几种在 Excel 中高效实现反向或降序填充序列的方法,涵盖手动操作、公式驱动及自动化方案,助您根据具体需求灵活选择最合适的方式。
使用填充柄功能以反向或降序填充序列
使用 Kutools for Excel 以反向或降序填充序列
使用 Excel 公式以反向或降序填充序列
使用 VBA 代码以反向或降序填充序列
使用填充柄功能以反向或降序填充序列
要快速生成反向或降序的数字序列(例如 100、99、98……),您可以借助 Excel 内置的填充柄功能。当您需要创建一个按固定步长递减的连续序列,并希望获得一种无需复杂设置的高效解决方案时,此方法尤为适用。
1. 在目标单元格中输入降序序列的第一个值——例如,在单元格A1 中输入100.
2. 选中 A1 单元格,将鼠标指针悬停在其右下角,直至光标变为小黑十字。按住鼠标右键,向下拖动填充柄至目标位置后松开。随后在弹出的快捷菜单中选择序列,即可指定填充选项。如下所示:

3. 在弹出的序列对话框中,在步长值字段中输入一个负值——例如 -1(表示每次递减 1)——并根据您的需求勾选“按列填充”或“按行填充”选项。单击确定按钮,即可生成序列。示例如下:

确认后,Excel 将根据您指定的递减步长,自动以降序填充所选区域中的数字。

使用 Kutools for Excel 以反向或降序填充序列
Kutools for Excel 为经常处理自定义序列或需要将数字与文本组合的用户,提供了一款易于使用的插入序列号工具。该功能可创建并填充带有高级选项的降序序列,例如固定位数、前缀、后缀和自定义步长值,为批量编号任务带来极大的便利与灵活性。
1. 导航至 Kutools > 插入 > 插入序列号。

2. 在插入序列号对话框中,单击新建即可设置新序列。根据需要配置以下字段:

3. 配置并添加序列后,选择要填充的范围。在插入序列号对话框中,单击您创建的序列,然后点击填充范围按钮,所选单元格将立即填充您的降序序列,并保留原有的文本格式或数字位数。

4. 填充序列后,关闭对话框。
使用 Excel 公式以反向或降序填充序列
有时,您可能希望借助公式动态生成降序序列——尤其是在处理大型或可变大小的数据范围时,或希望摆脱填充柄的手动操作。通过恰当的公式,您不仅能自动生成反向序列,还能在新增或删除行时自动调整序列,甚至可引用其他单元格中的起始值,实现更高灵活性。
1. 选择您预期序列上方的单元格(例如 )A1)。如果希望序列从 100 开始,请在单元格 A1 中输入以下公式:
=100-ROW(A1)+1 该公式的工作原理如下:“100”是开始数字。“ROW(A1)”返回当前单元格的行号(本例中为 1)。当您将此公式向下复制到列中时,行号每行增加 1,从而使结果每次递减 1,形成降序序列。
2. 在 A1 中输入公式后,按 Enter 确认。要继续该序列,请选中单元格 A1,向下拖动填充柄,即可将公式快速复制到更多行。根据需要调整起始数字(示例中为 100),以匹配您期望的起始值。
=100-(ROW(A1)-1)*2,以实现每次递减 2. ="ID-"&(100-ROW(A1)+1)。使用 VBA 代码以反向或降序填充序列
对于更高级的场景(例如使用自定义步长填充序列、处理更复杂的模式(如包含前缀/后缀或字母数字组合),或填充大型可变范围),您可以借助 VBA 宏实现自动化。此方法特别推荐给有经验的用户,或在面对重复性任务、需要最大程度自定义时使用。
1. 点击功能区上的开发工具,再选择 Visual Basic,即可打开 VBA 编辑器。在 VBA 窗口中,点击插入> 模块 创建新模块,并将以下代码粘贴到代码窗口中:
Sub FillDescendingSeries()
Dim rng As Range
Dim StartNum As Long
Dim StepValue As Long
Dim cell As Range
Dim xTitleId As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the range to fill", xTitleId, rng.Address, Type:=8)
StartNum = Application.InputBox("Enter the starting number", xTitleId, "100", Type:=1)
StepValue = Application.InputBox("Enter the decrement per row (e.g.,1)", xTitleId, "1", Type:=1)
For Each cell In rng
cell.Value = StartNum
StartNum = StartNum - StepValue
Next
End Sub 2. 要运行此宏,请单击
“运行”按钮。系统将首先提示您选择要填充的范围(例如 A1:A20),然后输入起始数字(例如 100),再输入递减步长(例如 1,表示每个后续值比前一个值少 1)。宏将自动在所选范围内填充降序序列。
cell.Value 赋值语句来自定义此 VBA 代码,以包含文本或其他模式(例如,)cell.Value = "ID-" & StartNum)。.xlsm)。相关文章:
最佳办公效率工具
| 🤖 | KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行 | 生成代码| 创建自定义公式 | 数据分析及生成图表| 调用 Kutools Functions…… |
| 热门功能:查找、高亮或标记重复项 | 删除空白行 | 合并列或单元格且不丢失数据 | 不使用公式的四舍五入…… | |
| 高级 LOOKUP:多条件 VLookup | 多值 VLookup | 跨多工作表 VLookup | 模糊查找…… | |
| 高级下拉列表:快速创建下拉列表 | 级联下拉列表 | 多选下拉列表…… | |
| 列管理器:添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列…… | |
| 特色功能:网格聚焦 | 设计视图 |增强编辑栏 | 工作簿和表管理器 | 资源库(自动文本)| 日期提取 | 汇总工作表 | 加密/解密单元格 | 按列表发送邮件 | 超级筛选 | 特殊筛选(筛选粗体单元格/斜体/删除线……) ...... | |
| 精选 15 工具集:12 文本工具(添加文本,删除特定字符,……)| 50+ 图表 类型(甘特图,……)| 40+ 实用公式(基于生日计算年龄,……)| 19 插入工具(插入二维码,从路径插入图片,……)| 12 转换工具(小写金额转大写,汇率转换,……)| 7 合并和拆分工具(高级合并行,分割单元格,……)|……更多 |
使用 Kutools for Excel 大幅提升您的 Excel 技能,体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能,助您提升生产力、节省时间。立即点击此处,获取您最需要的功能……
Office Tab 为 Office 带来标签式界面,让您的工作更轻松
- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
- 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
- 将您的工作效率提升 50%,每天减少数百次鼠标点击!
所有 Kutools 插件,一个安装程序
Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。
- 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
- 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
- 协同效果更佳— 在多个 Office 应用中实现高效协同
- 30 天全功能试用— 无需注册,无需信用卡
- 超值之选— 比单独购买插件更省钱