Search values and copy to specific sheet & cells

Hello!

I am trying to create a macro that searches for other a specific value in column C
If value 'VS' has been found (in column C) the values of column C and D need to be copied to Sheet "VS". In column A and C
If value 'LND' has been found (in column C) the values of column C and D need to be copied to Sheet "LND". In column A and C
Hope somebody can help me, made an example file also with how the solution should look like. Hope somebody can help me!

Thanks!!