Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

VBA - ochrona arkusza i możliość sortowania i grupowania

milenusiek 04 Wrz 2015 12:51 927 3
  • #1 04 Wrz 2015 12:51
    milenusiek
    Poziom 2  

    Witam wszystkich,

    Chciałabym aby plik był zablokowany do edycji tak żeby nikt tam nie mógł grzebać ( w tym nie widoczne formuły).

    Wrzuciłam sobie takie makro :

    Sub Ochrona()

    With Worksheets("Arkusz1")
    .Protect Password:="1111", _
    UserInterfaceonly:=True
    .EnableOutlining = True
    End With

    End Sub

    po zablokowaniu arkusza mam teoretycznie taki efekt jaki chciałam uzyskać, tzn :
    - arkusz jest chroniony
    - mogę grupować
    - autofiltry działają

    jednak takie rozwiązanie działa tylko kiedy mam otwarty plik.xls

    Po zamknięciu i ponownym otworzeniu grupowanie nadal nie działa.

    Jak włączyć ochronę arkusza, żeby filtry i grupowanie nadal działało?

    Z góry dzięki za pomoc!

    0 3
  • #2 04 Wrz 2015 13:49
    JRV
    Specjalista - VBA, Excel

    Kod makra wstaw do kodu "Ten skoroszyt"

    Code:
    Private Sub Workbook_Open()
    
    With Worksheets("Arkusz1")
    .EnableOutlining = True
    .Protect Password:="1111", _
    UserInterfaceonly:=True
    End With
    End Sub

    0
  • #3 04 Wrz 2015 14:21
    milenusiek
    Poziom 2  

    Niestety nadal nie działa. Próbowałam już w różnych konfiguracjach, ale excel cały czas krzyczy że nie mogę grupować na chronionym arkuszu.

    0
  • #4 04 Wrz 2015 14:44
    JRV
    Specjalista - VBA, Excel

    Zmiena post #2

    0