Object Item does not support this property or method
<p>So, I'm a beginner when it comes to VBA, but I'm trying to create a simple way to send a reminder message to a bunch of people whose information is found on an excel spreadsheet. It is supposed to loop, sending emails to addresses found in the column until there is an empty cell.</p>

<p>I keep getting the error <code>Object does not support this property or method</code> on the line that begins with a *. I have spent the last hour trying to figure out why this error is appearing because <code>Workbooks</code> have the property <code>Sheets</code> which have <code>Cells</code> which return a value.</p>

<pre><code>Sub Send_Reminder_Email()

    Dim objMsg As MailItem
    Set objMsg = Application.CreateItem(olMailItem)

    Dim xlApp As Object, wb As Object
    Dim row As Integer

    Set xlApp = CreateObject("Excel.Application")
    Set wb = xlApp.Workbooks.Open("C:\User\Me\...file.xls")
    row = 2

    *Do While Not IsEmpty(wb.Sheets.Cells(row, 2).Value)
        objMsg.To = wb.Sheets.Cells(row, 6)
        objMsg.BCC = "potapeno@foo.net"
        objMsg.Subject = "Email"
        objMsg.Body = "Information"
        objMsg.Send
        row = row + 1
    Loop

    Set objMsg = Nothing
    Set wb = Nothing
    Set xlApp = Nothing
    row = 0

End Sub
</code></pre>

<p>I have also tried "activating" the workbook, but it fails to solve my problem. I can't figure out what object doesn't support what method.</p>