macro to auto filter and then paste certain columns to another sheet

Hi there.

I am running a auto filter macro to i need to change it to only copy column A:B and past in column C:D in the sheet called "Diary". Can any body assist me to change my current macro to only select column A:B and paste it. It is currently pasting the entire row.

Here is the part of my code:

Please Login or Register  to view this content.

Change this line

Please Login or Register  to view this content.

INTO

Please Login or Register  to view this content.