Wypada zacząć od tego, że Excel nie jest twierdzą szyfrów i wszystkie zabezpieczenia są tu raczej symboliczne, to znaczy mają uświadomić użytkownikowi, że robi coś, czego robić nie powinien. Natomiast jeśli użytkownik jest zdeterminowany, to zawsze może znaleźć obejście, żeby coś niedozwolonego zrobić. W przypadku gdy zabezpieczenie bazuje na VBA, wystarczy...
If haslo = "1234" Then 'sprawdza poprawność hasła Tutaj 'haslo' jest zmienna, ma wartosc "1234", Worksheets("arkusz1").Protect "haslo", userinterfaceonly:=True 'odblokowuje ochrone arkusza tu haslo naprosto ma wartosc "haslo" Dodano po 8 Private Sub Workbook_Open() Worksheets("arkusz1").... UserInterfaceOnly:=True...
Przetestuj takie rozwiązanie. Ochrona arkusza jest włączana automatycznie podczas otwarcia skoroszytu (hasło: "123" zdefiniowane jest w module VBA 'ten_skoroszyt'). Komórki, które mają być edytowane przez użytkowników muszą mieć odblokowaną ochronę (formatuj komórki->ochrona->zablokuj /odznaczone/). andie
Dzień dobry, Rozwiązanie można oprzeć na dwóch procedurach obsługi zdarzeń. Pierwsza procedura będzie wykonywana przy aktywacji arkusza i będzie przygotowywać arkusz do ochrony. Wykonuje ona następujące operacje: 1) wyłącza obsługę błędów (dot. p. 4) 2) zdejmuje ochronę arkusza (jeśli nie było ochrony nic nie zmienia), 3) zdejmuje blokadę wszystkich...
Spróbuj z hasłem (zmień wartości, jeśli ma być odwrotnie)[syntax=vb]Sub makro1() ' ' makro1 Makro ' blokowanie komórek i ochrona arkusza' ' Klawisz skrótu: Ctrl+r ' ActiveSheet.Cells.Locked = False With ActiveSheet.Range("C9:F13,C15:F19,C21:F2... .Locked = True .FormulaHidden = False...
Narzędzia -> ochrona -> chroń arkusz/nie chroń arkusza Jeśli autor ustawił hasło na ochronę arkusza zastosowanie mają dywagacje w powyższych postach.
Możesz dodać zakresy odblokowane.. (Excel 2003) a resztę zablokować. Narzędzia -> Ochrona -> Zezwalaj użytkownikom na edycję zakresów. I oczywiście chroń arkusz.
Ochrona arkusza wyłączona?
Hmm... Mam Excel 2003 ActiveWorkbook.SaveAs Filename:="C:\!\Test1"... _ FileFormat:=xlTextPrinter ActiveWorkbook.Close SaveChanges:=False wszystko w porządku 2007 to samo bez .Unprotect Z włączoną ochroną VBA i ochroną arkusza na hasło? Załączam plik. Hasło do VBA: "abc"
aby zablokować dany arkusz w exelu należy wejść w zakładkę recenzja i kliknąć chroń arkusz. Jak klikniesz chroń arkusz to podajesz hasło i powtarzasz je jeszcze raz. Aby coś edytować w arkuszu musisz usunąć ochronę z arkusza Jeśli chcemy mieć jakieś komórki odblokowane przed zmianami np. komórkę B5. Klikamy w tej komórce prawy przycisk myszy i formatuj...
nie to nie pomaga daje to tylko to ze moge zaznaczyc wybrany fragment, ale jak chce cos gdzies wpisac to nie działa, wiecie chodzi mi o to zeby zablokowac tylko czesc arkusza
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.
Witam. Jestem w trakcie tworzenia skomplikowanego pliku (w sumie to dwóch plików). Jestem teraz na etapie tworzenia hasła do ochrony arkuszy. W plikach mam zrobione coś takiego że ochrona włącza się automatycznie po zamknięciu pliku tak aby niepowołane osoby po otwarciu nie mogły edytować pliki. W modułach VBA mam dodany wpis: [syntax=vb]Public Const...
Włącz ochronę na komórkach z kolumn A i B, poprzez formatowanie komórek -> ochrona -> zaznaczyć „Zablokuj” (w komórkach, które mają być wypełnianie przez użytkowników, należy odznaczyć tę opcję). W module Ten_skoroszyt wprowadź kod: [syntax=vbscript] Private Sub Workbook_Open() Worksheets("Arkusz1").Protect Password:="", UserInterfaceOnly:=True...
Po co ochrona, jesli np. przed tym(zamykaniem) "użytkownik przez przypadek kasuje jakąś formule"? W kazdym razie mozna uzyc zdarzenia[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) For Each s In Me.Sheets s.Protect 'ew. haslo Next Me.Save End Sub [/syntax] Ale lepiej mieć zapasowe arkusze i przed zamknięciem kopiowanie formuł, lub, jeśli...
Moderowany przez Marek_Skalski: Kolego, Twoje pytanie nie jest bezpośrednio związane z pytanie Autora tematu. Z tego powodu sugeruję wydzielenie tematu do nowego wątku. 3.1.19. Nie wysyłaj wiadomości w tematach archiwalnych, jeśli jest to kolejne pytanie, w szczególności inne niż osoby pytającej. Z racji szacunku do pytającego załóż własny temat. Możesz...
Dzien Dobry, korzystam z excel 365 i chcialabym dla uzytkownikow zablokowac do edycji czesc komorek w zakladkach na jednym arkuszu. Pierwsza zakladka z opcja zaznaczonych komorek plus ochrona zakladki dziala bez zarzutu, w kolejnych natomiast excel chroni cala zawartosc bez wzgledu na zaznaczony obszar. Probowalam grupowania i pojedynczych dzialan lecz...
Nie chcę za bardzo wchodzić w pomysł kolegi adamasa bo nie wiem co było głównym celem i dlaczego to zrobił tak a nie inaczej. Zaproponuje trochę inne rozwiązanie, ale ponieważ nie znam całego kodu i intencji arkusza może być kłopot z działaniem (np wcześniejsza ochrona arkusza) Zakładam jak piszesz, że nazwiska w danych kolumnach są posortowane a właściwie...
ActiveSheet.Protect password:=haslo
Chyba pomieszałam. Niestety wcale nie "Chyba" :cry: , ale na pewno :D Komórka C5 nie jest powiązana z żadnym boxem umożliwiającym jakikolwiek wybór :!: Jeżeli cokolwiek wpiszesz do komórki C5 :arrow: zaczyna działać Twoje makro (oderwane zupełnie od arkusza Słownik :!: i tamtych tabelek), lecz po wybraniu checkboxa (ze względu na kod: If TrybEdycji...
Prawym klawiszem na wybrany arkusz i "Chroń arkusz", jeśli chcesz ukryć to wybierasz "Ukryj". Później dajesz "Chroń skoroszyt" w opcjach Recenzja z zaznaczeniem pola "Struktura" i nie ma możliwości odkrycia arkusza. Założone hasło nie jest wywoływane przy otwieraniu dokumentu. Trzeba je wprowadzić tylko w celu zaprzestania ochrony skoroszytu. Dziękuję...
Można postąpić tak: Odblokować wszystkie komórki w arkuszu (a przynajmniej te, które mogą podlegać edycji). Włączyć ochronę arkusza. Do kodu arkusza wpisać procedurę obsługi zdarzenia Change: [syntax=text]Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect Target.Locked = True ActiveSheet.Protect End Sub [/syntax] Jeśli arkusz...
Włącz ochronę arkusza.
... Kiedy nie miałem filtrowania poprzez przycisk z makrem vba ukrywanie oraz chronienie komórki pomagało, lecz kiedy ma m filtrowanie z przycisku, to VBA wyrzuca błąd iż arkusz jest chroniony A czy w kodzie vba jest gdzieś taka linia (?): True , to po zablokowaniu arkusza dana czynność jest dozwolona. Tam gdzie jest False , jest ona zabroniona. ......
Niestety, nie ma takiej opcji. Możesz co prawda przy ochronie arkusza zezwolić na sortowanie, ale zakres nie może składać się z komórek zablokowanych.
Jesteś pewien że potrzebujesz do tego MAKRA? Bo moim zdaniem wystarczy zwykła [url=http://office.microsoft.com/pl-pl/e... arkusza.
Ukryć a następnie dać ochronę arkusza,tabeli.
Poza tym arkusz (sheets) nie ma w visible "opcji" True. Oczywiście ma :) Właściwość Visible obiektu może przyjąć wartość True, False. Tu raczej podejrzewam błąd w nazwie (1004), lub włączoną ochronę skoroszytu (struktura). Spróbuj marcinj12 . Wstawianie nowego: Można wykorzystać zdarzenie 'Private Sub Workbook_NewSheet(ByVal Sh As Object)'. Wyłączyć...
Odptaszkuj "zablokuj" w ochronie (formatowanie) komórek z wyjątkiem wybranych i włącz "Chroń arkusz". [url=http://office.microsoft.com/pl-pl/e... link z dokładnym opisem.
Do tego nie jest potrzebna znajomość VBA. Excel ma funkcję blokowania komórek - zaznaczamy komórki do zablokowania, blokujemy i włączamy ochronę arkusza. W momencie włączenia ochrony Excel zapyta o hasło. Trzeba sobie włączyć widoczność paska narzędzi "ochrona"
Możesz zablokować każdą komórkę na pewne zmiany w niej (ikona zablokuj komórkę). Żeby to jednak zadziałało musisz włączyć blokowanie komórek Narzędzia->Ochrona->Chroń arkusz ...
Zaznacz komórki D3:D27 i z formatu komórek, w zakładce Ochrona, odznacz Zablokuj. Potem pokombinuj z opcjami menu Recenzja, Chroń arkusz - w bardziej restrykcyjnej wersji zostaw domyślnie zaznaczone dwie pierwsze opcje opcje. Szczegóły: [url=http://office.microsoft.com/pl-pl/e...
Załącz przykładowy plik, bo to trzeba sprawdzić. Prawdopodobnie w procedurze Change trzeba zdjąć ochronę arkusza, zmienić status komórki na odblokowany, a następnie przywrócić ochronę.
Aby ochronić komórki przed przypadkowym nadpisaniem ich zawartości trzeba wykorzystać mechanizm ochrony arkusza oraz przedefiniować czasowo funkcję klawisza F2 . Najpierw musimy zdecydować, które komórki mają być objęte ochroną. Domyślnie blokowane są wszystkie komórki, ale blokada jest nieaktywna dopóki nie włączymy ochrony arkusza. Blokowanie i odblokowywanie...
jeśli chodzi Ci oto zeby nikt nie zaglądał do niego to: wejdż w arkusz excel. nastepnie narzędzia w pasku u góry potem opcje... potem zabezpieczenia i bedziesz tam miał :hasło ochorony przed otwarciem lub hasło ochorny przed zmianami. oczywiście haker sie tym zbytnio nie przejmie. pozdrawiam
no dzięki działa. Cho mam kłopoty z ochroną arkusza ale to już inna bajka.
szukam programu lub sposobu obeścia hasła do "ochrony arkusza" w skoroszycie ms excel. Hasła pozakładał stary pracownik któego już nie ma. Udostępniam skoroszyt. Prosze o hasłą do arkuszy na priv lub tutaj. http://student.twp.olsztyn.pl/~maniac/OC...
Można, wykorzystując VBA. Procedura zdarzeniowa przy otwarciu pliku lub aktywowaniu arkusza. Nagraj makro Formatowanie>Ochrona wiersza. Początek makra to założenie ochrony na wszystkie (Cells), następnie odblokowanie wybranego wiersza. Np w pętli, przez wyszukanie (Find), lub przez wskazanie (jeśli daty występują kolejno). Na początku oczywiście zdejmowanie...
W formacie komórki na ostatniej zakładce ustawić opcję zabezpieczeń. Zabezpieczenie zaczyna działać gdy zostanie ustawiona ochrona arkusza. Powodzenia
Ponieważ zmiana dzieje się na arkuszu Arkusz1, można umieścić w kodzie aktywacyjnym w kodzie Arkusz2 [syntax=vb]Private Sub Worksheet_Activate() Dim w&, k&, och As Boolean arw = Array(2, 3, 5, 6, 8, 10) With Me .Unprotect For k = 1 To 11 och = UCase(.Cells(1, k)) <> "JEST" For w = LBound(arw) To UBound(arw) .Cells(arw(w), k).Locked = och...
1. Początkowo w formatowani komórek odblokować zakres B:I 2. Włączyć ochronę arkusza. (np. z hasłem 111 ) 3. Umieścić w kod Arkusz1 ten kod: Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("B:I")) Is Nothing Or Cells(Target.Row, 1) <> "" Then Exit Sub Me.Unprotect...
Napisz co chcesz uzyskać, to może rzeczywiście mechanizm ochrony arkusza i blokowanie komórek wystarczy.
...i jeszcze znalazłem jeden błąd który muszę zlikwidować, mianowicie jak uruchomię plik i wyskoczy okienko logowania to po wpisaniu nieprawidłowego hasła i kliknięciu na "Logowanie" czy Enter kolumny nie zostaną odkryte ale zostanie wyłączona ochrona z arkusza. Kliknięcie na anuluj jest OK. Dlaczego ta ochrona sama się wyłącza?
Żeby to zadziałało musisz włączyć ochronę całego arkusza. Worksheets("nazwa akrusza").Cells.Locked = False 'wyłączenie ochrony Worksheets("nazwa akrusza").Range("B1:B10").Locked = True 'ustawienie blokowania edycji dla konkretnego zakresu Worksheets("nazwa akrusza").Protect Password:="pass", UserInterfaceOnly:=True 'włączenie ochrony arkusza Do poniższego...
Zmiana kolorów ustawia się w formatowaniu warunkowym Poczytaj o ochronie arkusza jak zablokować do edycji część danych w arkuszu
w pliku są danę osobowe pracowników, więc najpierw musiałbym go "wyczyścić". Przy starcie jest makro, które ukrywa arkusze i włącza ochronę. Arkusz1 ma własne menu podręczne.
Na początek zaznacz komórki planszy w której gracz wpisuje zgadywane kolory i w Formatuj komórki>>Ochrona "odptakaj" blokadę. Zabezpiecz arkusz Narzędzia>>Ochrona>>Chroń arkusz . Potem w VBA w zdarzeniu Worksheet_SelectionChange arkusza z planszą wpisz kawałek kodu, który: 1. po wypełnieniu całego wiersza: - zdejmie ochronę arkusza - "zaptaka" blokadę...
Jedynie blokada całego arkusza, poza komórkami przewidzianymi do edycji może dać spodziewany efekt. Odblokowanie komórki w kodzie arkusza przy zdarzeniu Worksheet_Change. Możliwe założenie hasła blokady arkusza, niewidoczne w przypadku ochrony projektu VBA.
Można umieścić kod w ThisWorkbook przy zdarzeniu Open. Żeby zabezpieczyć plik przed otwarciem bez makr można ustawić na kluczowe arkusze atrybut VeryHidden (z poziomu edytora VB) a widoczny zostawić dodatkowy pusty arkusz. Przy starcie jeśli warunki są spełnione wystarczy zamienić atrybuty. Tu konieczne hasło ochrony VBA. Przy zamknięciu ustawić na...
Witam Wszystkich, Mam taki problem do rozwiązania- jeżeli chodzi makra to jestem na początku drogi - a chodzi mi o coś takiego - w arkuszy zrobiłem kalkulację z grupowaniem danych - kiedy włączę ochronę - brak jest możliwości "rozwijania" danych - jakie makro pomoże ???
excel ochrona arkusza excel makro ochrona arkusza ochrona arkusza
wymiana grzałki czujnik pralka ustawi onkyo
insignia radio astra wentylator
Błąd skrzyni biegów Opel Vivaro 770563 - diagnostyka i naprawa Blaupunkt NY 800 - Instalacja Androida: Możliwości i Ograniczenia