Question

excel中如何用VBA将指定单元格设置为日期格式

Worksheets(p).Cells(j, i).FormulaR1C1 = "yyyy-m-d"
报错.
这两种代码都试过了.黄色和绿色的,都是报错.

Worksheets(p).Cells(j, ex(2, "交货期")).NumberFormatLocal = "yyyy-m-d"也是一样结果.快疯了





Answer 1

你这个是输入公式的意思，设置格式要用numerformat
Worksheets(p).Cells(j, i).numberformat = "yyyy-m-d"
ex(2,"交货期")这是什么，也许是你这个错误

追问

ex是我的自定义函数,返回的是long型数,很简单的函数,不会错的.我把那个换成数值也不行的.

追答

你可以把你的代码都发出来看看

追问

真让你猜对了,ex函数用错参数了.

Answer 2

最简单的方法是录制一个宏，再进入宏编辑器分析一下自然明白。
Range("E4").Select
Selection.NumberFormatLocal = "yyyy-m-d"
E4是指定单元格的名称。

追问

因为要操作的是后台的sheet,所以不能用select,或许可以但是我不会.
另外你用的这个代码我也通过录制得到了,一样是报错:应用程序定义或对象定义错误.不知道原因.

追答

录制后直接运行就报错？还是你修改后报错？

追问

我随便选了一个单元格录制的,不报错.但这是前台录制的.我需要的是对后台的格子进行修改的代码.我根据我的需要改成我上面的图的格式后就怎么都不行.
NumberFormatLocal = "yyyy-m-d"这个只能对select操作么?对cells不行么?对excel我是新人,很多基本的都不太懂.

Answer 3

直接用具体的Sheets(2).Range("A"1).NumberFormatLocal = "yyyy-m-d"是可以的,你可以看你的变量是否没设置好