问题出在哪？
我初学vb，自己编写了一个宏如下
Sub 生日提醒()
Dim i As Integer
For i = 5 To 500
Dim b As Integer
b = Sheet6.Range("I65366").End(xlUp).Row
b = b + 2
If Sheet9.Cells(i, 15).Value < 7 And Sheet9.Cells(i, 15).Value >= 0 Then
Sheet6.Cells(b, 8) = Sheet9.Cells(i, 15).Offset(0, -11)
Sheet6.Cells(b, 10) = Sheet9.Cells(i, 15).Offset(0, -7)
End If
Next i
End Sub
，运行时显示错误13，类型不匹配，哪里出错了？谢谢!

F2对象浏览器，查一下你编程涉及的对象、属性，看看是不是匹配的

cell 可以直接赋值的吗

你这是部分源码吧