Send Email from GMail VBA (Visual Basic Applications) example

CDO

Collaborative Data Object is a library offered by Microsoft which allows sending emails using SMTP. In this article we will dive into various methods and properties offered by CDO library in VBA and see a complete code example to send emails from GMail.

Step 1: user needs to add reference for Microsoft CDO for Windows 2000 Library which is available in cdosys.dll as shown below:

Navigate Tools menu in Visual Basic Editor
Click on References…
Find and check Microsoft CDO for Windows 2000 Library
Say OK

CDO.Message

Represents a mail object having following properties and methods which can be configured:

Configuration: Message exposes configuration object which has various properties as:
- Fields: it is a collection which supports various properties to configure SMTP related properties
Subject: takes user input to set mail subject in string format
From: refers to account from which email will be sent from
To: refers to recipients to whom mail will be sent
CC: list of recipients which will be kept in Carbon Copy of the mail
BCC: list of recipients which will be kept in Blind Carbon Copy of the mail
Update: is a method which commits changes made to the property into Message object
AddAttachment: it is a method which allows adding external files into the mail as attachment
CreateMHTMLBody: takes string inf html format and embedded into the email body
TextBody: plan text body of the mail
Send: a method which sends email

Code example

Sub SendEmailUsingGmail(UserFromAccount As String, UserPwd As String, UserTo As String, strSubject As String, strMailBody As String)
	Dim NewMail As CDO.Message
	'Early Binding
	Set NewMail = New CDO.Message
	
	'Enable SSL Authentication
	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True

	'Make SMTP authentication Enabled=true (1)
	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1

	'Set the SMTP server and port Details
	'To get these details you can get on Settings Page of your Gmail Account

	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"

	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465

	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

	'Set your credentials of your Gmail Account
	'Username
	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = UserFromAccount
	'Password
	NewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = UserPwd

	'Update the configuration fields
	NewMail.Configuration.Fields.Update
	 
	'Set All Email Properties

	With NewMail
		  .Subject = strSubject
		  .From = UserFromAccount
		  .To = UserTo
		  .CC = "a@gmail.com;b@gmail.com;c@gmail.com"
		  .BCC = "d@gmail.com"
		  .Fields("urn:schemas:mailheader:disposition-notification-to") = "myemail@gmail.com"
		  .Fields("urn:schemas:mailheader:return-receipt-to") = "myemail@gmail.com"
		
		' Set importance or Priority to high
		  .Fields("urn:schemas:httpmail:importance") = 2
		  .Fields("urn:schemas:mailheader:X-Priority") = 1
		'
		' Request read receipt
		.Fields("urn:schemas:mailheader:return-receipt-to") = "a@gmail.com"
		.Fields("urn:schemas:mailheader:disposition-notification-to") = "a@gmail.com"
		'
		' Update fields
		.Fields.Update
		
		'body text can be taken from stored file
		.TextBody = "file://Yourcomputer/YourFolder/Week2.xls"
		
		'Add attachements
		.AddAttachment ("C:\Users\jj\Desktop\MyAttCancel.xlsx")
		
		'send a complete webpage, instead of HTMLBody or TextBody use
		.CreateMHTMLBody strMailBody
		
		'Plan text body
		.TextBody = strMailBody
	
	End With
	
	'Send mail
	NewMail.Send

	'Set the NewMail Variable to Nothing
	Set NewMail = Nothing
End Sub

Please leave your comments or queries under comment section also please do subscribe to out blogs to keep your self upto date.

Share on Facebook

Export Generic Collection to PDF ASP.Net Core MVC

PDF Sometime you may in need to export data in PDF. Following code will use Syncfusion Package and give you ready made Table pushed from Generic collection. Put below code in Repository Put below code in Controller JavaScript Code Finally you can attach id to an element in html and in JavaScript on Document ready […]

Export Excel ASP.Net Core MVC

Excel Export Following Example helps you to export excel from database in a generic way using EPPlus library. Requirement EPPlus Nuget Package Code to Repository Supporting Method Code to Controller Code to JavaScript JavaScript Supporting Method You can hit ExportToExcel() call in document ready method in JavaScript document by pointing any id written in HTML […]

Save/Retrieve Session ASP.Net Core MVC

Session Plays a vital role while dealing with caching in your browser. ASP.Net Core offers Session caching fast and reliable way. Here is the practical example. Put following code anywhere in common class or Repository, it has two methods Generic in nature Add/Get. Add Method will allow you to cache object in Browser memory and […]

Number List in Word Document using C# code example

Number List Microsoft Word offers feature by which you can auto number your list in various formats. In this article we will write code to dynamically generate a numbered list in a document using C#. C# Code example Note: You have to add Microsoft Word Interop library as reference to enable Using statement or create […]

Sorting in Microsoft Word using VBA (Visual Basic for Applications)

Sorting Do you know, Microsoft Word has capability to perform sorting over a document. In this article we will write code to sort paragraphs in Alphabetical order using visual basic for applications code. Before code Code example Put above code in a module, Select number of paragraphs that you would like to sort in A-Z […]

EPPlus Open Office Xml Office solution using C#

EPPlus Is an open Office XML solution, highly useful library capable to manipulate Microsoft Excel similar to Introp APIs. Why EPPlus? As per Microsoft the solutions (Excel, Word, PowerPoint, Outlook etc) built for client architecture but what about Servers? Let’s take an example that I have recently faced and EPPlus helped me a lot here. […]

String vs StringBuilder C#.Net with code example

String C# class which offers capability to store any type of string data into a variable. Strings are immutable (non-modifiable) cause performance overhead because each time we modify a string it creates a copy of modified instance into the memory, hence, as a practice string should be avoided for large string operations. Following is the […]

Var vs. Dynamic C# with code example

Var vs. Dynamic C# offers variety with flavors to accomplish the task to the developers. var keyword defines a static nature which gets resolve at compile-time introduced in C# 3.0 where dynamic gets resolved at runtime introduced in C# 4.0. Var is a statically type variable, which means values of these variables gets decoded at […]

Multi-threading in C#.Net with step by step code example

Multi-threading Is a concept to execute multiple tasks or process simultaneously. Basically multi-threading enables paths to your application to execute multiple processes. Multi-threading can be achieved in C# using System.Threading name space which provides complete control over threading. Let’s write example code where we will execute two different methods to print numbers using loop and […]

Create a progress bar in Excel using VBA (Visual Basic for Applications)

Progress bar In this article we will create one progress bar using Excel vba with step by step example. User can change feel and look of the UserForm as per their need and mimic the logic to fit in their solution. Design Insert a user form Add one label on it and change Caption property […]

Send Email from GMail VBA (Visual Basic Applications) example

CDO

CDO.Message

Code example

Leave a Reply Cancel reply

Sorting in Microsoft Word using VBA (Visual Basic for Applications)

Create a progress bar in Excel using VBA (Visual Basic for Applications)

Get Count of Cells based on Color Excel Add-in using VBA

Auto Reply in Outlook Add-in using VBA code example

Filter Meetings in Outlook Add-in using Visual Basic for Applications

RSS feed

Subscribe to our articles