Hola, tengo una macro para proteger todas las hojas a la vez, pero necesito incluir por defecto el Permitir modificar objetos. De una respuesta a otro usuario he pegado el comando: "UserInterFaceOnly:=True, AllowFormattingCells:=True" pero algo me falla porque no genera el efecto deseado. A lo mejor no lo hago en el lugar adecuado?
La macro es la siguiente:
Sub ProtegerHojas2()
Dim i As Integer, contr As String
contr = InputBox("Contraseña para proteger las hojas")
For i = 1 To Sheets.Count
Sheets(i).Protect Password:=contr
Next i
End Sub
Gracias de antemano