< návrat zpět
MS Excel
Téma: Povolení filtru při zamklých listech.
Zaslal/a pepča 9.5.2014 20:36
Ahojky.
Potřeboval bych poradit,jak povolit filtr pokud mám listy zamčené. V tomto sešitu je několik maker tato jsou ok , ale nevim jak tam dostat ještě ten filr.
Mám ještě jeden problém a to upravit makro "řádky" tak,
aby se spustilo pouze při první změně příslušné buňky ve sloupci I.
Heslo pro odemčení listů je Ooz2014JK.
Děkuji za každou odpověď.
Příloha: 19392_ooz.rar (61kB, staženo 29x)
AL(9.5.2014 22:07)#019393 K povoleniu filtru: skúsil som makro v module1. Pre názornosť kopírujem jeho pôvodný tvar a modifikáciu, ktorá umožňuje filtrovanie.
Sub Makro1()
ActiveSheet.Unprotect "Ooz2014JK"
Selection.Rows.AutoFit
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowFormattingRows:=True, AllowFiltering:= _
True
ActiveSheet.Protect "Ooz2014JK"
End Sub
Sub MakroModifiedByAL()
With ActiveSheet
.Unprotect "Ooz2014JK"
Selection.Rows.AutoFit
.Protect Password:="Ooz2014JK", AllowFiltering:=True
.EnableSelection = xlUnlockedCells
End With
End Subcitovat
pepča(10.5.2014 21:24)#019401 Ahojky
Děkuji AL makro na filtr je perfekní
Pepča
citovat