No tutaj [syntax=vbnet] 'wprowadzenie dzisiejszej daty do komórki P2 Worksheets("licence").Cells(2, 16).Select ActiveCell.FormulaR1C1 = "=TODAY()"[/syntax] za pomocą metody select wybierasz komórkę w ukrytym arkuszu, ale żeby coś do komórki zapisać wcale nie musisz jej wybierać, wystarczy że napiszesz tak: [syntax=vbnet]Worksheets("licence").Cell...
Nie bardzo rozumiem, gdzie w tym jest ukryty problem. Zerknij na arkusz i napisz co jest nie tak:
przycisk do aktywacji drugiego arkusza Rozumiem, że "normalnie" arkusz "Dane" jest ukryty :?: Proponuje zmodyfikować kod przycisku poprzez zastąpienie metody Select (która umożliwia wszak wybór wielu obiektów z kolekcji :cry: ) metodą Activate :idea: - tzn.: [syntax=vbscript]Sub Dane() Sheets("Dane").Visible = True Sheets("Dane").Activate End Sub[/syntax]
Sprawdz czy aby na pewno stosujesz odpowiednią nazwę arkusza. Czy nie ma literówki itp. Jeżeli prawidłową nazwę arkusza ujmiesz w cudzysłowiu to musi działąć nawet ze spacjami i innymi znakami które pozwolą się wpisać w nazwie. Chyba że błąd dotyczy czegoś innego np. arkusz jest ukryty lub komórka chroniona
Ok Ale jak/czym wyłączyłeś edytowanie nazw arkusza i ewentualne dodawanie nowego arkusza. Poza tym arkusz (sheets) nie ma w visible "opcji" True. Może być: -1 (czyli pokaż) 0 (ukryty) 2 (bardzo ukryty - co by to nie znaczyło)
Jest ukryty arkusz 'admin' Tam wszystko ma byc jasne Dodano po 1 obszar ma nazwe 'users'
W czasie drukowania Otwórz arkusz, a następnie ukryć Sheets(.List(.Value)).Visible = True
No tak to jest, gdy poprawka dotyczy fragmentu wyrwanego "ze środka" ;) W załączniku uproszczony przykład kopiowania w ukrytym arkuszu ("Arkusz1"). -odkryj -popatrz -ukryj -naciśnij przycisk -odkryj i zobacz co się narobiło
(at)adamas_nt dzięki za pomoc, plik działa wyśmienicie. Jednak mam jeszcze jedną małą prośbę o pomoc w rozbudowaniu a dokładnie dodaniu jeszcze jednej opcji do kodu, niestety nie mam pojęcia jak to zrobić. W załączonym pliku pokazałem o co mi chodzi. Podam może parę szczegółów. W pliku dodałem parę arkuszy które ściśle odpowiadają swoją nazwą w odpowiednich...
To trzeba wykonywać program krokowo i gdy wystąpi błąd sprawdzić wartości wszystkich zmiennych. Opis błędu wskazuje, że nie ma arkusza o wskazywanej nazwie, więc trzeba dokładnie sprawdzić jakie są nazwy arkuszy, a co jest w komórkach. Jeśli nie znajdziesz sam przyczyny błędu, załącz przykładowy plik, bo tak to można tylko zgadywać.
Zrobiłem coś w tym temacie... Wygląda, że działa poprawnie, jednak trzeba mieć świadomość, że przy dużej ilości danych efektywność procedury nie będzie wysoka. Po odpaleniu spokojnie będziesz mógł iść na kawę :D W skoroszycie dodałem dodatkowy (pomocniczy) arkusz "work", który jest ukryty. andie
Nie bardzo (formuły tablicowe), ale za to straaaaasznie wolno. Kolumnę pomocniczą możesz "upchnąć" w ukrytym arkuszu i nikt jej nie zauważy ;)
Problem polega na tym że w ten sposób mogę tylko sczytywać dane z tych arkuszy a chciałbym z poziomu arkusza zbiorczego edytować dane w poszczególnych arkuszach . Zadanie jest równie realne jak w hydrologii gdzie chcieliby "z poziomu" morza regulować przepływ wody w górnych biegach rzek wpływających do tego morza - po prostu zawracanie kijem Wisły...
Wywoływanie ukrytych arkuszy dla określonych użytkowników :idea: można zrealizować tak, że po otwarciu pliku widać tylko formularz logowania 987889 po wprowadzeniu uprzednio zarejestrowanych loginów i haseł otwierają się tylko arkusze dedykowane dla logującego się użytkownika :D 987890 W załączonym pliku są po dwa arkusze dla Asia (psw=1234), Maria...
marcinj12 miał na myśli ponowne włączenie automatycznego przeliczania arkusza, bo: Application.Calculation = xlCalculationManual włącza przeliczanie ręczne (defaultowo - klawisz F9), żeby przyspieszyć podmienianie wartości w komórkach. Tak więc po wykonaniu całej pętli powinieneś na nowo włączyć przeliczanie automatyczne, tj: Application.Calculation...
Jak usuniesz formę z pamięci, to wszystkie zmienne przez nią "wyprodukowane" znikają również. Proponuję status przycisków umieścić w zmiennych w głównym module, ewentualnie w ukrytych komórkach arkusza , tam dotrwają do samego końca programu, a w komórkach arkusza to nawet się status zapisze
W Excelu 2003 kopiowanie danych spod filtra kopiuje także dane ukryte, a nie tylko widoczne rekordy. Nie chcę w tej chwili sprawdzać, ale chyba / być może ten problem nie występuje w Excelu 2007 (albo myli mi się z Open Office - tam na pewno kopiują się tylko widoczne rekordy przy autofiltrze). Aby uniknąć tego kopiowania ukrytych rekordów wchodzi się...
chodzi o to, żeby z 1 i 2 (i innych których nie ma we wzorze) arkusza z danej kolumny konkretnego pracownika na ostatni arkusz przenosiły się w osobną tablkę Jeżeli posiadasz Excela powyżej wersji 10 :?: to tego typu efekt jak na zrzucie 1047238 możesz uzyskać poprzez utworzenie tabelki połączonej (łącza z danymi z tabelek "kierunkowych" np w ukrytym...
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ę...
Polecam funkcje wyszukaj Jezeli bedziesz szukał w innym arkuszu to masz łatwy dostep do zmian a jak dodatkowo ukryjesz arkusz to nikt obcy nic ci nie namiesza. Dokładnie o tej funkcji mozna poczytac w helpie
1. Jeśli chcesz zmienić formuły dla innego rozmiaru, usuń lub dodaj wiersze wewnątrz zakresu... 2. Jeśli chcesz uzyskać wyniki dla każdego roku osobno, powtórz grupy formuł. Tak, jak gdyby kilka tabel ustawić obok siebie. Kolumny, komórki i wiersze pomocnicze umieść w osobnym (ukrytym) arkuszu, żeby widoku nie psuć. 3. MAX, bo najkrótsza :) Możesz próbować...
No tak, działania kodu nie sprawdziłem i niechcący wprowadziłem Cię w błąd. Jako rekompensata Twojego straconego czasu makro z elementami, o których do tej pory była mowa. Krytyczną sprawą było brak zerowania zmiennej nowyNr na początku pętli... Edit 9:00 zmieniłem załącznik (dodatkowo 5-cio cyfrowe i pomijanie arkuszy ukrytych)
Jak można w Excelu zablokować możliwość odczytu zawartości ukrytych komórek, wierszy, kolumn i arkuszy z poziomu Excela i VBA?
Excel to arkusz kalkulacyjny (obliczeniowy) a nie gotowy program. Nie da się "wstawić "tabelki w jeden wiersz. Wg mnie nie do końca rozumiesz co to jest arkusz kalkulacyjny. Co do makra i "małej" podpowiedź. :) Kłopot polega na tym że pisanie makra pod dane rozwiązanie musi opierać się na konkretnych/stabilnych danych (które zna autor projektu). To...
Excel jest jak najgorszym środowiskiem do robienia tzw "oprogramowania sieciowego" Nigdy nie był do tego przeznaczony Dodano po 2 Excelowe "zabezpieczenia tajemnic" przez ukrycie to żart ...
Da sę tak zrobić, żeby lista przy wykresie zmieniała również liste przy tabeli? Jeśli chcesz zrobić tak jak na zrzucie: 967035 to tak :please: Można to zrobić wiążąc kluczowe komórki (I3 oraz I39) ukrytego arkusza z polem wyboru w arkuszu widocznym :D :spoko: , tak jak w załączonym pliku. 967038
Twojego filmiku nie widać. Edit: Już się pokazał. Spróbuj jednak dokładniej opisać swoje obserwacje. Czy problem z tym plikiem "okrojonym" na potrzeby forum występuje u Ciebie na każdym komputerze i w każdej wersji Excela? Masz w pliku kilka ukrytych arkuszy, ale eksperymentujesz tylko z "B". Czy każdy arkusz po ukryciu zachowuje się tak samo? Ponieważ...
komórki podświetlają się na czerwono nie tylko te po zmianach :cunning: Przecież wyraźnie pisałem: Jeśli interesuje Cię sporządzanie tylko ukrytej kopii wszystkich edycji w arkuszu Rob - to usuń formatowanie warunkowe , usuń kod Workbook_BeforeClose i wymień kod w arkuszu Rob Przy ukrytej archiwizacji wszystkich edycji - traci sens porównywanie tabeli...
To może znajdzie się ktoś kto to będzie mógł sprawdzić :) Poczekam, na razie muszę sobie radzić ręcznym czyszczeniem każdego arkusza osobno, na szczęście jest to tylko raz w miesiącu Dodano po 11 Niestety nie mam dostępu do 365 i nie mam jak sprawdzić( A może jakiś inny kod czyszczący który by ogarną temat? Trzeba jednak zwrócić uwagę że nie zawsze...
Musisz to odwrócić. Najpierw zapamiętanie nazwy pliku: zapisz w ukrytym arkuszu wartość '.SelectedItems(1)' (path+filename) i użyj jako argument 'Open' (Append lub Output) przy zapisywaniu. Jeśli wszystko odbywa się w jednej sesji, możesz przypisać do zmiennej globalnej. String do zapisu (wiersz arkusza) poskładaj w wewnętrznej pętli For. Żeby było...
...mam problem ... wszystko działa bez problemu :D Jeśli działa rzeczywiście :?: zgodnie z Twoimi oczekiwaniami - to przenieś przycisk uruchamiający do arkusza sterującego np ten ukryty "arkusz 0" lub zlikwiduj w ogóle przyciski i makro uruchamiaj skrótem klawiaturowym :!: .
Printout działa w obrębie arkusza. Nie można drukować "na raz" zakresów z kilku arkuszy. Zwykle w takiej sytuacji składa się wszystko "do kupy" w dodatkowym arkuszu, często ukrytym i drukuje się jego zawartość...
Mamy tu kilka ukrytych arkuszy, które trzeba pominąć. Można próbować zautomatyzować listę arkuszy (pole opcji, lista nazw), ale czy warto? Zawsze można dopisać kolejne And . Chyba, że liczba wykluczonych arkuszy urośnie do >10... Wklej w kod arkusza "Kalendarz" i przetestuj [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address...
lub [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 7 And Target > 0 Then Rows(Target.Row).Hidden = True End Sub [/syntax] lub odpalic dla aktywnego arkusza [syntax=vb]Sub ukryj() For r = 2 To Application.CountA(Columns(1)) - 1 Rows(r).Hidden = Cells(r, 7) > 0 Next End Sub [/syntax]
Wydziel dodatkowy arkusz (może być ukryty), zrób tabelkę znaków i ich odpowiedników łacińskich i zamiast w tablicy działaj w arkuszu. Na przykład tak: https://obrazki.elektroda.pl/4775489200_... https://obrazki.elektroda.pl/4498160400_... gdzie:[syntax=vbscript]Function FrPol(tekst As String) As String Dim i As Integer,...
W Twoim pliku XLS dodałem poniższy kod i przycisk w arkuszu "form2", który uruchamia ten kod. Pozdrawiam - McVik
Powiem tak na szybko: :) Znaj moje dobre serce :) W załączeni przykład z różnymi układami. Wybierz który ci pasuje ewentualnie połącz w jedno. Ponieważ jest możliwość wielu wystąpień jednego tematu na chwilę obecną nie wiem jak to ugryźć bez wiersza pomocniczego (wiersz 2 - ukryty w arkuszu1 [komórka kopiowana w bok - w prawo]) I druga rzecz w w funkcji...
Cześć. Pojawił sie dodatkowy problem. Potrzebuje filtrować produkty do których podpinam zdjęcia. Robie to na bazie filtra zaawansowanego, niestety w przypadku gdy ukrywane sa wiersze, zdjecia z ukrytych wierszy nachodzą na odkryty nastepny wiersz. Czy jest jakis sposób alby zdjęcia ukrywały sie razem z wierszami?
Generalnie Excel tak już ma, że zakres złożony traktuje jak osobne zakresy i drukuje je na osobnych stronach. "Rozumie" natomiast ukrywanie wierszy. Wierszy ukrytych nie drukuje, pomimo że są zawarte w obszarze wydruku. Wiersze można ukrywać ręcznie, za pomocą filtra lub za pomocą grupowania. Nie pokazałeś żadnego konkretnego przykładu, więc trudno...
Idea byłaby taka: 1) Żeby wymusić włączenie makr na użytkowniku to arkusze byłyby domyślnie ukryte, 2) Po włączeniu makr pokazałyby się arkusze, które można uzupełniać, 3) Przy otwieraniu arkusza automatycznie robiłaby się kopia zawartości do arkuszy ukrytych, widzialnych tylko z poziomu VBA (veryhidden), 4) Żebyś Ty miał dostęp do arkuszy ukrytych...
Testuj. Testowałem ten Twój kod w Excel 2016 i po jednokrotnym przejściu coś się wykrzacza :-( Niestety ze względu na Twoje zabezpieczenia widzę tylko dwie procedury i być może błąd powstaje z uwagi na brak przełączenia na końcu opcji Application.ScreenUpdating na True albo coś źle współpracuje ta procedura z jakimiś ukrytymi procedurami skoroszytu....
Ukrycie z haslem nie pomaga?
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 opracować plik "roboczy" dla użytkownika i później...
Tak przy zapisie pobiera część nazwy z komórki np. dane październik 2014.xlsm i ta nazwa podkreślona by była zmienną, co do tych ukrytych arkuszy mogę użyć polecenia sheets(25) czy muszę podać nazwę arkusza?
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ść VBA nie pozwala mi znaleźć błędu. Excel 2010 podświetlana...
np. w komorce A4 = B1 format "dddd" Dodano po 3 dlaczego jak ukryję komórki tam gdzie są dane to nic mi nie działa ?? jak to? dokładnie ktorze wiersze, aby ukryć?
Dziękuje. Domyślam że tylko w taki sposób można rozwiązać mój problem. Wolałbym aby każdy arkusz który ma być ukryty i zabezpieczony hasłem, był ukryty i zabezpieczony hasłem. Natomiast makro nie otwierało arkusza ale "wykonało pracę" i nie musiało ukrywać z powrotem arkusza. Zasada działania jak funkcji excela. Czy jest to możliwe?
Trudno powiedzieć jak to się stało :cry: ale ten cały plik to jedno wielkie śmietnisko z niepotrzebnie powielanymi (kopiowanymi) :D śladami "automatyzacji" - jakichś ukrytych 5 comboboxów :cry: , jakimiś cennikami np jak na zrzucie 973678 oraz "kobylastymi" jakimiś rysunkami (jakieś 45 MB skompresowane do 1,9 MB :D ) To normalne, że przetwarzanie takich...
Zapisuj w dodatkowym, ukrytym arkuszu wartości (argumenty położenia) przy dezaktywacji arkusza (ew. workbook_beforeclose) i pobieraj przy aktywowaniu...
W załączeniu "przetranponowanie" tabel by nie było ukrytych kolumn i czerwone ostrzeżenie jezeli dwa rozpoczęcia będa wcześniej niż 24 godziny od siebie (tylko w marcu jeden przypadek - ale nie wiem czy sam go nie zrobiłem) Nie wiem czy ostrzeżenie o 24 godzinach dobrze działa kiedy będa kody "literowe". Sprawdź. Co do tych 7 dni i 36 godzin - cały...
ukryty arkusz hasło ukryty arkusz ukryty arkusz hasło
komputer wirtualizacja zmywarka uszkodzić zmiana czasu letni zimowy
zmywarka siemens suszenie calormatic ustawienia
Kleiste gęste substancje w elektronice – pasty termoprzewodzące, kleje, topniki, elektrolity Jak wyjąć fiszbinę z suszarki Bosch?
