title: Send Outlook email using text in an Excel textbox - Error 424: Object required
body: <p>I am trying to send an email with Outlook using text in a textbox (I named it tx in Excel) as body.</p>
  
  <p>When I run the code, there is an error on the line:</p>
  
  <pre><code>strbody = tx.Text
  </code></pre>
  
  <blockquote>
    <p>Error 424: Object required</p>
  </blockquote>
  
  <pre><code>Sub SendMail()
  
  Dim OutApp As Outlook.Application
  Dim OutMail As Outlook.MailItem
  Dim strbody As String
  
  Set OutApp = CreateObject("Outlook.Application")
  Set OutMail = OutApp.CreateItem(olMailItem)
  
  strbody = tx.Text
  
  'On Error Resume Next
  With OutMail
      .To = "..."
      .CC = ""
      .BCC = ""
      .Subject = Cells(3, 2)
      .Body = strbody
  
      .Send
  End With
  
  Set OutMail = Nothing
  Set OutApp = Nothing
  End Sub
  </code></pre>