none
To get all the email id in the TO, BCC and CC box RRS feed

  • Question

  • Hi

    I need to get each email in the To, BCC and CC text box to string. 

    Bobbin Paulose

    Thanks

    Friday, February 17, 2012 5:28 PM

Answers

  • Are you talking about: (?)

    oMail.SendUsingAccount

    Thisissuerelates towhetherthe incoming mailreadyto send?

    If incomping loop

    For Each oRecip In oMail.Recipients

     If redy to send

    Dim temp() As String
    temp() = Split(oMail.to, ";")


    Oskar Shon, Office System MVP

    Press if Helpful; Answer when a problem solved


    Saturday, February 18, 2012 2:15 PM

All replies

  • The MailItem object has properties with those same names that you can access.

    e.g.:

    MailItem.To

    MailItem.Cc

    MailItem.Bcc


    Eric Legault
    MVP (Outlook)
    About me...

    Friday, February 17, 2012 5:35 PM
    Moderator
  • Hi.

    If you want to use interface to add email adresees to string, workbook, file, dist. list, etc. I can recomend you my code:

    Interfejs programu

    look at Wiki: Dodawanie adresów email

    Translate by google or another.


    Oskar Shon, Office System MVP

    Press if Helpful; Answer when a problem solved

    Friday, February 17, 2012 6:04 PM
  • Hi

    I think my question is misleads everyone.  I will explain my need here. 

    Actually i know there is property to take Email Ids from TO Box like this "MailItem.To". My need is If there user type more than one email ids in the TO, CC, Or BCC box [Eg : bob@gmail.com;bob@yahoo.co.in;bob@notetech.com], I need to itrate each mail using foreach loop. I think for this one option is take the TO box value in a string and split the string with ";". I want to know is there any other methods to take the emails

    Thanks

    Bobbin Paulose

    Saturday, February 18, 2012 6:25 AM
  • Are you talking about: (?)

    oMail.SendUsingAccount

    Thisissuerelates towhetherthe incoming mailreadyto send?

    If incomping loop

    For Each oRecip In oMail.Recipients

     If redy to send

    Dim temp() As String
    temp() = Split(oMail.to, ";")


    Oskar Shon, Office System MVP

    Press if Helpful; Answer when a problem solved


    Saturday, February 18, 2012 2:15 PM