使用VBA在Excel中自动创建系列

我想在Excel上自动完成一个简单的任务，但我不知道怎么做。（我试过宏录制器，但没用…）

假设我有一个固定的空间A1:T40 此空间中的所有单元格要么为空，要么包含数字0

我想选择所有的零（=非空单元格），并将它们添加到一个名为“零”的序列中

如何使用宏自动执行此步骤

---

手动操作时，我会使用Ctrl+G>Special>Constants>OK来选择这些单元格，单击公式>定义名称>输入名称“零”，然后点击OK。

宏记录器是如何不起作用的？当您记录这些步骤时，它生成的代码是什么？

Sub DefineNameForZeroes()
    ActiveWorkbook.Names.Add _
        Name:="Zeroes", _
        RefersTo:=ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants, 23)
    ActiveWorkbook.Names("Zeroes").Comment = "All the zeroes on this sheet"
End Sub