Objeto AllowEditRange (Excel)

Representa las celdas que se pueden modificar en una hoja de cálculo protegida.

Comentarios

Use el método Add o la propiedad Item de la colección AllowEditRanges para devolver un objeto AllowEditRange.

Una vez devuelto un objeto AllowEditRange , puede usar el método ChangePassword para cambiar la contraseña para acceder a un rango que se puede editar en una hoja de cálculo protegida.

Ejemplo:

En este ejemplo, Microsoft Excel permite editar el rango "A1:A4" en la hoja de cálculo activa, notifica al usuario y, a continuación, cambia la contraseña de este intervalo especificado y notifica al usuario este cambio.

Sub UseChangePassword() 
 
 Dim wksOne As Worksheet 
 Dim wksPassword As String 
 
 Set wksOne = Application.ActiveSheet 
 
 wksPassword = InputBox ("Enter password for the worksheet") 
 
 ' Establish a range that can allow edits 
 ' on the protected worksheet. 
 wksOne.Protection.AllowEditRanges.Add _ 
 Title:="Classified", _ 
 Range:=Range("A1:A4"), _ 
 Password:=wksPassword 
 
 MsgBox "Cells A1 to A4 can be edited on the protected worksheet." 
 
 ' Change the password. 
 
 wksPassword = InputBox ("Enter the new password for the worksheet") 
 
 wksOne.Protection.AllowEditRanges(1).ChangePassword _ 
 Password:=wksPassword 
 
 MsgBox "The password for these cells has been changed." 
 
End Sub

Métodos

• ChangePassword
• Delete
• Unprotect

Propiedades

• Range
• Title
• Users

Vea también

• Referencia del modelo de objetos de Excel

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.