Hi You can do below mention changes to add CC,BCC in mail .To = Cells(cell.Row, "D").Value .CC = Cells(cell.Row, "E").Value .BCC = Cells(cell.Row, "F").Value
change the column name as per your requirement. if you want to add yesterday's date in boday of mail then you can use below mention code .Body = (Date - 1) or you can link cell value in body of mail. forrmula in column Q will be =today()-1 in excel sheet & vbNewLine & vbNewLine & Cells(cell.Row, "Q").Value & _ if you still have doubts write back or you can send sample sheet. On Mon, May 17, 2010 at 1:08 AM, Intelligent But Crazy < secrets...@gmail.com> wrote: > Intelligent But Crazy (secrets...@gmail.com) was added to your Guest > List<https://www.boxbe.com/approved-list>by their request | Delete > this guest<https://www.boxbe.com/anno?action=remove&tc=2806636259_589131336>| > [image: > Boxbe] <https://www.boxbe.com/overview> > > Hi Mahesh, > > Thanks a lot for this help, this is really too > helpfull for all outlook users. > I also want to know that if i have to add CC or BCC in mail so what > the changes i have to do in macro. & n pls also tell me if i have to > add yesterday date in body of the mail every day in every mail so what > should i do. > > Pls help me in this i will be glad to et this help. > > Thanks in Advance > Pankja k Pandey > > On 5/15/10, Mahesh parab <mahes...@gmail.com> wrote: > > Hi > > In attach workbook refer Sendfiles sheet. you can get required info on > below > > mention link. > > > > http://www.rondebruin.nl/sendmail.htm > > > > On Fri, May 14, 2010 at 10:47 PM, Fabio Sascho > > <fabio.sas...@gmail.com>wrote: > > > >> Dear friends > >> > >> > >> > >> Below you can find the code I wrote to make Excel send emails thought a > >> list of names > >> > >> > >> > >> My problem is the attachment talk. > >> > >> > >> > >> I need a code that gets all files from a certain directory and attach > into > >> the email using the “ .attachment.Add” > >> > >> > >> > >> Does anyone know how to do that ? > >> > >> > >> > >> Thanks in advance > >> > >> > >> > >> Dim olApp As Object > >> > >> Dim olMail As Object > >> > >> Dim olSubject > >> > >> Dim olTratamneto > >> > >> Dim olName > >> > >> Dim olMsg > >> > >> Dim FirstLine > >> > >> Dim LastLine > >> > >> Dim olAttachment As FileDialog > >> > >> Dim olAttachmentDirectory As Object > >> > >> > >> > >> LastLine = Cells(65536, 1).End(xlUp).Row > >> > >> > >> > >> olTratamento = InputBox("Insira aqui uma mensagem que vem antes do Nome > do > >> seu cliente como Dear,Hello, Etc" _ > >> > >> , "Tratamento da Mensagem", "Hello ") > >> > >> > >> > >> olSubject = InputBox("Insira o assunto do email", "Subjetc Box", > "BROTHERS > >> IN GRANITE OFFER") > >> > >> > >> > >> Set olApp = CreateObject("Outlook.application") > >> > >> Set olMail = olApp.CreateItem(0) > >> > >> Set olAttachment = Application.FileDialog(msoFileDialogFilePicker) > >> > >> With olAttachment > >> > >> .AllowMultiSelect = True > >> > >> End With > >> > >> > >> > >> FirstLine = 2 > >> > >> For i = FirstLine To LastLine > >> > >> olName = Cells(FirstLine, 1).Value > >> > >> With olMail > >> > >> .OriginatorDeliveryReportRequested = True ' delivery > confirmation > >> > >> .ReadReceiptRequested = True ' read confirmation > >> > >> .Subject = olSubject > >> > >> .To = Cells(FirstLine, 2).Value > >> > >> .CC = Cells(FirstLine, 3).Value > >> > >> .BCC = Cells(FirstLine, 4).Value > >> > >> .Body = olTratamneto & Chr(32) & Cells(FirstLine, 1).Value & > >> Chr(13) & Chr(13) & Sheets("MAIL_OFFER").Cells(1, 1).Value > >> > >> .Attachment.Add = “Several file” > >> > >> End With > >> > >> Next i > >> > >> End Sub > >> > >> > >> > >> > >> > >> -- > >> > >> > ---------------------------------------------------------------------------------- > >> Some important links for excel users: > >> 1. Follow us on TWITTER for tips tricks and links : > >> http://twitter.com/exceldailytip > >> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > >> 3. Excel tutorials at http://www.excel-macros.blogspot.com > >> 4. Learn VBA Macros at http://www.quickvba.blogspot.com > >> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > >> > >> To post to this group, send email to excel-macros@googlegroups.com > >> > >> <><><><><><><><><><><><><><><><><><><><><><> > >> HELP US GROW !! > >> > >> We reach over 6,800 subscribers worldwide and receive many nice notes > >> about > >> the learning and support from the group.Let friends and co-workers know > >> they > >> can subscribe to group at > >> http://groups.google.com/group/excel-macros/subscribe > >> > > > > -- > > > > ---------------------------------------------------------------------------------- > > Some important links for excel users: > > 1. Follow us on TWITTER for tips tricks and links : > > http://twitter.com/exceldailytip > > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > > 3. Excel tutorials at http://www.excel-macros.blogspot.com > > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > > > To post to this group, send email to excel-macros@googlegroups.com > > > > <><><><><><><><><><><><><><><><><><><><><><> > > HELP US GROW !! > > > > We reach over 6,800 subscribers worldwide and receive many nice notes > about > > the learning and support from the group.Let friends and co-workers know > they > > can subscribe to group at > > http://groups.google.com/group/excel-macros/subscribe > > > > > -- > Pankaj Pandey > Bhopal > > -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> HELP US GROW !! We reach over 6,800 subscribers worldwide and receive many nice notes about the learning and support from the group.Let friends and co-workers know they can subscribe to group at http://groups.google.com/group/excel-macros/subscribe
