Jak nie będziesz w stanie działającego rozwiązania dopasować do swoich potrzeb to nigdy niczego nie napiszesz.
Cześć. A może coś więcej bo na razie z informacją jest oszczędnie? Jak zablokowany (włączona ochrona)? Najprostszym sposobem jest go makrem odblokować, ukryć/odkryć wiersze i zablokować (też makrem) na nowo. Do odblokowania służy: [syntax=vbscript]Sheets("Arkusz").Unprot... Blokuje natomiast: [syntax=vbscript]Sheets("TMP").Protect[/...
Jest to zrobione makrem zdarzeniowym Worksheet_Change, reagującym na zmianę wartości w komórkach B9:D9. Makro jest w module arkusza, w którym jest formularz. Treść makra: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target(1).Address = Range("f_rodz_nieruchomosci").Address Then Rows("33:76").Hidden = True With Worksheets("Legenda")...
to wtedy mozesz pokombinowac w ten sposób: If Range("A1").Value = 1 Then Columns("C:G").Sel... Selection.EntireColumn.Hidden = False End If i tak dla 2 inne wartości itd, możesz też pokombinować że 1 odsłania DEF i jednocześnie zasłania GHI, 2 na odwrót, wszystko zależy od tego co ci jest potrzebne, pozdro:)
1) Lista musi mieć ciągły zakres. Najlepiej wykorzystać do tego osobny arkusz. Trochę można zautomatyzować (patrz załącznik). Założyłem, że nazwa firmy w Arkusz1 występuje co 13 wierszy. 2) W przykładzie wykorzystałem VBA (Select Case) i ukrywanie/odkrywanie wierszy 3) j.w.
Toż to jedno drugiemu zarzecza - jak ktoś ma zablokowane makra, to jak makro "wymuszające" ma się odpalić?? ;) Nie ma takiej opcji. Możesz najwyżej ukryć wszystkie arkusze, zabezpieczyć dostęp do kodu VBA hasłem, i odkrywać je makrem na otwarciu. Jeżeli ktoś ma wyłączone makra -> makro na uruchomieniu się nie odpali i strony mu się nie odkryją. Jeżeli...
Zrób jedno makro jak uruchamia się skoroszyt które chowa paski oraz drugie uruchamiane jak zamykasz skoroszyt które będzie odkrywało paski. Powodzenia
Dzięki za info
Super. Kliknąłem podziękowanie :D. Dzisiaj w pracy przetestuję (nocna zmiana). Czy te makro dodajemy jakoś specjalnie do skoroszytu czy też normalnie na zasadzie makro/wstaw nowe?
To makro ukrywa tylko wiersze, nie odkrywa zaś jak nacisnę "tak". Dalej problem istnieje...
Nie udało mi się znaleźć podobnego tematu, więc zakładam ten. Otóż kombinując ze swoim plikiem w excelu natrafiłem na problem. W jednym z arkuszy mam hiperłącza do poszczególnych arkuszy (zakładek). Wszystko działałoby dobrze, gdyby te arkusze nie były ukryte (ze względów estetycznych, w skoroszycie mam prawie 250 arkuszy i podczas pracy widoczny jest...
Makro to się samo uruchamia, jeśli podłączysz je pod swój arkusz pod zdarzenie change - wtedy jest z automatu wykonywane gdy cokolwiek się w arkuszu zmieni. Moje makro używa tego samego mechanizmu, w załączniku masz gotowy przykład już z osadzonym makrem. W makro Kolegi PRL musisz zrobić więcej poprawek, żeby działało pod Ciebie - będzie ono jedynie...
Witam Chciałem dodać przycisk typu ON/OFF ukrywa i odkrywa obszar Mam stworzone dwa makra makro1 ukrywa obszar makro2 odkrywa obszar W sieci znalazłem sposób który pozwala na taką sztuczkę ale nie wiem gdzie to podstawić do obecnych wartości aby to działało. znaleziony kod Private Sub ToggleButton1_Click() With ToggleButton1 If .Value Then Call...
To proste, mam arkusz w którym dość często wprowadzam zmiany, ale w normalnym trybie w arkuszu działają różne makra które miedzy innymi ukrywają wedle potrzeby wiersze i kolumny. Kiedy potrzebuję wprowadzić w arkuszu zmiany to mam jeden przycisk którym w arkuszu odkrywam wszystkie wiersze i kolumny, ale w tej sytuacji muszę włączyć tryb projektowania...
Wklej w kod arkusza :[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "C47" Then If LCase(Target.Text) = "przelew" Then 'Przelew, PRZELEW, przelew Rows("48:49").EntireRow.Hidden = False Else Rows("48:49").EntireRow.Hidden = True End If ElseIf Target.Address(0, 0) = "C47:E47" Then 'jeśli pusta też ma odkrywać to...
Ale co chcesz osiągnąć? Nawet gdyby szło przewijać, zmiana wartości komórki w arkuszu nie zmieni wartości pola tekstowego. Musiałbyś wczytać ponownie... Jakimś sposobem byłoby umieścić ukrywanie formularza pod przyciskiem (UserForm.Hide), a w Thisworkbook_Open przypisać kombinację klawiszy uruchamiania makra odkrywania. Np dla Shift+a Application.OnKey...
Witam, Prośba o pomoc mam trzy pola checkbox, każde z nich ukrywa lub odkrywa wiersze które mają określone wartości. Lepiej lub gorzej ale radzę sobie żeby każdy checkbox działał osobno, ale chciałbym jeszcze dorzucić warunek, że kiedy wszystkie trzy checkboxy są odznaczone (false) to żeby wszystkie wiersze były odkryte. W załączeniu również plik z...
Myślałem już o tym ale - nie da rady. To spory, rozbudowany arkusz edytowany na bieżąco przez cały dzień roboczy przez 4 osoby (czyli - kto jest właśnie przy kompie:-). Schowanie kolumny czy wiersza nie wchodzi więc w rachubę. Może dwa przyciski? Jeden zakrywa a drugi odkrywa? Sam nie wiem... Muszę nad tym posiedzieć.
Bardzo dziękuję za szybką odpowiedź - pomogła i wszystko pięknie działa. Dodałam jeszcze "else" i teraz po ponownym uruchomieniu makra odkrywają się wiersze, które w kolumnie A mają już inną wartość niż 0 (w tej kolumnie przepisują się dane z innego arkusza). [syntax=vb][/syntax] Sub ukryjWiersze() Dim i As Integer Dim selRange As String For i = 60...
Albo zrób sobie "odtwarzarkę wzorów", czyli makro, które je przywróci, moduł vba zabezpieczysz hasłem oraz przed podglądem, wstawisz przycisk w arkusz ... i wtedy żaden użytkownik ci nie straszny, będzie mógł kasować wzory do woli, co minutę ... jedno wciśnięcie przycisku i masz odtworzone formułki, a złośliwy użytkownik zgrzyta zębami ... Dodano po...
Witam, mam problem z napisanie makra które chowałoby wiersze po kolei, tzn. jeden przycisk chowa 4 wiersz, po kliknięciu go ponownie chowa się także 5, po ponownym kliknięciu jeszcze 6 i tak dalej, drugi przycisk odrywa te wiersze od tyłu, czyli jeśli ostatni schowany wiersz to był wiersz nr 6 to go odkrywa, po kolejnym kliknięciu odkrywa wiersz nr...
Teraz pokazuje mi błąd w tej linijce[syntax=vbscript]With Sheets(tblArkusze(i)) .Visible = True[/syntax] Odrzuciłem na razie sprawę formuł i sprawdzania poprawności. Teraz to makro wygląda j.n. [syntax=vbscript]Sub wstawianie_IL() 'poprawione Dim fd As FileDialog Dim wkb1 As Workbook, wkb2 As Workbook Dim tblArkusze() Application.ScreenUpdating = False...
Nie wiem, czy dobrze zrozumiałem. Filtrowane mają być tylko kolumny, czy również wiersze? Najlepiej zawsze pokazać w załączniku oczekiwany wynik. Napisałem makro zdarzeniowe ukrywające kolumny z tygodniami z wyjątkiem tej wpisanej w polu "LICZBA TYGODNIA". Makro jest umieszczone w module arkusza. Pusta komórka w polu "LICZBA TYGODNIA" odkrywa wszystkie...
Szanowni Panowie, Dyskusja staje się w dużej mierze bezprzedmiotowa. Podstawowa trudność wynika stąd, że funkcja UDF nie może dokonywać żadnych (z nielicznymi wyjątkami) zmian w skoroszycie czy arkuszu, m.in. nie może niczego ukrywać ani odkrywać. Takie operacje można wykonać tylko makro, czyli procedura Sub. Tych ograniczeń nie ma jeśli funkcja jest...
Witam wszystkich forumowiczów i specjalistów. Piszę, ponieważ potrzebuje pomocy w zapewne trywialnej sprawie... Otóż.. Stworzyłem makro do arkusza, które w momencie spełnienia określonych warunków ukrywa lub odkrywa poszczególne wiersze w arkuszu. W tych wierszach znajdują się m.in. pola wyboru, które w momencie ukrywania wierszy nie ukrywają się, tylko...
makra, które umożliwiłoby ukrywanie kolumn z własnościami, które nie dot. dla danej pozycji, a odkrywało kolumny z właściwościami dot. danej pozycji. Jeśli dobrze zrozumiałem Twoje potrzeby :D to można taki efekt jak na zrzucie 986535 uzyskać poprzez makro Private Sub Worksheet_BeforeDoubleClick :idea: , a następnie poprzez makro Private Sub Worksheet_BeforeRightClick...
Najprościej będzie z przekazaniem Nr wiersza: [syntax=vbscript]Sub Makro1(w As Long) Dim MyCell As Range For Each MyCell In Range("B" & w & ":Z" & w).Cells If MyCell = 0 Then MyCell.EntireColumn.Hidden = True Next MyCell End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'If Target.Address(0, 0) = "A2" Then If Target.Column...
Cześć, szukałem w internecie po wielu miejscach sposobu na rozwiązanie problemu związanego z ochroną skoroszytu jednak rozwiązania nie znalazłem. Mam makra, które w odpowiedni sposób chowają, odkrywają arkusze oraz zabezpieczenia do tych arkuszy za pomocą hasła tak aby nikt nic nie zmieniał. Jednak chciałem jeszcze zrobić zabezpieczenia przed tym aby...
Kopiowanie formuł jest właściwością tabeli i w zasadzie sposób odwoływania się nie powinien tu mieć znaczenia. Mnie jednak po przekształceniu zwykłego zakresu w tabelę, to od razu nie zadziałało, dlatego zmieniłem sposób odwołania. Można też raz skopiować formułę, a potem powinno już działać automatycznie. Jeśli po wpisaniu czegoś do kolumny C chcemy...
Zapewne chodzi o to, żeby otwarcie bez obsługi makr zablokowało arkusze. Można ukryć arkusze z atrybutem veryhidden, zostawiając jeden z informacją w stylu: "sorry, otwarto bez makr, czy cóś". Ukrywanie realizować przy każdym zamknięciu arkusza, a przy otwarciu odkrywać. Edycję VB ochronić hasłem, żeby nikt nie zmienił atrybutów. Edit: O, zdążyłeś wstawić...
Można ale wg mnie tylko za pomocą makr (albo ukrywanie i odkrywanie poprzez VISABLE danego elementu [opcja, wybór] albo poprzez skakanie po arkszach. Trochę zabawy - ale można.
Przecież ten skrypt/makro jest skopiowany i dokładnie opisany na: https://www.extendoffice.com/documents/e... Czy asia.asia oczekuje na pomoc czy chce aby ją ktoś wyręczył z trudu przeczytania i zrozumienia gotowca? Odkrywanie rzeczy nowych może być pasjonujące.
Hejka :) Czyli podywagowali wszyscy na temat (lub nie na temat) a odpowiedzi jak nie było tak nie ma :D Proponuję CI takie rozwiązanie... W ThisWorkbook w zdarzeniu open wrzuć ukrywanie/odkrywanie arkusza na podstawie loginu Windowsowego Twoich userów. To jest fajne pewne rozwiązanie, sam tego używam, nie muszą wtedy podawać żadnych haseł (masz taką...
Czy te przyciski są osadzone bezpośrednio w arkuszu? Jeśli tak, można napisać kod, który (w wyniku odpowiednich działań) będzie ukrywał /odkrywał komórki, na których jest osadzony dany przycisk. Można też utworzyć formularz UserForm (lub dwa – niezależne), na którym będą umiejscowione przyciski . Formularz może się uaktywniać w zależności od pewnych...
Witam, Po otwarciu skoroszytu z makrem jak niżej chciałbym, żeby użytkownik nie miał dostępu do wymienionych w makrze elementów sterujących arkusza i aplikacji, jak również menu i wstążki. Tak się teoretycznie dzieje, ale do czasu. Do czasu, aż podwójnie kliknie na pasek tytułu aplikacji. Wtedy niestety odkrywa się i menu i kompletna wstążka. Nie znalazłem...
Dzień dobry, mam utworzony excel z userformem. Skoroszyt działa w ten sposób, że podczas włączenia pliku w pierwszej kolejności pojawia się User Form. Użytkownik loguje się. Po zalogowaniu uruchamia się makro, które zmienia poszczególne zakładki z veryhidden na visible. Użytkownik wprowadza dane w odkryte zakładki, zapisuje plik i później wchodzi tak...
Na tytułowej fotografii akurat blat jest mój na dodatek w kuchni. :) Front istotnie projektował Maciek, ma opanowaną technikę, ma narzędzia (np. wiertarkę stołową), znamy się dość dobrze, mieszkamy niedaleko siebie, więc co ja będę odkrywał Amerykę na nowo. :) U Maćka było też robione większość zdjęć. Ma dobre światło (żarówki fotograficzne) dzięki...
Witam, W załączniku zamieściłem plik, o którym pisałem. Klawisz Odkryj i Ukryj służy do odkrywania i ukrywania komórek, które nie są mi potrzebne w danym dniu. Za pomocą kolejnych przycisków potrzebuję wydrukować: 1) 3 kartki A4 i 1 kartkę A3 z zakresu B2:AV78 - dopasowane do strony; 2) 1 kartkę A4 - dopasowaną do strony; To samo się odnosi do zakresu...
Witam, usiłuję przerobić makro zapisujące plik pod określoną nazwą na dwa inne makra, które: 1. zapisuje plik pod określoną z góry nazwą, 2. zapisuje plik pod predefiniowaną nazwą (część jest ustalona, resztę wprowadza się w wyskakujące okienko). Oto kod, który usiłuję przerobić: [syntax=vb] Sub zapisz_jako_cesja_0_5() Call zapisz_arkusz("nadstany_0,5-wydr")...
Działa to tak, że programowo jest zdefiniowany czas opóźnienia wyzwolenia aparatu po wykonanym ruchu wózka aby uniknąć drgań. Dodatkowo podczas programowania pracy można ten czas dodatkowo wydłużyć deklarując zwłokę w sekundach. Filmu nie ma i mało czasu na jego przygotowanie, ale działa z grubsza tak jak wiele innych stackerów, których praca jest nakręcona...
Mam jakiś tam plik w Excelu który pracuje na podstawie makro, mam w tym pliku kilka arkuszy. Ponieważ plik będzie uruchamiany na kilku komputerach a zarazem posiada kilka zabezpieczeń wpadłem na pomysł aby podczas zamykania skoroszytu nastąpiło ukrycie wszystkich arkuszy oprócz jednego. Wszystko działa OK, ale i zarazem denerwuje gdyż po ponownym uruchomieniu...
Jak się uczyliśmy? Praktycznie. Wiem, to niezupełnie prawda, teoria też musi być, ale ja ją poznałem już dawno, a składni VBA ciągle nie mogę zapamiętać. :) Myślę, że takie kopiowanie musisz się nauczyć robić sam, a nie pytać. Jeżeli nie umiesz kopiować komórek (w Excelu to podstawa) to nikt nie może ci pomóc. Potem zrób to samo w pętli i już masz kawałek...
Cześć Chciałbym stworzyć makro, które wysyłało by emaile z listy z excel’a i dołączało spersonalizowane załącznik. W Arkuszu „lista” są komórki z spersonalizowanym numerem odbiorcy od „b6” do „b5006” np. D001425 a w komórkach od „c6” do „c5006” adresy email. Chciałbym aby pętla do każdego...
W maju piszę maturę i wybieram się na studia. Przeszukałem jednak wszystkie fora na ten temat i mój dylemat jest zupełnie inny niż wszystkie, więc postanowiłem poradzić się doświadczonych kolegów na różnych serwisach takich jak ten. Dylemat brzmi: studia z fizyki czy z elektroniki? W przyszłości chciałbym zajmować się doskonaleniem przetwarzania informacji...
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 z poziomu VBA!), odkrywasz przez .Visible = True. Lepiej...
Witam Mam w arkuszu ukryte wiersze od 3 do 200. Znalazłem kod odkrywający jeden wiersz lub cały zakres [syntax=vbscript]Sub Makro1() Rows(3).Hidden = False End Sub [/syntax] Chodzi mi jednak o to, aby po uruchomieniu makra sprawdziło ono czy jest ukryty wiersz 3 i jeżeli tak, to powinno odkryć ten wiersz, a jeżeli jest on już odkryty to odkryć wiersz...
hmm jeszcze nie wiem czy od razu dużo lepszy od AVR Studio ale jak dla mnie dużo lepsze IDE do pisania softu bo. 1. lepsze kolorowanie składni (pogrubione czcionki itp) może to błahostka ale jak się dużo pisze to człowiek i na takie rzeczy zwraca uwagę 2. jeszcze właśnie b.mało wiem o możliwościach konfiguracji np ścieżek do własnych bibliotek jak i...
Chciałbym prosić o pomoc w poradzeniu sobie z błędem jak w temacie. Pracuje nad excelowym makrem w którym wykorzystuję metodę „AfterUpdate()” , w trakcie wykonywania makra pojawia się czasem powyższy błąd czego efektem, najczęściej jest zawieszenie się excela i ekran odzyskiwania dokumentu. Przyczyną błędu wydaje mi się, że wiem co jest....
odkrywanie wierszy odkrywanie arkuszy makro uruchamiać makro
silnik elektryczny łożyska zwarcie wirnika klatkowego baterie rowerowe połączenie
zmywarka samsung dw60m6050 philips 32pht4503
Toyota Yaris II – typowy kąt otwarcia przepustnicy, wartości TPS, adaptacja ETCS-i GAZ Gazela 2.4 16V ZMZ-405/406/409 – ustawienie rozrządu, znaki, łańcuch, napinacze