Kodlu korumalı sayfada filtre problemi

[byfika]

Merhabalar, Kodlu ve korumalı sayfada filtrenin otomatik filtre işaretlenmesine rağmen birincisinde çalışıp daha sonraki filtre açıp kapamada çalışmaması ve sayfa koruması açıldığında çalışma problemi nasıl çözülür. Ekte ki örnekte daha detaylı açıklama mevcut. Teşekkürler

 

[Ömer BARAN]

Merhaba.

Kullanılan kod'un son kısmında yer alan kırmızı renklendirdiğim satırın yerine mavi olanları kullanın.
.

[COLOR="Red"]ActiveSheet.Protect "1"[/COLOR]
[COLOR="Blue"]With ActiveSheet
    .Protect Password:="1", AllowFiltering:=True
    .EnableSelection = xlUnlockedCells
End With[/COLOR]

 

[byfika]

Teşekkürler problem çözüldü

 

[Ömer BARAN]

.
İyi çalışmalar dilerim.
.