Normally i am able to send mail using gmail with example text by typing in body field. But I want to send Range(A8:D17) as message body.
First I defined body1 as variable range, then i set body1 as value of my required range in body of message i used variable 'body1' but it is giving error "run-time error '13' , Type mismached "
[Code] .....
Where I need to change in ordger to send mail using range as body .
I need to send through VBA emails to GMAIL accounts.
The code below is the shortest I've encountered. It returns:
"The "SendUsing" configuration value is invalid"
[Code].....
I use gmail, and have an excel sheet with hundreds of rows. I need to send each recepient an e-mail using their e-mail address (row D), and their name in the body and subject (row A). The rest of the body of the email will all be the same.
View 6 Replies View RelatedThe following will place values found in O19,020,&022 into an e-mail body.
I'm attempting to place a selected range of cells into the body also.
To do this I tried the highlighted section of code below.
We need to send multiple mail with attachment with outlook 2007 with option "Resend this message", now we want to use excel for sending the mail.
procedure.----------------------------------------------------------------------------------------------------
S.No. To cc----------------------------------------------------------------------------------------------------
1. xyz@ymail.com----------------------------------------------------------------------------------------------------
2. abc@gmail.com hursh@rediffmail.com, hursh@rediffmail.com, hursh@rediffmail.com, raj@hotmail.com----------------------------------------------------------------------------------------------------
3. ram@ymail.com ramesh@gmail.com---------------------------------------------------------------------------------------------------- 4. rajesh@ymail.com----------------------------------------------------------------------------------------------------
5. raghu@ymail.com raju@hotmail.com ---------------------------------------------------------------------------------------------------- 6. info@ymail.com----------------------------------------------------------------------------------------------------
7. ranjit@excel.com xyx@gmail.com----------------------------------------------------------------------------------------------------and
we have two files for attaching on desktop, one is a excel file and second is a zip file. we want to send the mail with excel mail merge.
I have a process metric that I need to send via email.
I would like to automate this.
I am looking for the following
1. upon clicking send mail button the smart art used on the excel should be mailed.
2. the smart art should be pasted as Image on the body of the email.
3. The body should contain a text message like " dear receiver," <line break> " Please find the below process health for this week" <line break> "Regards," <line break> "Sender"
4. The size of the image on the email body should be height 3 inches and width should be 5 inches.
I have attached the spreadsheet for reference.
I am using the below code to send a email by VBA in Excel but I am trying to add a hyperlink in the body of the email.
I would like to use '"Click Here" to go to Google - I only want to show "Click Here" in the email not the full web address
Sub SendEmailData()
Dim iMsg As Object
Dim iConf As Object
Dim cell As Range
'Dim strbody As String
' Dim Flds As Variant
[Code] ........
I am using the following code to create several spreadsheets and send via email. This all works perfectly, but I would like to add text to the body of the email. What would I need to add to enable me to add text to the body of the email?
From Bottom of Code:
' Copy the Report sheet to a new book and e-mail
Sheets("Report").Copy
Application.Dialogs(xlDialogSendMail).Show _
[Code].....
how i can add a second body in an e-mail sent via excel?
Here's the
I have this as part of a macro that creates an e-mail
View 2 Replies View RelatedI have the code which generates email through out look with customized subject and body of the letter, is it possible to insert the image(JPEG or any format) with text (not as an attachment) in body of the email, how to do it.
PHP Code:
If FileName <> "" Then RDB_Mail_PDF_Outlook FileName, "ron@debruin.nl", "This is the subject", _  Â
 "This is the body of mail where i want to insert image" _  & vbNewLine & vbNewLine & "Regards Ron de bruin", FalseÂ
I have an excel sheet that our sales staff enters data on and I'm wondering if there is a way to send an E-Mail to certain people if they answer yes in cell S44? I want this to send an E-Mail telling the intended person that they need to perform a "First Article Inspection" on an item that sales has just finished with. The excel is 2003 and everything runs through our network.
View 9 Replies View RelatedI want extract table values from body of email into excel through vba code in outlook.
I want pull table values two kinds of mail format
One is First Part and another is Additional Ordering
I want pull table values for accurate First Part table into First order workbook where saved in path for accurate Additional Part O table into Additional Part workbook,where saved in path.
Find the attachment with code :
Attached Images
PARTS ORDERING.jpg‎
ADDITION ORDERING.jpg‎
Attached Files
First Part.xls‎
Additional Part.xls‎
a macro to copy the contents of a selected range in an excel table to an outlook mail generated using a macro.
The only thing is that I need the grid along with the formatting of the selected Excel range.
I have a form which is going to be used as an aid to staff, I have created Macro's that when clicked enter information in to fields in the worksheet, I would also like the macro to generate an email with a specified Subject and body filled out. At the moment all I have achieved is to generate an email through File - Send to - Mail recipient.
I have also tried to have an email created through Outlook using MAPI, but once again have been unable to create an email with or without a subject and message body. Below is how far I have got in creating an email using MAPI.
This is part of Macro to insert information Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet1").Select
Range("E12").Select
ActiveSheet.Paste
Call SendAMessage
End Sub......................
Is there a way to include my Outlook email signature when using the following macro to send an email?
Code:
Sub EmailReport()
Dim OutApp As Object
Dim OutMail As Object
[Code].....
Can we send mail through lotus notes in excel.
Request you guide me with this as to how to do it and what the code is.
I need to send a simple mail in body and as an attachment
I need to send 25 mails on daily basis to my client. All fields in mail are common except recipient and attachments. Every mail has 3 excel attchments. So i created a macro in excel which sends mail as per my requirement but picks up only one attachment from the path i have mentioned in the vb code. Whole macro is running perfectly. I just want to know what modification i should do in that code to attach more than one excel file to the mail from the path i have given. Below is the code:
Sub macro1()
Dim sFolder As String
Dim Folder As Object
Dim file As Object
Dim fso As Object
[Code]....
I've been trying to send emails through an SMTP server in various ways. I've been able to send email using CDO going directly through an SMTP server on my same local network (not requiring a username and password). But now I am trying to send email from my home with the SMTP server I am using that is hosted by some commercial company. I used the code below, which is sponsored by Paul Sadowski:
Sub sendMailRemote()
'Sending a text email using authentication against a remote SMTP server
Const cdoSendUsingPickup = 1 'Send message using the local SMTP service pickup directory.
Const cdoSendUsingPort = 2 'Send the message using the network (SMTP over the network).
Const cdoAnonymous = 0 'Do not authenticate
Const cdoBasic = 1 'basic (clear-text) authentication
Const cdoNTLM = 2 'NTLM.......................
I'm trying to add a range to this email code that will then paste the information into the body of this email however instead of getting the data I need i'm getting "-1" in the body instead.
I've tried defining the range below and adding that line to the main code but it doesn't work, the code will run but i get "-1" in the body.
I've wrote a function that allows me to insert a certain range to the body of an email. This email is composed in the code, too.So far I am able to build the emails body as plain text. how to retain the cell format also (colors, font size, border styles, ...)
View 14 Replies View Relatedi was trying something like this...but it doesn't quite work.
can anyone point me in a direction that works better?
I've seen a few posts recently asking about sending either sending a range or a worksheet in an Outlook email as the body of the message through code. I've been looking at this and think I've come up with something that might work. I'd appreciate it if any of you XL kings and queens would take a look and see if the code works OK on your machine. I've sent a few messages to myself (sad I know ) and they seem to work well.
Here's the code. You need to set a reference to the Outlook object Library AND the Microsoft Scripting Runtime in order for this code to work.
Option Explicit
Sub SendRange()
'Sends a specified range in an Outlook message and retains Excel formatting
'Code written by Daniel Klann 2002
'References needed :
'Microsoft Outlook Object Library
'Microsoft Scripting Runtime...........
I am looking to set up a vba code for sending an email to a recipient based on whether the row AI19:AI30 shows the value 3,6,9 and i want it to send an email showing all of the 3 data all of the 6 data and all of the 9 data.
I have attached my code so far.
VB:
Private Sub Workbook_Open()
Dim w As Worksheet, c As Comment
For Each w In ThisWorkbook.Worksheets
If UCase(w.Name) <> "All Trades" Then
Select Case w.Range("AI19:AI30").Value
Case Is = 3, 6, 9
[Code]....
I am wrote below code to send email using VBA:
Sub SendEmail()
'References needed :
'Microsoft Outlook Object Library
'Microsoft Scripting Runtime
Dim olApp As Outlook.Application, olMail As Outlook.MailItem
Dim FSObj As Scripting.FileSystemObject, TStream As Scripting.TextStream
Dim rngeSend As Range, strHTMLBody As String
Dim Range1 As Range, Range2 As Range
alertsSheet = ActiveWorkbook.Name
Workbooks(alertsSheet).Activate
Sheets("STATS").Select
Issue with this code is it is selecting wrong source range while generating email.
MsgBox Range1.Address is giving results as "$A$1:$B$1,$BX$1:$CA$1" and
MsgBox Range2.Address is giving results as "$A$32:$B$38,$BX$32:$CA$38" but
MsgBox rngeSend.Address is giving results as "$A$1:$B$38"
And the email generated as output is having only the data from range "$A$1:$B$38". Is there anything wrong with the way I am specifying the source range ??
I need that the code should replace strHTMLBody with the data in Range1 and Range2. I checked the tempsht.htm file and found that this file also have the same wrong data i.e. data from range "$A$1:$B$38"
Needless to specify that I am working with data having few hidden columns and need to consider only visible data.
Am working in Excel 07, but this would need to work in 2000 as well.
Need a macro that will...
1. Select a range of cells from B4 to RX. X is defined as the last row where Column A has a value.
2. Copy the visible cells
3. Open an email in Outlook (not via the email workbook function of excel), enter "Submission" into the title, enter "Dear X," insert 2 returns.
4. Paste the copied table (not the workbook, just what is on the clipboard) into the body the email.
I have finaly been able to put in words what I want to do. Hope this makes sense. I have the excel document should anyone want to see it.
In worksheet “Summary table”, column A is a job number (Txxx), that worksheet is a summary of all the jobs. If you select a job number and run a macro (lets call it macro5) it will then give you a detailed / itemized listing of the job in a separate worksheet. I already have created macro5 for the detailed bit. However now I am looking for a macro that will lookup the email address in worksheet “Tenacity jobs” corresponding to that job number and then email the result of macro 5 to the user.
So, for example, I begin in worksheet “Summary table” I would like to see the details on job # T456 which has a subtotal of 420,227.05. I click on this and it runs macro5 showing me the detailed breakdown. However once that macro has run I would then like to email this off to; cha@velocity.com; laur@velocity.com as they are the contact people which corresponds to #T456 in worksheet “Tenacity jobs”
I need a macro that will send a separate mail to each person in range (Data sheet), with body from Mail sheet of attached excel workbook.
For attached example it should send 5 mail, that have to be like : test mail.xlsx‎
I have Excel 2007. I have a spreadsheet with email addresses in it surrounded by other text. I want to automatically highlight in yellow each row containing the words gmail, yahoo, hotmail and so on.
I CTRL-H then enter the info as you see it in the pic attached. When I click Replace All it says "that function is not valid". It works like a charm for every other word I test it with.
I have a workbook that has multiple worksheets and I would like to use a command button to e-mail just one selected sheet. I want to create the single sheet as an attachment on a new e-mail message but leave the addressing to the user as it will vary, and not save the single sheet. My challenge is that the users have a variety of different e-mail clients (Outlook, Lotus Notes and others).
View 2 Replies View Related