我有一个sheet中定义了许多的公式,,我想在VB中直接将公式的值复制到另外一个sheet中,需要用到pastespecial结果出现如下的错误,,请帮忙给看一下..

objSheet.cells.Copy
objsheet2.range("a1").Select
objsheet2.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
"应用程序定义,或对象定义错误"

如果将pastespecial后面的参数全都去掉,,则运行没有问题,,但是复制过来的是公式,,而不是value..