EXCEL:VBA关于单元格对象的错误在哪里

肯定是Sheet3.Range(Cells(m, n), Cells(i, j)) = "a"这句出错，是以下情况造成的：
1、没有sheet3工作表（这可能性不大，一般人不会出现这个错误）
2、代码写在sheet1或sheet2中
3、当前工作表不是sheet3（这个可能性最大）
要想完全解决问题，不管代码写在哪里，也不管当前工作表是不是sheet3都能正确运行，以下几种修改都行：
1、Sheet3.Range(Cells(m, n).Address, Cells(i, j).Address) = "a"
2、Range(Sheet3.Cells(m, n), Sheet3.Cells(i, j)) = "a"
3、Sheet3.Cells(m, n).Resize(i - m + 1, j - n + 1) = "a"

a=format(cells(1,1).value,"yyyy-mm-dd")
b=format(cells(2,1).value,"hh-mm-ss")
c=cells(3,1).formula
这样就可以了，你用formula肯定是读不了a1和a2的，因为里面没有公式，formula是读取cells的公式的。
可以先判断一下单元格里面是不是公式，是公式的话用formula取，不是公式的话用value取后加个format转成你要的格式：
cells(1,1).hasformula
当a1是公式时上面的语句返回true。

电视动画西游记 CCTV主导制作的动画片，共52集。