Excel) (AllowEditRanges 物件
所有 AllowEditRange 物件的集合,這些物件代表可在受保護工作表上編輯的儲存格。
註解
使用Protection物件的AllowEditRanges屬性可傳回AllowEditRanges集合。
傳回 AllowEditRanges 集合之後,您可以使用 Add 方法來新增可在受保護工作表上編輯的範圍。
範例
在此範例中,Microsoft Excel 允許編輯使用中工作表的 A1:A4 範圍,然後通知使用者指定範圍的標題和位址。
Sub UseAllowEditRanges()
Dim wksOne As Worksheet
Dim wksPassword As String
Set wksOne = Application.ActiveSheet
' Unprotect worksheet.
wksOne.Unprotect
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
' Notify the user
' the title and address of the range.
With wksOne.Protection.AllowEditRanges.Item(1)
MsgBox "Title of range: " & .Title
MsgBox "Address of range: " & .Range.Address
End With
End Sub
方法
屬性
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。