View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Keithlo Keithlo is offline
external usenet poster
 
Posts: 62
Default 45 seconds to save a file, why so long?

Why would this code:

If sSaveFolder < "Rollup" Then
ActiveWorkbook.SaveAs FileName:=sSaveLoc & "\" & sSaveFolder & "\" & sBranch
& "_" & sPeriod & "_Ops_Rvw_Pckg" & ".xlsm" _
, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
Else
ActiveWorkbook.SaveAs FileName:=sSaveLoc & "\" & sBranch & "_" & sPeriod &
"_Ops_Rvw_Pckg" & ".xlsm" _
, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End If

take 45 secs to save a .5mb file when I can manually save the same file and
it only takes a couple of seconds? Is there anything I can do to speed up
this process? I'm already saving to my hard drive instead of to a network
location.

Thanks,

Keith