在Excel 2010中删除数据

在Excel 2010中删除数据可以通过多种方式来实现，下面将介绍其中三种：

1. 删除单元格中的数据（保留格式和注释）

可以使用Delete方法删除单元格中的数据，该方法将保留单元格中的格式和注释。以下是一个示例：

Sub DeleteCellValue()
    ActiveSheet.Range("A1").Delete Shift:=xlShiftUp
End Sub

其中，Shift:=xlShiftUp表示删除后将单元格上方的内容上移。你可以将“xlShiftUp”替换为“xlShiftToLeft”（左移）或“xlShiftToLeft”（左移）以指定单元格被删除后图表的重新排列方向。

2. 删除整行/列中的数据

删除整行或列中的数据可以使用EntireRow.Delete和EntireColumn.Delete方法，以下是一个示例：

Sub DeleteRowColumn()
    ' 删除第一行
    ActiveSheet.Rows(1).EntireRow.Delete
    
    ' 删除第一列
    ActiveSheet.Columns(1).EntireColumn.Delete
End Sub

3. 删除特定条件下的数据

可以使用Range.AutoFilter方法和SpecialCells属性来删除符合特定条件的数据，以下是一个示例：

Sub DeleteByFilter()
    ' 将数据按第一列排序
    ActiveSheet.Range("A1:B10").Sort Key1:=ActiveSheet.Range("A1"), Order1:=xlAscending, Header:=xlYes
    
    ' 过滤第一列中大于5的数据
    ActiveSheet.Range("A1:B10").AutoFilter Field:=1, Criteria1:=">5"
    
    ' 删除符合条件的数据
    ActiveSheet.Range("A2:B10").SpecialCells(xlCellTypeVisible).EntireRow.Delete
    
    ' 关闭过滤
    ActiveSheet.ShowAllData
End Sub

在上述示例中，将数据按第一列排序，然后使用AutoFilter方法将第一列中大于5的数据筛选出来。接着，使用SpecialCells属性选择符合条件的数据，删除它们。最后，使用ShowAllData方法关闭过滤。

以上是Excel 2010中删除数据的三种方法。你可以根据不同的需求和场景选择对应的方法。