How to compare 2 lists?

[blurtoad]

Hi. I have two lists in Column A and Column B. I would like to have a VBA script that picks out those entries found in A but not in B and returns these entries into column C. Thank you very much!

[colofnature]

sub a_not_b_to_c()
[a1].select
do while activecell.value <> empty
if iserror(application.match(activecell.value, [b:b], 0)) then _
cells(rows.count, 3).end(xlup).offset(1, 0).value = activecell.value
activecell.offset(1, 0).select
loop
end sub

Col

[ChrisMattock]

Hey Guys,

I need a bit of a modification to this code...

Column B: Project Leader List
Column C: Project Leader Directory
Column D: Project Leader Telephone No
Column E: Project Leader Informal Name

The first column (B) is an imported list, it contains names that may or may not match those found in the Directory (column C), if they are already present then I do not want them added, if they are not in that list the I need it to prompt to (a) Ask for the Phone No & (b) Ask for the Informal name, this should then populate the relevant cells in the appropriate ros (columns d & e).

Anyone?

sub a_not_b_to_c()
[a1].select
do while activecell.value <> empty
if iserror(application.match(activecell.value, [b:b], 0)) then _
cells(rows.count, 3).end(xlup).offset(1, 0).value = activecell.value
activecell.offset(1, 0).select
loop
end sub