excel如何使用宏删除行保留序号

在Excel中，你可以使用VBA（Visual Basic for Applications）宏来删除行并保留序号。以下是一个简单的VBA宏示例，它将删除除了第一行以外的所有行，这样第一行的序号就会保留。

1. 打开Excel，然后按下 `Alt + F11` 打开VBA编辑器。

2. 在项目资源管理器中，找到你想要添加宏的工作簿，右键点击它，选择“插入” > “模块”。

3. 在打开的代码窗口中粘贴以下代码：

```vba

Sub DeleteAllRowsExceptFirst()

Dim ws As Worksheet

Set ws = ActiveSheet

' 删除除了第一行以外的所有行

ws.Rows(2).Delete Shift:=xlUp

End Sub

```

4. 关闭VBA编辑器，回到Excel。

5. 按下 `Alt + F8`，选择 `DeleteAllRowsExceptFirst` 宏，然后点击“运行”。

这段宏代码会删除工作表中除了第一行以外的所有行，并且不会改变第一行的序号。请确保在运行宏之前保存你的工作，因为宏会修改你的数据。