when you want to get rid of the flashing screens, put in the next line at the
start of the macro:

Application.ScreenUpdating = False

and at the end:

Application.ScreenUpdating = True

This will freeze the screen and run the whole process at the background, without
updating its screen. Your macro will run faster as well.