Hello All,
I am a beginner in macro. I need a macro code for sending emails automatically to the recepients for a predeined range of accounts. Although i have created a macro but I am unable to add CC and set a range for the accounts.
Column A contains the A/c numbers
Column B contains the To
Column C contains the CC
The email program being used in Lotus notes.
I am able to send the mail to the To recipient but it doesn't pull in CC part. Also I am unable to set the range as you can see below I have to define the rows.
Sub SendEMail()
Dim Email As String, Subj As String
Dim Msg As String, URL As String
Dim r As Integer, x As Double
For r = 2 To 3 'data in rows 2-3
' Get the email address
Email = Cells(r, 2)
I am a beginner in macro. I need a macro code for sending emails automatically to the recepients for a predeined range of accounts. Although i have created a macro but I am unable to add CC and set a range for the accounts.
Column A contains the A/c numbers
Column B contains the To
Column C contains the CC
The email program being used in Lotus notes.
I am able to send the mail to the To recipient but it doesn't pull in CC part. Also I am unable to set the range as you can see below I have to define the rows.
Sub SendEMail()
Dim Email As String, Subj As String
Dim Msg As String, URL As String
Dim r As Integer, x As Double
For r = 2 To 3 'data in rows 2-3
' Get the email address
Email = Cells(r, 2)
