Clear function not working when copy to a new workbook

[starlev]

Hi,
I built a macro that takes items url with the help of vlookup and inserts the photos to a cel.
I would like to copy the new spreadsheet into a new workbook.
However columns E and F have information that I would like to clear.
For some reason when information is copied into the new workbook the function that clears E and F is not clearing.
Please advice
I am also attaching the Excel worksheet with the macro in it.
I am also adding only the problematic code in the code tags(hopefully I inputted the code correctly a long time passed since I posted a VBA question)

Thank You

ActiveSheet.Copy
Set NewBook = Workbooks.Add
NewBook.Activate
Worksheets(1).Activate
ActiveSheet.Paste
Columns("E:E").Clear
Columns("F:F").Clear