Non vedo nulla di particolare.
Comunque prova a sostituire la parte finale, quella di chiusura, con questo:

'salvataggio dei fogli
For Each L In objExcel.Workbooks
L.Save
Next L

'chiudo il foglio attivo
objExcel.Workbooks(objExcel.ActiveWorkbook.Name).C lose

'Libero la memoria
Set objExcel = Nothing
Set objWorksheet = Nothing
Set objWorkbook = Nothing