万一收到这种Excel表格,千万别着急!|代码|编辑器|管理器|工具栏

DEAI中文网

DEAI中文网

  • 首页
  • UBU中文网
  • 领取MOLI红包
    你的位置:DEAI中文网 > UBU中文网 > 万一收到这种Excel表格,千万别着急!|代码|编辑器|管理器|工具栏

    万一收到这种Excel表格,千万别着急!|代码|编辑器|管理器|工具栏

    发布日期:2025-01-10 12:01    点击次数:148
    有时候,当我们收到并打开某个Excel表格时,会出现“不同的单元格格式太多”的提示。此时,我们只能反复多次点击【确定】直到提示消失。甚至有时候还会导致其它同时打开的Excel也受到影响。因为还没保存文件,Excel应用就卡死了!只能通过任务管理器(Ctrl+Shift+Esc)强制结束进程再重新打开,可是之前的修改却是全没了!当我们拿到的表格数据来源众多且经过了不断的复制和粘贴,就很容易遇到Excel使用的单元格格式数量达到上限,以至于出现“不同的单元格格式太多”的提示。不过,别着急,我们只需要借助VBA代码,将单元格格式批量删除就可以了。具体操作步骤1. 在运行代码前建议先复制并粘贴一份Excel副本,以防Excel损坏导致数据丢失。2. 按【Alt+F11】键,打开编辑器。依次点击【插入】【模块】,在空白处输入以下代码:Sub delstylelzj()Dim mystyle As StyleOn Error Resume NextFor Each mystyle In ActiveWorkbook.StylesIf mystyle.BuiltIn = False Then mystyle.DeleteNextEnd Sub3. 复制这断代码到空白模块中,并对照图片调整格式:4. 鼠标在输入的代码中任意位置点一下,确保运行的是当前代码。然后点击工具栏上的绿色“运行”图标开始运行。代码运行需要一些时间,请耐心等待。运行代码后将删除所有自定义单元格样式,但保留Excel自带的单元格样式。5. 完成后依次关闭所有窗口,最后记得【保存】一下之前改动的数据哦。

    栏目分类