How to Send Emails From Excel Using Gmail & VBA. Code: ‘Set a reference to Microsoft CDO for Windows 2000 Private Sub CommandButton1_Click() Dim Mail As New Message Dim Config As Configuration: Set Config = Mail.Configuration Config(cdoSendUsingMethod) = cdoSendUsingPort Config(cdoSMTPServer) = “smtp.gmail.com” Config(cdoSMTPServerPort) = 25 Config(cdoSMTPAuthenticate) = cdoBasic Config(cdoSMTPUseSSL) = True Config(cdoSendUserName) = “youremail@gmail.com” Config(cdoSendPassword) = “yourgmailpass