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ć...
Zgadzam się z kolegą marek003 z tym, że bystrzejszy użytkownik może przerwać działanie makra i... ma dostęp do w ten sposób zabezpieczonego arkusza. Innym rozwiązaniem jest skopiowanie (makrem) określonego obszaru/ów do innego arkusza i tam umożliwienie obróbki bez ograniczeń. W ten sam sposób można...
po odkryciu możliwości excela zaczynam naukę , ponieważ jestem zafascynowany jego możliwościami Na tym forum jest wielu prawdziwych mistrzów Excela i VBA. Nie wiadomo jednak czy znajdą czas żeby przygotować Ci kompletną dedykowaną do Twoich potrzeb aplikację :?: Jeśli zdecydujesz się jednak...
Tak dla pewności zapytam: 1. Jeśli użytkownik zmieni hasło w czasie pracy? 2. Jeśli otworzy bez VBA? To wszystko jest do ominięcia, ale trochę z tym zachodu. Makra muszą znajdować się w kodzie przy zdarzeniach skoroszytu (Thisworkbook). Ukrywasz przez .Visible = xlVeryHidden (odkryć można tylko...
Dodano po 4 dokladnie w [syntax=vbscript]Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove[/syn...
...jak kliknę w Excel na pasku to pojawia się cały arkusz - czy nie da się zablokować tej możliwości ? Chodzi mi o to, aby nie można było pokazać arkusza. Najprościej zminimalizowany plik Excela ukryć. Rozszerz procedurę UserForm_Initialize o linijkę kodu wykorzystującą właściwość "Visible" [syntax=vb]Private...
Witam. Mam pewien problem z arkuszem, dokładnie chciałem sobie zrobić coś takiego że jest sprawdzane kilka warunków by móc używać danego pliku excela. Z VB jestem niestety zielony, ale dzięki informacjom znalezionym coś tam sobie próbuje skleić. Mianowicie mam już coś takiego: ThisWorkbook: Kod: ...
Witam. Mam pytanko związane z pewną funkcją Excela zaznaczoną na poniższym screenie, a dokładnie 'Tryb projektowania'. Poniższy kod służy mi jednym kliknięciem do odkrywania/ukrywania wszystkich arkuszy. Czy do tego kodu jest możliwość dodać aby przy odkryciu wszystkich arkuszy została zaznaczona automatycznie...
Ja zaproponuję jeszcze coś innego (oczywiście cały czas mówimy o możliwościach bez wykorzystania VBA [makr]). Zaznacz wszystkie kolumny. Ukryj je. Włącz ochronę arkusza z hasłem odhaczając wszystkie opcje. Najedź na nazwę arkusza kliknij ukryj. Nawet jak ktoś odkryje arkusz będzie widział szarość...
Dzięki bardzo, o to właśnie chodziło. Jeszcze mam jedną uwagę związaną z tą opcją. Do każdego arkusza mam dodany poniższy wpis który powoduje że po wyjściu z arkusza automatycznie zostaje ukryty: [syntax=vb]ActiveWorkbook.Unpro... Password:="tutaj_hasło" If Sheets("Admin").Range("N2") = 1 Then Else ...
Czy mozliwe jest odkrycie tych ukrytych formuł? Tak pod warunkiem, że znasz hasło. Dodane: Jeżeli go nie znasz a chcesz tylko formułki podejrzeć otwórz arkusz w bardzo przyjaznym oprogramowaniu firmy Sun Microsystems Inc. :D I niech ktoś spróbuje zarzucić mi piractwo
Niestety nie umiem wykorzystać twoich kodów żeby poprawnie działały. Może dokładniej powiem co chcę osiągnąć tym kodem. Wykorzystałem w nim pięć przycisków CheckBox (wszystkie przyciski są w jednym arkuszu), w kodzie jak pokazałem w pierwszym poście wszystko działa ok, jednak chciałem aby zastosować...
chodzi o to żeby plik się otwierał bez hasła, ale jak ktoś będzie chciał "odkryć" tylko jeden z ukrytych arkuszy żeby wtedy był poproszony o hasło Załączony plik otwiera się bez żadnego hasła :D , ale każda zmiana w arkuszu Rob naniesiona w kolumnach D:H zapisywana jest w ukrytym arkusz kop ...
Dołóż jeszcze ochronę arkusza (z innego pliku będzie można odczytać, ale zmienić już nie). O ile hasło będzie dosyć mocne dla "usuwaczy" freewarowych, o płatnych nie wspominam. Warto też chronić projekt VBA hasłem, żeby nikt nie mógł zmienić atrybutu Visible arkusza w edytorze i powinno być OK. ...
Tam są obrazki! ExecuteExcel4Macro chyba odpada (z ciekawości jeszcze spróbuję). Nie możesz po prostu otworzyć plik Workbooks.Open i skopiować arkusze? Ewentualnie można oba plik otworzyć w ukrytej instancji i tu kombinować z wywołaniem makra (tego jeszcze nie próbowałem) i odkryć dopiero po zamknięciu...
1. Jeżeli nie używasz "select" przy kopiowaniu (czyli tak jak masz teraz) to możesz ukryć arkusze i skopiuje bez problemu ale można na czas kopiowania odkryć i ukryć przez np. Sheets("xx").Visible = xlSheetVisible Sheets("xx").Visible = xlSheetHidden 2. chodzi ci o że przy zapisaniu skoroszytu...
Witam serdecznie, Mam następujący problem, udostępniam innym użytkownikom z mojej firmy pliki .xlsx do wypełnienia, które ze względu na późniejszą obróbkę makrami są poblokowane. Blokada polega na haśle w ochronie skoroszytu --> chroń strukturę i okna --> Struktura (nie chcę żeby pozostałe osoby widziały...
Makro działa!!!! Bardo dziękuję za pomoc!!!! Dodano po 43 Jeżeli mogę, to chciałabym zadać jeszcze jedno pytanie. Wydawało mi się, że na zasadzie analogii sobie poradzę, ale jednak się nie udało. W tym samym arkuszu muszę zrobić podobną operację - jeśli w scalonych komórkach B6:E6 pojawi się...
Jeśli już masz makro ukrywania/odkrywania kolumn to: podpowiedź 1. W arkuszu chronionym nie można odkryć kolumn podpowiedź 2. Ochronę z hasłem można zrealizować w makro, konieczna ochrona kodu VBA. podpowiedź 3. [syntax=vb]I UserName = "User1" then 'odkrywamy jakieś kolumny ElseIf UserName =...
Witam wszystkich. Mam prośbę o pomoc w poprawieniu kodu. W pierwszej wersji pliku w jakim był wykorzystany kod wszystkie arkusze były widoczne i odblokowane i kod działał poprawnie. Plik postanowiłem trochę przerobić. Ukryłem wszystkie arkusze i zablokowałem je przed wścibskimi użytkownikami. Po ukryciu...
Można schować kluczowy arkusz w Excelu (xlVeryHidden) i odkryć na starcie tylko w określonych warunkach, np. na konkretnym nośniku (serial) i przez pewien czas, część komórek arkusza mozna chronić przed zmianą/podglądem, otwierać plik wyłącznie na konkretnej maszynie... Dane z pliku można kasować po...
Mam problem w pliku mam niewiadoma liczba ukrytych arkuszy chciałem wszystkie odkryć za pomocą makra z pomocą Internetu stworzyłem taki kod Sub odkryjbarkusze() Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets ws.Visible = xlSheetVisible Next ws End Sub niestety nie działa moja znajomość...
