I will address your code in sections and at the end I will provide a full updated code based on the touched subjects.
You are turning the Application 'off' with:
Application.ScreenUpdating = False
Application.Calculation = xlManual
Application.DisplayAlerts = False
at the beginning of your method and then you turn it back 'on' with: