[code]
myItem.To = mail_to_list
myItem.Subject = "Incoming Logistics Movement C/N # - " & Me.Consignment_Note_Number
myItem.Body = "Please find below, details for the incoming consignment." & vbCrLf & _
"Including any attachments if available" & "." & vbCrLf & vbCrLf & _
"This report is for Consignment # - " & Me.Consignment_Note_Number & "." & vbCrLf & vbCrLf & _
"Received On - " & Me.Date_Received & "." & " From " & Me.Courier & "." & vbCrLf & _
"Description - " & Me.Description_of_Goods & "." & vbCrLf & _
"Number of Items - " & Me.Number_of_Items & "." & " Total Weight - " & Me.Weight & "." & vbCrLf & vbCrLf & vbCrLf & vbCrLf & vbCrLf & _
"Addressed To - " & Me.addressed_to & "." & vbCrLf & _
"P/O or Invoice # Reference - " & Me.po_ref & "." & vbCrLf & vbCrLf & _
"Other Notes - " & Me.comments & "." & vbCrLf & vbCrLf & vbCrLf & vbCrLf & _
"Thank you." & vbCrLf & _
"Logistics Department."
myItem.Display
' SendKeys "%{s}", True