Sub Mail_workbook() ActiveWorkbook.SendMail "ron@debruin.nl", _ "This is the Subject line" End Sub If you want to mail the workbook where the code is placed you must use the following line: ThisWorkbook.SendMail "ron@debruin.nl", _ Note: It doesn’t have to be the … Continue reading
Add new sheet, change the sheet name to mail. Every mail you want to send will use 3 columns. in column A – enter sheet or sheets name you want to send. in column B – enter E-mail address. in … Continue reading
This macro will send each sheet to one person. Create a new workbook with the Sheet. Save the workbook before mailing it Delete the file from your hard disk after it is sent. Sub Mail_every_Worksheet() Dim strDate As String Dim … Continue reading
Create a new workbook with the Selection. Save the workbook before mailing it. Delete the file from your hard disk after it is sent. It will unhide hidden rows and columns in the selection All empty cells outside the selection … Continue reading
Create a new workbook with the SheetsArray. Save the workbook before mailing it. Delete the file from your hard disk after it is sent. Sub Mail_SheetsArray() Dim strDate As String Sheets(Array("Sheet1", "Sheet3")).Copy strDate = Format(Date, "dd-mm-yy") & " " & … Continue reading
In this article, we will create a macro to send a sheet as attachment in an email. Before running the macro, we need to specify an email id and subject of the email. In this example, we want to send … Continue reading
