Excel 运行时错误'；1004'；，在acell中放置公式

===

编辑：答案似乎强调了这与我的语法foo有关，而不是其他任何东西

===

我所要做的就是把一个公式放在一个单元格里。这是我在使用VBA之前开发的一个公式，现在我需要自动化这个过程

当我运行代码时，在它到达这一行之前，一切都很好

然后我收到这个错误- 运行时错误“1004”： 应用程序定义或对象定义错误

代码包含在一个循环中，但这是用于上下文或我所犯的任何学童错误的

Sheets("Data Summary").Activate    

Dim startDate As Date
startDate = Now()

Dim i As Integer
For i = 1 To 7
startDate = DateAdd("d", 1, startDate)

cells.Range("B9").Formula = "=COUNTIFS(Discharged!$E$2:$E$200, " & _
                                " "">="" & startDate, " & _
                                " Discharged!$E$2:$E$200, " & _
                                " ""<"" & startDate.AddDays(1), " & _
                                " Discharged!$H$2:$H$200, " & _
                                " ""<24"" " 'here is the error

Next i

工作表（“数据摘要”）。激活
Dim startDate作为日期
startDate=Now（）
作为整数的Dim i
对于i=1到7
startDate=DateAdd（“d”，1，startDate）
cells.Range（“B9”）.Formula=“=COUNTIFS（已出院！$E$2:$E$200，”&_
“>=”&startDate，&_
“出院！$E$2:$E$200，”&_
“”试试这个：

Range("B9").Formula = "=COUNTIFS(Discharged!$E$2:$E$200," & """>=" & StartDate & """, Discharged!$E$2:$E$200, " & _
                            " ""<" & DateAdd("d", 1, StartDate) & """, Discharged!$H$2:$H$200, ""<24"")"

Range（“B9”）.Formula=“=COUNTIFS（已出院！$E$2:$E$200，&“>=”&StartDate&“），已出院！$E$2:$E$200，&”_
“谢谢，是的，现在可以了。不过我可能还需要几分钟才能弄清楚原因。