Workbook.WriteReserved (Excel)

True si el libro está protegido contra escritura. Boolean de solo lectura.

Use el método SaveAs para establecer esta propiedad.

Dim booWriteReserved As Boolean
booWriteReserved = ActiveWorkbook.WriteReserved