如何快速将公式单元格变成数值

梦馨天地

micch 发表于 2019-4-17 22:07
科目代码都不规律，那还叫什么科目代码？如果是财务数据，科目代码肯定能找到规律，模拟数据少所以用了le ...

谢谢！因为有些科目代码只到一级，也就只有四位数，但同样会带公式。但相对会比较少，用您教的方法，就得先把所有带公式的科目代码都调到二级。

白薯beyond

梦馨天地 发表于 2019-4-17 17:32
谢谢！我就是用复制数值的方法，就是得单个区域操作，想求还有没更快捷的方法。

更快速的办法已经给您贴出来了啊，用VBA。
E列行数如果变化的话就改成下边的代码（可以把100改成实际的行数）：

1. Sub 数值()
   
2. Dim i%
   
3. For i = 1 To 100
   
4.     If Cells(i, 5).Interior.Color = 5296274 Then Cells(i, 5) = Cells(i, 5)
   
5. Next
   
6. End Sub

复制代码

【如果解决了您的问题，请评分鼓励】

梦馨天地

micch 发表于 2019-4-17 17:50
不会更好的方法了，笨办法吧

您好！不好意思，还得请教您！按您教的方法，最后排序时弹出”这将会删除分类汇总项并重新排序。如果您要排序分类汇总数据组，那么请选”取消“按钮，再将分级显示折叠后，重新排序。请问需怎么处理呀？