Macro to copy formula from one cell to another

[anwar]

Hi Experts,
I've data in two columns, 'Column A & B'. 'Column A' contains formula and 'Column B' contains criteria. I need to find the output like that cell from 'Column A' will automatically be copied and pasted as value into 'Column C' whenever specific criteria meet in 'Column B'.

Column A Column B
1. 100 ...... D
2. 300 .......R


3. 500 .......D
4. 100 .......R
5. 300 .......D

Now I need to copy cell from Column A that meet the criteria in Column B. logical function will be like that "=IF(B1="R", then copy A1 and paste value into C1)".

Please provide excel macro VB coding for getting the desired solution.

Many Thanks,
Anwar
Dhaka, Bangladesh.