How to input text at the beginning of the body of a message.

Status
Not open for further replies.
M

Mr. GetRight

Need a little help.

I'm using Outlook 2003, trying to make a macro that inputs a set statment in

the body of a message. I got it to do it but the problem is my statement

needs to be in front of the attachment that is already in the message but it

keep going behind it. Also for some reason it is removing the first letter

from my statment. I copy and pasted the main parts of it below, ...

Code: 
Option Explicit 
 
Public icn As String 
 
Public myOlApp As New Outlook.Application 
 
Public myEmail As Object 
 
Public myAttachment As Object 
 
Sub FormateEmail() 
 
Set myEmail = myOlApp.ActiveInspector.CurrentItem 
 
Set myAttachment = myEmail.Attachments 
 
myEmail.To = "email@someplace.com" 
 
myEmail.Subject = "Subject Line" 
 
myEmail.Body = "output statement 1=" + icn + " Output statement2" 
 
End Sub
 
As your example completely overwrites the body of the message, there's no

reason to see how anything else could be there - except it's an rtf

message, in that case you need to set the position of the attachment(s).

Best regards

Michael Bauer
 
Status
Not open for further replies.
< forward with header gufff etc | Blocking list >
Similar threads
Thread starter Title Forum Replies Date
G Outlook forms text input Outlook VBA and Custom Forms 1
R Outlook 2021 Having problem setting up outlook 2021 with windows 11. I have 3 gmail accounts and I want the 3 gmail, emails to merge into the same outlook input. Using Outlook.com accounts in Outlook 0
C Why does Outlook (desktop) 365 for Windows keep making me input my passwords? Using Outlook 12
J VBA Cannot programmatically input or change Value for User Defined field Using Outlook 1
Marc2019 Cannot input Vietnamese Characters on my MSOutlook 2016 in Windows 7 Using Outlook 0
Andrew Quirl Custom form to route requests based on input criteria Outlook VBA and Custom Forms 1
S Ask user to input email template through VBA Outlook VBA and Custom Forms 1
K Reducing data input, how to auto-fill Account form info into Contact form BCM (Business Contact Manager) 0
T Including Field Input as Subject Line Outlook VBA and Custom Forms 1
AndyZ Contact Custom Form Tiny Text Outlook VBA and Custom Forms 3
D Delete selected text in outgoing email body Outlook VBA and Custom Forms 0
kburrows Outlook Email Body Text Disappears/Overlaps, Folders Switch Around when You Hover, Excel Opens Randomly and Runs in the Background - Profile Corrupt? Using Outlook 0
J PSA: How to create custom keyboard shortcut for "Paste Unformatted Text" in Outlook on Windows Outlook VBA and Custom Forms 1
Witzker Add a text line at the end of the note field in all selected Contacts Outlook VBA and Custom Forms 7
O Replace hard returns with soft returns on selected text and button to QAT Using Outlook 5
J Outlook 365 Emails showing as links and text only Using Outlook 4
R How to force Outlook to use plain text in notes for Contacts? Using Outlook 1
J Text icon in Quick Access toolbar ? Using Outlook 2
S New Outlook Appointment - Select All Body Text and Change Font and Size Outlook VBA and Custom Forms 1
Z Copy specific email body text Outlook VBA and Custom Forms 0
L did MS ever add way to text via Outlook Using Outlook 5
B Outlook 365 Populate Outlook Task UDFs from a UDF text string Outlook VBA and Custom Forms 2
D Forwarding email based on the attachment file type and specific text found on the attachment file name Outlook VBA and Custom Forms 1
BartH Add a string to the conditions in .Conditions.BodyOrSubject.Text Outlook VBA and Custom Forms 2
S HTML to Plain Text Macro - Help Outlook VBA and Custom Forms 1
S Unable to extract text from an Outlook email message Using Outlook 2
T Original email text not shown when replying or forwarding the email. Using Outlook 9
M Outlook, send to > mail recipient - results in plain text email Using Outlook 1
P Forwarding emails issue with special characters replacing text body Using Outlook 1
J Autoreply email recieved from specific sender after deleting some text from body. Using Outlook 0
O Outlook tasks - Add text column with multiple lines Using Outlook 3
S Body text of Email from invite date/time Outlook VBA and Custom Forms 7
T Why does outlook 2010 convert only some forum notifications to plain text? Using Outlook 0
Z VBA to convert email to task, insert text of email in task notes, and attach copy of original email Outlook VBA and Custom Forms 4
J Outlook 2013 Change color of text in data fields of contacts in Outlook 2013? Using Outlook 10
V Limiting text length in free text field Outlook VBA and Custom Forms 2
Jennifer Murphy Ctrl+Tab sometimes will not move through text a word at a time Using Outlook 1
B Add Prefix text to Subject Line Using Outlook 1
Z Add text to auto-forwarded e-mail Outlook VBA and Custom Forms 4
S Change VBA script to send HTML email instead of text Outlook VBA and Custom Forms 3
M VBA to auto forward message with new subject and body text Outlook VBA and Custom Forms 8
T Missing text in e-mail message after "(Please keep confidential)" Using Outlook 3
S Outlook to check for specific text Outlook VBA and Custom Forms 3
A Read and Write to Text File Outlook VBA and Custom Forms 1
J Program Checkbox that will activate a text box in a Outlook fallible form. Outlook VBA and Custom Forms 1
N How to remove signature formatting from Text in Word (accidentally taken from Outlook) Using Outlook 0
B Paste formatted text (bold, underlined and in quotes) Outlook VBA and Custom Forms 1
J Remove text to Clean Up Outlook VBA and Custom Forms 1
O Macro - paste as plain text Outlook VBA and Custom Forms 2
N Is there an Outlook tool to normalize text for entries that are in ALL CAPS? Using Outlook 2

Similar threads

Back
Top