Budeš musieť list odomknúť, nastaviť vlasnosť príslušnej oblasti buniek Locked na False, následne povoliť triedenie na zamknutom liste, bližší popis viď tuná:https://msdn.microsoft.com/en-us/library/office/ff839266(v=office.15).aspx
Tu je príklad umožnenia triedenia v oblasti K8:K40:Sub Test()
With ActiveSheet
.Unprotect
.[K8:K40].Locked = False
.Protect userinterfaceonly:=True, AllowFiltering:=True, AllowFormattingColumns:=True, AllowFormattingCells:=True, _
AllowSorting:=True
.EnableOutlining = True
End With
End Subcitovat
Tu je príklad umožnenia triedenia v oblasti K8:K40:Sub Test()
With ActiveSheet
.Unprotect
.[K8:K40].Locked = False
.Protect userinterfaceonly:=True, AllowFiltering:=True, AllowFormattingColumns:=True, AllowFormattingCells:=True, _
AllowSorting:=True
.EnableOutlining = True
End With
End Subcitovat
RSS nejnovější články