save as...

G

gyro

Hi
Need a way to prevent "saveas" but not "save" in worksheet code
Workbook_BeforeSave.
thx
 
R

Rob Bovey

Hi Gyro,

Private Sub Workbook_BeforeSave( _
ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = SaveAsUI
End Sub

--
Rob Bovey, MCSE, MCSD, Excel MVP
Application Professionals
http://www.appspro.com/

* Please post all replies to this newsgroup *
* I delete all unsolicited e-mail responses *
 
Top