View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
JE McGimpsey
 
Posts: n/a
Default Macro to find text string in a column and paste data in another

For various reasons, including the possibility of macro virii, I won't
open your file, but you can do this without a macro...




C2: =IF(A2="To",B2,"")
D2: =IF(A2="Cc",B2,"")

Copy C2:D2 down as far as required.


In article ,
nicolascap
wrote:

I have an excel table with 4 columns:
- Column 1 contains either nothing, "To", or "Cc" as email destination
fields
- Column 2 contains different email adresses
- Column 3 is empty and is named "To"
- Column 4 is empty and is named "Cc".

Under the first column "email destination field " (containing To, Cc or
no value), I want to add a button that will read through its totality
and then , for a given row, add the corresponding email adress to the
"To" Column if a "To" is read in Column 1 or to the "Cc" Column if a
"Cc" is read in Column 1, and of course do nothing if nothing is
mentionned.

I will then use the following macro to go through the "To" and "Cc"
Columns and create a blank email with the correct email adresses in the
"To" or "Cc"fields:


Attached hereafter the Excel example of my problem