I am trying to be able to have my code send an email via lotus notes
here is all my code:
[vba]
Private Sub CommandButton1_Click()
With ActiveDocument
.Bookmarks("UserName").Range.InsertBefore TextBox1
.Bookmarks("requesttype").Range.InsertBefore TextBox2
.Bookmarks("qty").Range.InsertBefore TextBox3
.Bookmarks("purpose").Range.InsertBefore TextBox4
.Bookmarks("describe").Range.InsertBefore TextBox5
.Bookmarks("other").Range.InsertBefore TextBox6
.Bookmarks("busarea").Range.InsertBefore ComboBox1
.Bookmarks("En").Range.InsertBefore CheckBox1
.Bookmarks("fr").Range.InsertBefore CheckBox2
.Bookmarks("subdate").Range.InsertBefore Calendar1
.Bookmarks("datedue").Range.InsertBefore Calendar2
.Bookmarks("evtdate").Range.InsertBefore Calendar3
End With
ActiveDocument.HasRoutingSlip = True
With ActiveDocument.RoutingSlip
.Subject = "Request for literature"
.AddRecipient xxx@yyyt.com
.AddRecipient xxx@yyy.com
.Delivery = wdAllAtOnce
ActiveDocument.Route
End With
UserForm1.Hide
[/vba]
when I test the form the debugger comes up with .Subject = "Request for literature" highlighted and when I mouse over the highlighted code it says .Subject=<object variable or with variable not set>
TIA WP