Sorry, I don't use macros. I assume they have that limitation. Here's a brief code test that got up to 693 characters in the body. You might see if it works for you:
Code:
Dim strBody As String
Dim strTo As String
strBody = "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf _
& "Testing a really long body here" & vbCrLf
Debug.Print Len(strBody)
strTo = [Contact Name] & IIf(Nz([E-mail Address]) <> "", " [" & [E-mail Address] & "]")
DoCmd.SendObject , , , strTo, , , "Meeting Confirmed at Harper Associates", strBody, True