objmail

Hi, I have some code that sends emails based on a range of cells however I want to make the reference indirect as sometimes there will be 5 rows to send and others there will be 25 rows. The below code works fine I just need help on the row that says " For Each cell In ws.Range("A2:A2")", how do...

<button title="This question does not show any research effort; it is unclear or not useful" class="js-vote-down-btn grid--cell s-btn s-btn__unset c-pointer" aria-pressed="false" style="background-attachment: scroll; background-clip: border-box; background-color: transparent; background-image...

I'm very new to VBA and found a code online that sends emails to multiple recipients but can only attach 1 file per email. I cannot find a code that works wherein it goes to a specific folder and attaches all PDF files that are stored in the folder and goes to a different folder and does the...

Hi there I have the below code which works perfectly however I want to only export/save page 1 of the PDF not page 2. Can anyone please tell me how I can incorporate this in to the below code?: Sub emailsavePDF_weekly() Dim objOutlook As Object Dim objMail As Object Dim signature As...

Hi there I have the below code which I know is incorrect for the To. but I don't know how to fix? would appreciate any help. I have the list on another sheet. It's in a table if that helps: Table16[Email] Sub emailsavePDF_weekly() Dim objOutlook As Object Dim objMail As Object...

Hi there I searched around and found some code that almost works. I keep getting and error on the 'Attach file' line. I basically have a pivot on a sheet which is filtered by employee. Each month I need to refresh pivot, and for each employee, export their results as a PDF to email to them...

Greetings I have below code open Outlook from Excel, pull an email address to BCC field, subject and some contents. What changes are required to pull multiple emails from cells B12:B18, B21:22, B29, B32 and B35 to the BCC field? Also, is it possible to pull across a Richtext formatted email I...

Trying to write macro that will create an email object with a range of cells as the body. Ultimately I will probably set a cell as the "To" address, but for now I just wanted to get the mail object created with the contents from the page. Sub CreateDocLlistMail() Dim a As Integer Dim...

I have trhe following code to create an email, add a subject, body and attachment but the line to add the body text is causing an errorSet objMail = objOutlook.CreateItem(0) With objMail .To = strEmail .Subject = Range("Admin_EmailSubject") & " - " & strMonth .Body =...

I am trying to add Cell E5 in the body of the email below E4. I am new using VBA. This is what I have so far. Sub CreateEmail() Dim objOutlook As Object Dim objMail As Object Dim rngTo As Range Dim rngSubject As Range Dim rngBody As Range Set objOutlook = CreateObject("Outlook.Application") Set...

i have trying to send emails to a list of address and add the entire pdfs in a folder, the code works the problem i have is that the files can be add only if i put a full path. i want it to go to D and get all the pdfs or files from the folder and create email. so again everything works...

Hi everyone A right newbie here so please take it easy on me! I've been using the below code to do a tailored mail merge with specific attachments to my recipients. There will be varied mailing, where some people will receive 1 attachment, and some with 3 for example. The problem that I have...

Hello all I hope someone can help on this I have a workbook called "Test" with a worksheet called "Keyword" In column "A" there is a date, column "B" a question The code below so I'm told looks at the date and if it matched todays date will then email out the question is column "B" Trouble...

Hi all, I have a macro that generates a PDF of the active worksheet and attaches it to a new email however it currently displays as the workbook name as per the code but I get an error if I try to change it to a range. Could someone kindly assist? Sub Adcorp_PDF() ' ' Adcorp_PDF Macro ' '...