Mirosław Wszołek

Mirosław Wszołek Kontroler finansowy,
EBCC / ACE Group

Temat: Masowa zakładek z wyborem opcji ochrony

Witam wszystkich,
stworzyłem dosyć duży plik, z około 20 zakładkami, który jest udostępniony do wglądu sporej liczbie osób w firmie. W związku z tym jest potrzebna ochrona zakładek. Napisałem dość proste makro, które robi protect/unprotect dla wszystkich zakładek naraz. Problem w tym, że chciałbym umożliwić przeglądającym również używanie filtrów i pivot'ów. Nie jestem zaawansowanym użytkownikiem VBA i takie zadania wykracza poza moje obecne możliwości. Czy ktoś mógłby podpowiedzieć jak to zrobić?

Pozdrawiam
Mirek

Edit: przepraszam za błąd w tytule, czy ktoś wie jak poprawić tytuł wiadomości? Ten post został edytowany przez Autora dnia 16.01.15 o godzinie 11:24
Karol K.

Karol K. r.pr. / GAAR i
okolice

Temat: Masowa zakładek z wyborem opcji ochrony

Mirosław W.:
Witam wszystkich,
stworzyłem dosyć duży plik, z około 20 zakładkami, który jest udostępniony do wglądu sporej liczbie osób w firmie. W związku z tym jest potrzebna ochrona zakładek. Napisałem dość proste makro, które robi protect/unprotect dla wszystkich zakładek naraz. Problem w tym, że chciałbym umożliwić przeglądającym również używanie filtrów i pivot'ów. Nie jestem zaawansowanym użytkownikiem VBA i takie zadania wykracza poza moje obecne możliwości. Czy ktoś mógłby podpowiedzieć jak to zrobić?

Na szybko. Do filtrowania zabezpieczaj arkusz poprzez:
ActiveSheet.Protect Password:="XX" AllowFiltering:=True

Pivoty - już są czy użytkownik ma je tworzyć?
W drugim przypadku napisz makro, które:
- zdejmuje ochronę,
- Application.Dialogs(xlDialogPivotTableWizard).Show
- zakłada ochronę.

Sprawdź tez opcję:
ActiveSheet.Protect (...) AllowUsingPivotTables:=True

Edit: przepraszam za błąd w tytule, czy ktoś wie jak poprawić tytuł wiadomości?

Moderator nie ma tej możliwości.
Mirosław Wszołek

Mirosław Wszołek Kontroler finansowy,
EBCC / ACE Group

Temat: Masowa zakładek z wyborem opcji ochrony

Bardzo dziękuję za szybką i wyczerpującą odpowiedź.

Pivoty już są, ale chodzi o to żeby można je było modyfikować.
Karol K.

Karol K. r.pr. / GAAR i
okolice

Temat: Masowa zakładek z wyborem opcji ochrony

Mirosław W.:
Bardzo dziękuję za szybką i wyczerpującą odpowiedź.

Pivoty już są, ale chodzi o to żeby można je było modyfikować.

Spróbuj:
ActiveSheet.Protect Password:="XX" AllowFiltering:=True, AllowUsingPivotTables:=TrueTen post został edytowany przez Autora dnia 16.01.15 o godzinie 12:02
Mirosław Wszołek

Mirosław Wszołek Kontroler finansowy,
EBCC / ACE Group

Temat: Masowa zakładek z wyborem opcji ochrony

Wszystko pięknie działa, jeszcze raz dziękuję i pozdrawiam.



Wyślij zaproszenie do