excel中如何批量删除带有汉字内容的单元格?

匿名
2024-08-14T09:57:08+00:00

从网络上整理的资料,整理筛选出来的列中单元格内容有的是数字,有的是汉字内容,如何把 【【【带汉字内容的单元格】】】 快速筛选出来并删除,【【【并非删除汉字内容,而是筛选出带汉字内容的单元格,把单元格批量删除】】】求指导!!!

Microsoft 365 和 Office | Excel | 家庭版 | Windows

锁定的问题。 此问题已从 Microsoft 支持社区迁移。 你可投票决定它是否有用,但不能添加评论或回复,也不能关注问题。

0 个注释 无注释

3 个答案

排序依据: 非常有帮助
  1. 匿名
    2024-08-16T10:04:50+00:00

    您好,
    请问您现在进展如何?我们非常期待您的回复!如果有任何疑问或者其他需求,欢迎您随时联系我们!

    Thomas

    此答案是否有帮助?

    0 个注释 无注释
  2. 匿名
    2024-08-16T03:05:52+00:00

    好的,我试试,谢谢

    此答案是否有帮助?

    0 个注释 无注释
  3. 匿名
    2024-08-14T11:45:38+00:00

    您好,jack_chen20

    欢迎您致问微软社区。

    目前有我能想到两种方案,能够实现在Excel中特定列中只留下“数字”单元格。

    我在A列列举了一些简单的数据: 

    1. 使用Excel自带的筛选器工具 选中A列数据,选择菜单栏上方的“数据”选项卡,点击“筛选”。

      在A1单元格中会出现一个下拉箭头,点击箭头,选择“数字筛选”,选择“前10项”(您可以自定义显示的项目数量)。

      然后过滤器会筛选出只含数字的单元格。但是此方法是只显示数字单元格,并且A1单元格不参与筛选,实际上中文单元格仍然在工作表中。
    2. 使用VBA代码进行筛选和删除
      选择菜单栏上方的“开发工具”选项卡,点击宏,键入新的宏名称后点击创建宏。 将以下代码粘贴到宏程序中:
          Dim ws As Worksheet
          Dim cell As Range
          Dim i As Long     ' 设置目标工作表,这里以活动工作表为例
          Set ws = ThisWorkbook.ActiveSheet

        For i = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row To 1 Step -1
            Set cell = ws.Cells(i, 1)

            ' 检查单元格是否为中文
            If Not IsNumeric(cell.Value) Then
                ' 如果不是数字,删除该单元格
                cell.ClearContents
            End If
        Next i

    按下CTRL + S将.xlsx文件保存为.xlsm(Excel启用宏工作簿)文件。重新打开创建宏程序时的窗口,选择并运行刚刚运行的宏程序。
    
    [![](https://learn-attachment.microsoft.com/api/attachments/fc3dc7b3-0608-4de5-a6aa-cb0b733a9df3?platform=QnA

    此答案是否有帮助?

    0 个注释 无注释