请问如何去掉EXCEL中的计算公式

Question

1.在VB中对EXCEL文件进行操作,先调用exlSheet.Calculate对EXCEL的数据进行计算,然后删除了EXCEL文件部分行列,在EXCEL文件打开时,如果某一个单元格引用了其他单元格的数据,比如b1=a1,那么由于行列的删除,可能A1已经被删除了,在B1中显示的是一个数字(就是原A1的数字),但点种B1后,发现该点的公式还存在
请问在VB中,如果能把一个SHEET页中的所有计算公式去掉?就是光保留数值,不保留公式!
谢谢!

Answer 1

用Formula属性，先保存range("b1")中的内容，设置formula="",再给range("b1")赋值

Answer 2

做一个循环，将有公式的cells重新赋值就可以了。
例如：cells(2,2)=cells(2,2)

Answer 3

Cells.Select
    Selection.Copy
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False选择性粘贴，只要值，简单省事。

Answer 4

当单元格内容是公式时，
取出来的值有二种，一种是公式，一种是值，
（注：取公式和取值的属性是不一样的。）
显然，你要求去掉公式换成值，思路是：
取出值，以文本重新赋值给该单元格。
这样可以冲掉公式。
提供VB、VBA、Office二次开发
免费咨询、有偿技术支持：
CO.：Vansoft Workroom
MSN：[email protected]
Email：[email protected]
　　　 [email protected]
TEL：[phone]（范）