![]() |
Email notification including specific cell data
Hello,
I'm using a spreadsheet to keep track of clients who bring required tax information to our firm for processing. This is simple log consisting of the following pertinent columns: client name, client num, date received in office, accountant responsible for this client, as well as some notes that I'm not so concerned with. So, I'm attempting to send an email notification to the "responsible accountant", upon population of "date received" column, containing the "client name" in the body of the email. So far, I've been able to send a general notification to one distribution address & just let them check the spreadsheet on their own, but I know there's a way to pull the cell data into the email, which I haven't been able to figure out. I've used the Sub Mail_CDO from Ron Debruin's site...here's the code I'm using to do this... Sub Mail_CDO() Dim iMsg As Object Dim iConf As Object ' Dim Flds As Variant Set iMsg = CreateObject("CDO.Message") Set iConf = CreateObject("CDO.Configuration") ' iConf.Load -1 ' CDO Source Defaults ' Set Flds = iConf.Fields ' With Flds ' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "my email server" ' .Item("http://schemas.microsoft.com/cdo/configuration/ smtpserverport") = 25 ' .Update ' End With With iMsg Set .Configuration = iConf ..To = " 'My distribution address ..CC = "" ..BCC = "" ..From = """SCHEDULE LOG NOTIFIER"" " ..Subject = "SCHEDULE LOG HAS BEEN UPDATED" ..TextBody = "TESTING" & vbNewLine & vbNewLine & _ "Client info has been added to the Schedule Log" ..Send End With Set iMsg = Nothing Set iConf = Nothing So, as you can see I'm no programmer, but think I understand the basics...just don't know the code I need to reference the spreadsheet cell data to populate the body & sendEE's email address. I did go ahead and concatenate the "responsible accountant" name w/our domain to create a column of email addresses also...just reaching for anything I guess. Well, thanks in advance for any & all information you might provide. Sincerely, Steve Schofield |
Email notification including specific cell data
Hi steve
Look at the tips http://www.rondebruin.nl/cdo.htm#Tips If you need more help post back -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm wrote in message ups.com... Hello, I'm using a spreadsheet to keep track of clients who bring required tax information to our firm for processing. This is simple log consisting of the following pertinent columns: client name, client num, date received in office, accountant responsible for this client, as well as some notes that I'm not so concerned with. So, I'm attempting to send an email notification to the "responsible accountant", upon population of "date received" column, containing the "client name" in the body of the email. So far, I've been able to send a general notification to one distribution address & just let them check the spreadsheet on their own, but I know there's a way to pull the cell data into the email, which I haven't been able to figure out. I've used the Sub Mail_CDO from Ron Debruin's site...here's the code I'm using to do this... Sub Mail_CDO() Dim iMsg As Object Dim iConf As Object ' Dim Flds As Variant Set iMsg = CreateObject("CDO.Message") Set iConf = CreateObject("CDO.Configuration") ' iConf.Load -1 ' CDO Source Defaults ' Set Flds = iConf.Fields ' With Flds ' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "my email server" ' .Item("http://schemas.microsoft.com/cdo/configuration/ smtpserverport") = 25 ' .Update ' End With With iMsg Set .Configuration = iConf .To = " 'My distribution address .CC = "" .BCC = "" .From = """SCHEDULE LOG NOTIFIER"" " .Subject = "SCHEDULE LOG HAS BEEN UPDATED" .TextBody = "TESTING" & vbNewLine & vbNewLine & _ "Client info has been added to the Schedule Log" .Send End With Set iMsg = Nothing Set iConf = Nothing So, as you can see I'm no programmer, but think I understand the basics...just don't know the code I need to reference the spreadsheet cell data to populate the body & sendEE's email address. I did go ahead and concatenate the "responsible accountant" name w/our domain to create a column of email addresses also...just reaching for anything I guess. Well, thanks in advance for any & all information you might provide. Sincerely, Steve Schofield |
Email notification including specific cell data
On Feb 2, 10:36 am, "Ron de Bruin" wrote:
Hi steve Look at the tipshttp://www.rondebruin.nl/cdo.htm#Tips If you need more help post back -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm wrote in oglegroups.com... Hello, I'm using a spreadsheet to keep track of clients who bring required tax information to our firm for processing. This is simple log consisting of the following pertinent columns: client name, client num, date received in office, accountant responsible for this client, as well as some notes that I'm not so concerned with. So, I'm attempting to send anemailnotificationto the "responsible accountant", upon population of "date received" column, containing the "client name" in the body of theemail. So far, I've been able to send a generalnotificationto one distribution address & just let them check the spreadsheet on their own, but I know there's a way to pull the cell data into theemail, which I haven't been able to figure out. I've used the Sub Mail_CDO from Ron Debruin's site...here's the code I'm using to do this... Sub Mail_CDO() Dim iMsg As Object Dim iConf As Object ' Dim Flds As Variant Set iMsg = CreateObject("CDO.Message") Set iConf = CreateObject("CDO.Configuration") ' iConf.Load -1 ' CDO Source Defaults ' Set Flds = iConf.Fields ' With Flds ' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "myemailserver" ' .Item("http://schemas.microsoft.com/cdo/configuration/ smtpserverport") = 25 ' .Update ' End With With iMsg Set .Configuration = iConf .To = " 'My distribution address .CC = "" .BCC = "" .From = """SCHEDULE LOG NOTIFIER"" " .Subject = "SCHEDULE LOG HAS BEEN UPDATED" .TextBody = "TESTING" & vbNewLine & vbNewLine & _ "Client info has been added to the Schedule Log" .Send End With Set iMsg = Nothing Set iConf = Nothing So, as you can see I'm no programmer, but think I understand the basics...just don't know the code I need to reference the spreadsheet cell data to populate the body & sendEE'semailaddress. I did go ahead and concatenate the "responsible accountant" name w/our domain to create a column ofemailaddresses also...just reaching for anything I guess. Well, thanks in advance for any & all information you might provide. Sincerely, Steve Schofield- Hide quoted text - - Show quoted text - Thank you, sir. I think I can piece it together now...very much appreciated! |
All times are GMT +1. The time now is 09:02 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com