Saving is the easy bit, use

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
msg = "I don't want you to do that"
MsgBox (msg)
If SaveAsUI = True Then Cancel = True
End Sub

For preventing cut, copy and paste etc look here.

http://www.vbaexpress.com/kb/getarticle.php?kb_id=373


"Salman" wrote:

Hello,
I have a database of 180 workbooks with multiple sheets on sharing through
network drive, soem user have read+write rights and some have read-only
rights.

I want to protect every workbook that no one, specially with the read only
rights, can save the workbook on their desktop and Copy Paste the workbook as
a file on their hard disk.

Is there any suggestion, it would be relly helpfull