View Single Post
 
Old 08-20-2017, 05:27 PM
charlesdh charlesdh is offline Windows 7 32bit Office 2010 32bit
Expert
 
Join Date: Apr 2014
Location: Mississippi
Posts: 382
charlesdh is on a distinguished road
Default

Hi,

A bit of code you may try. Not tested.

Code:
With ActiveWorkbook
.SaveAs FileFormat:=xlNormal, Password:="YourPassword", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
.Close
End With
Reply With Quote