Excel显示问题，请大虾帮忙

我想把数据库里的数据导出到Excel时,在上面D1显示 "报表生成时间",E1显示
系统的当前时间.
可是不知道为什么,有的时候可生成D1、E1显示所要的数据，有时候却不可以，
当运行到 ActiveCell.FormulaR1C1 = "报表生成时间"时，提示“对象或With变量
未设置”或“SQL 命令错误”。这是为什么，请大虾急救，谢谢！
 
 '///////////添加报表生成时间////////////////////////////
    iXlsheet.Range("D1").Select
    ActiveCell.FormulaR1C1 = "报表生成时间"
    iXlsheet.Range("E1").Select
    iXlsheet.Columns("E:E").ColumnWidth = 22
    ActiveCell.FormulaR1C1 = Format$(Now, "ddddd ttttt")
    '///////////////////////////////////////////////