Objeto AllowEditRange (Excel)

Representa as células que podem ser editadas em uma planilha protegida.

Comentários

Use o método Add ou a propriedade Item da coleção AllowEditRanges para retornar um objeto AllowEditRange.

Depois de um objeto AllowEditRange ser devolvido, pode utilizar o método ChangePassword para alterar a palavra-passe para aceder a um intervalo que pode ser editado numa folha de cálculo protegida.

Exemplo

Neste exemplo, o Microsoft Excel permite edições para o intervalo "A1:A4" na folha de cálculo ativa, notifica o utilizador e, em seguida, altera a palavra-passe deste intervalo especificado e notifica o utilizador desta alteração.

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

Propriedades

• Range
• Title
• Users

Confira também

• Referência do modelo de objeto do Excel

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.