400-685-0732

WJMonitor舆情之声

企业大数据智能舆情监测管理解决方案

全网监测海量数据按需发布监测预警

实时把握舆情动态精准追溯信息源头

获取验证码
企业采购 个人使用
当前位置: 首页 > 办公 > excel > excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

时间:2018-07-13 15:41:52

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法,还在玩王者荣耀吗?还在吃鸡吗?不要浪费青春了,来跟我学习新技能:excel单元格公式删除,把时间花在正事上才能有进步,看完excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法这篇文章你一定会觉得你又成长了很多,因为这个确实可以给你的工作带来很多便利。

Excel工作表中往往存在着各种公式,当公式引用的单元格中的数据发生改变时,公式所在单元格计算结果也会随之变化。但在实际操作中,有时需要在公式获得计算结果后,其值能够固定,不再随着引用单元格中值的变化而变化。此时,将单元格中的公式删除以取消与引用单元格的关联是解决这个问题的一个办法,本例将介绍使用VBA程序快速删除单元格中的公式的方法。

1、启动Excel 2013并打开需要处理的工作表,E3:F6单元格区域的单元格中存在着公式。在“开发工具”选项卡的“控件”组中单击“插入”按钮,在打开的列表的“表单控件”栏中选择“按钮”控件,如图1所示。

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

图1 选择“按钮”控件

2、按住左键拖动鼠标在工作表中绘制该控件,此时将打开“指定宏”对话框,在“宏名”文本框中输入宏名后单击“新建”按钮,如图2所示。

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

图2 设置宏名

(3)打开Visual Basic编辑器并自动创建名为“删除公式”的过程,在代码窗口中输入过程代码,如图3所示。具体的程序代码如下。

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

图3 输入程序代码

01 Sub 删除公式()

02 Dim Mywb As Workbook,Myws As Worksheet

03 Dim rng As Range,rngA As Range

04 For Each Mywb In Workbooks

05 With Mywb

06 For Each Myws In.Worksheets

07 On Error Resume Next

08 Set rngA=Myws.UsedRange.SpecialCells(xlCellTypeFormulas)

'获取公式单元格区域引用

09 For Each rng In rngA

10 rng.Value=rng.Value'将公式转换成数值

11 Next

12 Next

13 End With

14 Next

15 End Sub

注意

在这里的程序代码中,使用For Each……In结构对每个工作簿的每张工作表进行循环,使用SpecialCells(xlCellType Formulas)语句获取工作表中带有公式的单元格。同样使用For Each……In语句来遍历所有带有公式的单元格,使用rng.Value=rng.Value语句将单元格的值赋予单元格以实现将单元格中的公式转换为具体的数值。

4、切换到Excel工作表,右击按钮,选择快捷菜单中的“编辑文字”命令,然后将按钮上的文字修改为“删除公式”。取消对按钮文字的编辑后单击该按钮运行程序,工作表中的所有公式均被删除,原来带有公式的单元格中只显示了公式的计算结果,如图4所示。

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

图4 删除单元格中的公式

本文已经收录至:《Office 2013应用技巧实例大全》 - Office2013高级应用篇

以上就是excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法全部内容了,希望大家看完有所启发,对自己的工作生活有所帮助,想要了解更多跟excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法请关注我们优词网!

excel单元格公式删除 使用VBA程序快速删除单元格中的公式的方法

分享按钮