Insert a File

Status
Not open for further replies.
M

Mike Faulkner

Hello

App: Outlook 2003

OS: Windows XP

I would like to create some VBA which would insert a file into the Body of

the email.

Set NewEmail = CreateItem(olMailItem)

With NewEmail

> Subject = "Test 1"

> Body = "<Insert a file... 'c:\pelikan\newsletter\Email_01.htm'>"

> Save

End With

NewEmail.Display

The HTM file contains a graphic and Webite hyperlinks etc. Any assistance

would be greatly appreciated.

Kind Regards

Mike
 
What do you mean by "insert a file"? Do you want to insert the contents of a

file or to insert an attachment of a file? If you want to insert text from a

file you need to read the file contents as a string and insert that into the

HTMLBody property. Body is for plain text and knows nothing of HTML.

"Mike Faulkner" <MikeFaulkner> wrote in message

news:D5A011A9-AAF0-4E57-BEAF-0D49E18CDB18@microsoft.com...
> Hello

> App: Outlook 2003
> OS: Windows XP

> I would like to create some VBA which would insert a file into the Body of
> the email.

> Set NewEmail = CreateItem(olMailItem)
> With NewEmail
> .Subject = "Test 1"
> .Body = "<Insert a file... 'c:\pelikan\newsletter\Email_01.htm'>"
> .Save
> End With

> NewEmail.Display

> The HTM file contains a graphic and Webite hyperlinks etc. Any assistance
> would be greatly appreciated.

> Kind Regards
> Mike
 
Ken

I want to code the following:

In a new email click on:

1. Insert|File

2. Choose a file

3. Choose 'Insert as Text' from 'Insert' button

Regards

Mike
wrote:


> What do you mean by "insert a file"? Do you want to insert the contents of a
> file or to insert an attachment of a file? If you want to insert text from a
> file you need to read the file contents as a string and insert that into the
> HTMLBody property. Body is for plain text and knows nothing of HTML.

> >

>

> "Mike Faulkner" <MikeFaulkner> wrote in message
> news:D5A011A9-AAF0-4E57-BEAF-0D49E18CDB18@microsoft.com...
> > Hello
> > App: Outlook 2003
> > OS: Windows XP
> > I would like to create some VBA which would insert a file into the Body of
> > the email.
> > Set NewEmail = CreateItem(olMailItem)
> > With NewEmail
> > .Subject = "Test 1"
> > .Body = "<Insert a file... 'c:\pelikan\newsletter\Email_01.htm'>"
> > .Save
> > End With
> > NewEmail.Display
> > The HTM file contains a graphic and Webite hyperlinks etc. Any assistance
> > would be greatly appreciated.
> > Kind Regards
> > Mike


> .
>
 
How you'd do that depends on how you want to code it. If you want to use

the standard Outlook buttons you would handle the MailItem.AttachmentAdd()

event. That provides a handle to the added attachment. You would save that

to the file system and open and read it as a text string. How you'd do that

would depend on the type of file that was being attached.

I'd start by searching at www.outlookcode.com for code samples for reading

files and attaching file contents, as well as for modifying the HTMLBody of

mail items.

"Mike Faulkner" <MikeFaulkner> wrote in message

news:880C6F14-E5D4-4640-81E3-9318FB77ABF1@microsoft.com...
> Ken

> I want to code the following:

> In a new email click on:
> 1. Insert|File
> 2. Choose a file
> 3. Choose 'Insert as Text' from 'Insert' button

> Regards
> Mike
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
J Insert File Outlook VBA and Custom Forms 2
B Simple way to insert file text - macro? Outlook VBA and Custom Forms 1
D RE: How do you change the default insert file path in outlook? Using Outlook 11
T Insert text from file Outlook VBA and Custom Forms 1
L "Insert Pictures" Button-Wrong Folder Using Outlook 5
C Automatically Insert Recipient Name from To Field Outlook VBA and Custom Forms 4
J Macro to Insert a Calendar Outlook VBA and Custom Forms 8
DDB VBA to Auto Insert Date and Time in the signature Outlook VBA and Custom Forms 2
M Replyall macro with template and auto insert receptens Outlook VBA and Custom Forms 1
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
B Programmatically force html send and insert clipboard contents into body Outlook VBA and Custom Forms 0
P Auto Insert Current Date or Time into Email Subject Outlook VBA and Custom Forms 2
Witzker Outlook 2010 Insert Date & Time at the button of an OL contactform in red Using Outlook 2
P Insert link in email body to attached document in Outlook 365 Outlook VBA and Custom Forms 0
E Copy e-mail body from outlook and insert into excel Outlook VBA and Custom Forms 3
R How Do I insert images in and Auto Reply Using Outlook 3
L Automatically Insert Recipient Name from To Field Outlook VBA and Custom Forms 33
Diane Poremsky Create Task or Appointment and Insert Selected Text Using Outlook 0
B Insert Hyperlinks for attachments in Userform Outlook VBA and Custom Forms 5
D Outlook task insert Outlook VBA and Custom Forms 3
A Auto Insert of filename when selecting 'Remove Attachment' Using Outlook 1
K Insert screenshots issue Using Outlook 2
makinmyway Recent Files Not Updating when Using Insert Hyperlink in Outlook 2013 Using Outlook 0
L Insert Photo to Contact Using Outlook 23
K OL2010 Button to Insert First Name Outlook VBA and Custom Forms 6
K OL2010 Button to Insert First Name Using Outlook 1
Witzker insert Date & Time (HH:mm) no (ss) in userform Using Outlook 6
A insert Date & Time in userform Using Outlook 3
K Macro to insert attachments Using Outlook 1
C Insert a Date Picker for Send Mail Subject Using Outlook 1
C Insert date in Subject through date picker Using Outlook 0
mrje1 Opening a task the Insert Tab Option is not showing up and organizing Tasks Using Outlook 9
H Insert Specific Text before Subject for New mails and reply Using Outlook 3
R insert picture tab grey Using Outlook 1
K Outlook insert clip art, no results found...address book contacts only show up Using Outlook 5
J Form design - how do I insert an automatic date/time field? Using Outlook 2
J How do I view the ruler in an Outlook message and/or insert tabs? Using Outlook 7
L Forward Email and Insert Sender's Email address in body Outlook VBA and Custom Forms 3
D Insert Text and Send Outlook VBA and Custom Forms 1
D Re: How do i insert radio buttons in an email Outlook VBA and Custom Forms 1
G How to insert a json array into a calendar events Outlook VBA and Custom Forms 1
K insert text into current position of pointer in mailcompose Outlook VBA and Custom Forms 1
G Task / Insert / Attach Item / Business Contact BCM (Business Contact Manager) 1
M Forward email as insert from button Outlook VBA and Custom Forms 1
S How to insert a picture programatically Outlook VBA and Custom Forms 12
C insert a picture Outlook VBA and Custom Forms 1
J How do I scan and insert into Outlook 2007? Using Outlook 3
B Insert information to MailItem Outlook VBA and Custom Forms 1
D Insert Text via Macro in Outlook 2007 Outlook VBA and Custom Forms 2
T Is it possible to INSERT a string into email body via Shortcut. Outlook VBA and Custom Forms 2

Similar threads

Back
Top