hola, he logrado deshabilitar los botonces guardar y guardar como de una manera como el segundo codigo que puse la vez anterior, el codigo es este:
Código:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox "mensaje", vbCritical, "titulo de mi mensaje"
Cancel = True
lo que tuve que hacer para que funcionara y me lo guardara el documento fue que le di interrumpir a la depuración en el Visual Basic, luego fui a Excel y le di guardar, luego de eso en el archivo los botones no quedan en si debilitado pero aparece la ventana de mensaje y no da opción de guardar al final, practicamente dejaron de funcionar los "guardar".