为什么同样的公式可以在excel的单元格中应用，但是却不能在excel的VBA中使用？

比如以下公式：
=text（19840209，"00-00-00"）
如果在excel的单元格中输入，给出的结果就是1984-02-09
如果输入=text（840209，"00-00-00"），给出结果就是84-02-09
但是如果在VBA中使用的话，结果就提示“函数未定义”（text被标出）……
理论上excel中能用的的函数，vba中都应该可以用呀？求解……
另外如何在vba中实现上述公式的效果？同样求解……

举报该问题

其他回答

第1个回答 2010-09-07

因为有些函数在vba里面是不支持的，你可以录制个宏，看下单元格数值的格式设定为日期的该如何写程序。
Range("A1").Select
Selection.NumberFormatLocal = "##-##-##"
Range("C7").Select

如果，想输入公式可以这样输入
Range("B4").Select
ActiveCell.FormulaR1C1 = "=TEXT(RC[-1],""##-##-##"")"

第2个回答 2010-09-07

ActiveCell.FormulaR1C1 = "=TEXT(840209,""00-00-00"")"
写在引号里，VBA和EXCEL的函数还是不一样的

第3个回答 2010-09-07

VBA中使用某些工作表函数时需加个前缀
[a1]=worksheetfunction.text（19840209,"00-00-00"）本回答被提问者采纳

第4个回答 2010-09-07

vba代码具体录制宏看具体代码就可以了...

相似回答

为什么在excel vba中输入公式会报错?答：造成excel vba输入公式出现运行时错误1004的原因：当您试图将传递一个包含超过 255 个字符的公式时，会发生此问题，并为应用程序中 Visual Basic 中使用 FormulaArray 属性。

在EXCEL中,怎样把某一行的规律运用于其他行?答：在A2单元格中输入=A1+3，在E2单元格数据=E1+3，如此类推，然后下拉公式，可以完成每行数据都相差3的数字输入

Excel中同样的公式为什么下面的可以显示,上面这个却不行?答：wunite在excel里没有这个函数而第二图可以显示出值，说明你在这个文档中用了自定义函数。自定义函数又有二种情况。你在一台计算机上出现这种情况，说明，你只是二种情况中的一个。即好用的文档使用了自定义函数，而不是加载宏。alt+F11 打开vba编辑器，看一下代码吧。另外，好用的这个文档，你在...

我有三个关于excel--vba的问题。(最主要的是关于公共对话框)答：第二的问题楼上回答是错误的。当然直接用excel函数通常情况下是不可以的，不过我们可以曲线救国，excel中表格可以用的函数，在VBA中也可以用，只需通过WorksheetFunction对象就可以引用，后面加函数名称，然后加range来引用单元格。举个例子：Application.WorksheetFunction.Max(range("A1:C5"))下面就是如何在...

大家正在搜

excel固定单元格不动 excel公式怎么用 excel表格公式 excel表格制作公式 excel如何拆分单元格 excel两个单元格内容合并 excel合并单元格快捷键 excel表格怎么求和 excel自己编辑公式