Forum Discussion

Diana703's avatar
Diana703
Copper Contributor
Sep 07, 2022

Need Help with Excel Macro

I have a large excel sheet (macro enabled) that I want to send email from with specific data in each email.  I have all working right but I can't get it to create an email to send to each email addre...
Macros and VBA
Diana703's avatar
Diana703
Copper Contributor
The only thing I need it to do yet is to send out the emails to the individual recipients. It does create three emails but they are all going to the same person. Can you help me with this? Thank you.
HansVogelaar's avatar
HansVogelaar
MVP
Sep 07, 2022

Diana703 

I temporarily commented out the criteria, since they don't work, and don't make any sense to me. I got these three messages. Three different recipients, three different subjects, and (not shown) three different message texts. So the problem must lie elsewhere.

  • Diana703's avatar
    Diana703
    Copper Contributor
    Sep 07, 2022
    Thank you so much for continuing to help me. I'm not sure what you mean by " commented out the criteria"...what is the criteria? I'll take it out on my end if you tell me what it is and see if I get the same thing.
    • HansVogelaar's avatar
      HansVogelaar
      MVP
      Sep 07, 2022

      Diana703 

      I meant the lines

       

      If rngCell.Offset(0, 6) > 0 Then
      ElseIf rngCell.Offset(0, 5) > Evaluate("Today() +7") And _
      rngCell.Offset(0, 5).Value <= Evaluate("Today() +120") Then

       

      and the corresponding End If.

      • Diana703's avatar
        Diana703
        Copper Contributor
        Sep 07, 2022
        Those particular lines of code put in my email date that the emails are sent. I took them out and my spreadsheet went wild. Kept on producing emails. I still have to delete them but I'm guessing it produced about 100 emails, all to the same recipient and it filled in all the black cells in the first three lines of my spreadsheet data with todays date.
  • Diana703's avatar
    Diana703
    Copper Contributor
    Sep 12, 2022
    Can you send me the code you used to get the above? I tried editing mine and it didn't work. Thank you.
      • Diana703's avatar
        Diana703
        Copper Contributor
        Sep 12, 2022
        Oh my gosh! This is working. I think I love you for being so patient with me and helping me with this. I could cry! Thank you, thank you, thank you!

Share