Rzeczywiście autor nie ma talentu do przekazywania informacji. Wydaje mi się że o to mu chodziło (załącznik). Do autora topiku: Nie da się funkcjami wydrukować tylko wybranych stron. Można ukrywać widoczność ale wtedy ostatecznie będą białe/czyste strony drukowane. Pozostaje makro - w sumie proste ale ... w makrach położenie poszczególnych komórek jest...
Witam mam takie makro : [syntax=text] Private Sub Worksheet_Change(ByVal Target As Range) Dim kol As Long If Target.Address = "$c$2" Then Application.ScreenUpdating = False For kol = 33 To 34 If Month(Cells(2, kol)) <> Month(Cells(3, 34)) Then Columns(kol).EntireColumn.Hidden = True Else Columns(kol).EntireColumn.Hidden = False End If Next Application.ScreenUpdating...
Zdejmuje haslo, wrzucam range w makro - chyba, że w złym miejscy ale wrzucam range po ponownym założeniu hasła w makrze. Możesz podpowiedzieć w którym miejscu powinien być range? Dane można wpisywać, gorzej, że np nie mogę ukrywać kolumn czy formatować np kolorami.
Cześć, chciałbym się podłączyć pod temat chyba z podobnym problemem. Posiadam arkusz excel gdzie osoba trzecia będzie wprowadzać nowe pozycje (wiersze) i uzupełniała do każdej pozycje dane w kolumnach. Każdy wiersz posiada 10 kolumn z czego kolumny 2-3 (trzy) posiadają skomplikowane formuły dot. auto-uzupełnienia. Excel jest tak zrobiony, że jak ta...
Witam, potrzebuje pomocy w makrze, dużo już sam zrobiłem ale tego nie potrafię a raczej nie rozumiem. Makro ma za zadanie ukrywać dni miesiąca które nie występują w danym miesiącu czy może ktoś mi to pokazać co i jak
nie wiem co dalej czegoś brakuje :) wiedzy zapewne. Poszukaj trochę i przyjrzyj się jak to zrobili inii. Po mojemu spokojnie obejdzie się bez makr. 1. Znajdź pozycję wybranych z list wartości. funkcja wiersz podstawiasz wynik funkcji z pkt.1 3, Kolorowanie wierszy zrealizujesz przez formatowanie warunkowe. Formuła: =$A6=1 zakres: =$B$6:$O$36 4. Zamiast...
Witam, mam arkusz, w którym muszę zastosować kilka makr, większość przeskoczyłem ale na dwóch się zawiesiłem i stąd mój wpis. 1. Czy w Excel2013 da się makrem ukrywać wstążkę tak jak dało się to zrobić w Excel2007 bo coś mi zadziałać makro, które kiedyś stworzyłem, a wiem że było sprawne oraz 2 ważniejsze: Mam tabelę i w kolumnie np. E11 mam wczytane...
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:)
dla przycisku tak daj takie samo makro tylko zamień True na False
https://obrazki.elektroda.pl/4586766500_... Widzę, że się udało. W załączniku przykład tabeli Excela. Jeśli tabela ma wiersz podsumowania, to wstawianie nowych wierszy odbywa się tabulatorem w ostatniej kolumnie tabeli. Można też wstawiać wiersze w środku tabeli z menu podręcznego (PPM) lub ze wstążki. Filtry z tabeli można usunąć...
Chodzi o warunek w E22 <> "PROPONOWANA ZMIANA WARUNKÓW UMOWY" Chowane lub grupowane wiersze to 22-26 i 41-46
:arrow: JacekCz Nie potrzeba wystawiać armaty by zabić muchę. Po co kolega sapiehalbn ma się uczyć/wykorzystywać specjalistyczne języki programowania by wyłącznie ukryć arkusze dla "zwykłych" użytkowników pliku excela, którzy najzwyklej na świecie mają tylko wpisać dane w odpowiednie komórki (i nie wiedzieć dla nich niepotrzebnych arkuszy) i już. Masz...
Moim zdaniem sympatyczniejsze są formanty z przybornika. Można je łatwo kodować wpisując w obsłudze zdarzenia CheckBox1_Click() ukrywanie i pokazywanie pozostałych CheckBox-ów sprawdzając ich właściwość Value. Ukrywa się przez zmianę właściwości Visible.
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.
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
po kliknięciu nazwy obrazka w komórce A1 Tam będzie kilka takich nazww? Jeśli tylko jedna w A1, to nie ma znaczenia, czy jest nazwa, obrazek będzie tylko jedyn. p.s. Obrazek może być na pierwszym arkuszu, tylko nie widoczne.
Witam. :arrow: Korek_123 Ponieważ Excel >=2007 zapisuje w formacie xml, następnie ukrytych wierszy i kolumn dla każdej linii ponad milion jest zapis "ukryte = 1 " i jest coś innego. Spróbuj zapisać w formacie binarnym. Ale różnica jest mała. P.S. Osobiście używam Excel97, maksymalno 2003. W każdym razie mój projekt, inny Excel otworzy. Edit: Ale spójrz...
Lanzul a czym Twoje rady różnią się od moich? Dokładnie o tym samym pisałem. Ukrywane są kolumny od D (w vba jest makro które je ukrywa) czyli mają szerokość "0" oraz zablokowane są okienka. Powoduje to że w arkuszu wstawiana jest pionowa jak i pozioma czarna linia, która zakrywa obramowanie komórek.
Makro ukrywa wybrane komórki i uwidacznia inne.
Niestety też nie widzę opcji by nie było makra. Ale nie makro ukrywające tylko zwykłe wprowadzenie informacji do wydruku do ilu stron ma drukować. Czyli pod przycisk "wrzucić" [syntax=vb] Sub Druk() ActiveWindow.SelectedSheets.PrintOut From:=1, To:=Sheets("POŚW").Range("E22") End Sub [/syntax] I "drukować" przyciskiem.
A skąd kolego masz ten pik z makrami "Skoroszyt.xlsm" ? Odpowiedz na pytanie Excela - czy masz go z zaufanego źródła ? :?: Zaufane źródła - z reguły nie ukrywają żadnych makr ani arkuszy typu "sheet8.xml" :D Otwórz sobie jakiś nowy skoroszyt, wprowadź jakieś dane i zapisz go raz jako zwykły skoroszyt(1) xlsx, a potem zapisz ten sam skoroszyt(2) jako...
Ok to z makrem działa dzięki za wsparcie :)
Dodałem jeszcze możliwość ukrywania kolumn z niepotrzebnymi dniami w miesiącu, aktualizację dni miesiąca na pasku jak również zmiana koloru na szary dni sobota i niedziela. UWAGA!, nie zmieniaj (nie dodawaj nie usuwaj żadnych kolumn i wierszy) bo to spowoduje że makro będzie niepoprawnie działać
Ciekawa kombinacja :) Trochę nad tym pomyślałem ale wyszło (choć dziwie się że excel nie zgłasza odwołań cyklicznych). Zapewne można to uprościć ale już nie mam czasu. Nie przeraź się :) W c2 wpisz: =JEŻELI(E2="";MAX($C$1:C1)+1;JEŻELI(E2>0...
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...
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.
Oczywiście, że funkcji takiej nie ma, bo jest to makro. Musisz otworzyć edytor makr w excelu (Visual Basic) i tam w moim przykładzie znajdziesz funkcję. Ogólnie możesz w edytorze Visual Basic dodać do Twojego arkusza nowy moduł i wkleić w nim definicję funkcji: [syntax=vb]Function NDay(exclude As Range, prev As Date) As Date Dim flag As Boolean Dim...
Pobawiłem się na tym załączniku i wszystko fajnie śmiga. Spróbowałem to jeszcze raz odtworzyć u siebie i nie potrafię ;/ Przypisuję makra do przycisków, a i tak nie filtruje. Nie wiem czy czegoś nie robię, a nawet nie jestem tego świadom.
a potrzebuję szybko tego makra Na szybko, to można ukrywać bez makra...
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...
W załączeniu wycinek z większego projektu, obrazujący mój problem. Utworzyłem proste makro filtrujące pewne wartości. Niestety po uruchomieniu makra filtr działa ale ukrywa wszystkie wartości. Po wejściu w filtr i naciśnięciu ok bez żadnych zmian dane pojawiają się.
Skąd pochodzi ten plik ? Jakie dane zawiera w tak olbrzymiej ilości ? Obrazki ? Wykresy ? Czy działają tam jakieś makra ? Czy w pliku tym stosowane są jakieś procedury ukrywania czy dostępu ?
Masz literówkę, powinno być: "delete". Dla ukrywania nagraj sobie makro i podstaw, zamiast delete, polecenie nagrane przez rejestrator (ciąg po selection).
Marek, dzięki za odpowiedź. Nie ukrywam, że mam już działające makro. Trochę inaczej opisane niż Ty to zrobiłeś, ale działa. Przetestowałem Twój kod i tradycyjnie już - wszystko jest OK :)
Posiadam działającą wyszukiwarkę w Excelu, która działa tylko dla jednej kolumny [syntax=vbscript]Private Sub TextBox1_Change() ActiveSheet.ListObjects("Data1").RANGE.A... field:=2, Criteria1:="*" & [a2] & "*", Operator:=xlFilterValues End Sub[/syntax], jak zmodyfikować makro bądź utworzyć całkowicie nowe, aby działało dla wielu kolumn....
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...
Moje pierwsze w zasadzie makro VBA w wordzie (pisałem kilka makr w Excelu, ale swój poziom szacuję na podstawowy). Tak więc trochę mojego niechlujnego kodu: Const ilePyt = 50 Const ileOdp = 4 Const pytWTescie = 15 Należy ustawić odpowiednio ilość wszystkich pytań, ilość odpowiedzi na każde z pytań, a także z ilu pytań ma się składać test. Dokument źródłowy...
Potrafię jedynie skopiować kod i ew. go lekko przerobić aby znalazł zastosowanie dla mojego problemu. Twój opis jest nieprecyzyjny, a pliku przykładowego brak :cry: Skoro potrafisz przerobić makro to możesz zmodyfikować kod reakcji arkusza na wypełnienie komórki, oraz reakcji po doubleclick na widoczność komórki :spoko: 1037212
Wyrzuć co niepotrzebne w procedurach Thisworbook. Powinno zostać tylko chowanie kolumn.[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) ' i tutaj wstawiłem makro ukrywające ThisWorkbook.Save End Sub[/syntax]Wykorzystaj swoje makro. Żeby ukrywanie było skuteczne, musisz wymusić zapisanie pliku. Dlatego może okazać się niezbędne automatyczne...
Masz 2 przykłady jak można to zrobić wystarczy wykorzystać. Osobiście proponowałbym niczego nie kopiować/usuwać tylko wstawić do arkusza naklejki kilka tabelek i wg. potrzeb ukrywać cześć lub pokazywać. Przepraszam, chętnie mogę pomóc jak coś się robi ale wykonać całą pracę za kogoś to już mi się nie chce. Mam nadzieję, że trochę pomogłem?
... 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. ......
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...
Czy Tobie nie chodzi przypadkiem o blokowanie kolumn? Zaznaczasz całą kolumnę B i z menu wybierasz: Okno -> Zablokuj okienka (jeżeli używasz offica 2003). Potem suwak poziomy przesuwa wszystkie kolumny oprócz tych na lewo od zablokowanej. Aby odblokować - wybierasz "Odblokuj okienka". Można też napisać makro pytające o numery kolumn do porównania i...
Dzień dobry, Moim zdaniem lepiej to zrobić funkcją użytkownika niż makro. Szkoda, że nie dał Pan załącznika z plikiem, bo nie bardzo wiadomo, co tam jest, czy dane są tylko stałymi, czy są też formuły, czy są tylko liczby, czy również teksty. Nie wiem też czy potrzebne jest ukrywanie wierszy, jest to dodatkowa czynność, czy potrzebna? Kluczową sprawą...
ok fajnie bardzo fajny pomysł - dziękuję za to. Jednak nie ukrywam, będe potrzebował to mieć jeszcze pokazana za pomocą makra. Czy byłbyś mi w stanie takie coś pokazać ? bo jednak chciałbym coś się z pisania makr dowiedzieć i podszkolić
Witam, potrzebuje pomocy w stworzeniu makra ktore przy pierwszym kliknieciu na przycisk bedzie ukrywalo wiersze od 32 do 52 ktore w kolumnie B posiadaja 0 a po ponownym nacisnieciu wszystkie ukryte wiersze ponownie sie pokaza. Z gory dziekuje za pomoc. Pozdrawiam
nie zupełnie bo już siedzę nad tym od piątku i nie a moze jeszcze gorzej !! Dodano po 5 Wielkie dzięki a czy wytłumaczysz mi czym to się różni, sprawdzam Visual Basic i nie ma nic innego a działa inaczej? Dodano po 3 Bo bardrzo mi to pomogło nie ukrywam, ale chcę to skopiować do swojego arkusza więc cały Visaul Basic kopiuje niestety ale nie pali błąd.
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...
(at)marek003 już sobie poradziłem, nagrałem makro i "wstawiłem" kod do kodu pola kombi, trochę to nie po polsku, ale chyba wiesz o co mi chodzi, a co do formatowania na biało, to możnaby to zrobić, ale wtedy miałbym luke w wydruku, a dużo tego robie.
Są dwa typy userów - administrator który widzi wszystkie arkusze i user szeregowy, czyli sprzedawca (Basia/Ania itp), który widzi tylko swój arkusz z klientami oraz arkusz z raportami. Po uruchomieniu skoroszytu Excel pyta o login i hasło, na tej podstawie makro ukrywa niektóre arkusze, zależnie od tego kto się zaloguje. Arkusz z klientami "wolnymi",...
Cześć Jestem początkującym i mam problem w napisaniu makra który by mi chował parenaście wierszy. W chwili obecnej mam napisane takie makro Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Cells(3, 4) = "Badanie wstępne" Then Rows("42:47").Select Selection.EntireRow.Hidden = True Else Rows("42:47").Select Selection.EntireRow.Hidden = False...
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ć...
Teraz kolego to ładnie kopiuje wszystkie wystąpienia. Bardzo Ci dziękuję za Twą pomoc. Próbuję jeszcze zmienić coś w kodzie ponieważ po zakończeniu instrukcji w arkusz1 zostaje tylko jeden wiersz ( ostatni ) a reszta jest ukrywana. Może mi się uda doczytać jak to zmienić. tak to wygląda : https://obrazki.elektroda.pl/2877661100_...
Używam excel'a w pracy i chciałbym mieć możliwość ukrywania pewnego obszaru danych (wścibscy współpracownicy) poprzez zamianę jego koloru na czarny uzyskiwanym przez naciśnięcie przycisku z makrem. Problem w tym że "gdy się uspokoi" chciałbym tym samym przyciskiem powrócić do stanu poprzedniego - widzialnego. A przy okazji - szukam rozwiązania na ukrycie...
udało się rozwiązać problem, ale mam jeszcze jedno pytanie. Co zrobić żeby dane pobrane z formuły INDEX i MATCH po zapisaniu w folderze były stałe ?. To znaczy jak na przykład osoba której prześlę ten plik, a nie ma dostępu do pliku źródłowego widziała wygenerowane wcześniej dane w komórkach ? Cieszę się, że udało Ci się rozwiązać problem z funkcją...
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...
Spróbuj z autofiltrem (makro nagrane rejestratorem i zmodyfikowane) Sub filtruj() Range("C5:C69").Au... ActiveSheet.Range("$C$5:$C$... _ Field:=1, Criteria1:=Array([d3], [e3], [f3], [g3]), Operator:=xlFilterValues End Sub Aby zupełnie...
uzupełniam kolumnę C i poniżej w tabelach automatycznie dodają się wiersze z tym tekstem co powyżej. Dokładnie podobny mechanizm mam na myśli :D , ale oparty na formułach, oraz na automatycznym ukrywaniu pustych wierszy (realizowane prostym makrem Worksheet_Change) :idea: 989747 Jak widać na zrzucie wstawiam pierwszą literę nowego surowca, zatwierdzam...
Witam Chciałbym stworzyć prostą aplikację do pisania kopert. Po prostu na jednym arkuszu tworzę wzór koperty z potwierdzeniem na drugiej lista adresatów ok 3000 pozycji. Cały problem polega na tym aby nie skakać po arkuszach i robić kopiuj wklej, tylko aby się dało dodać adresata przez przycisk Dodaj lub skrót uruchamiający makro z bazą adresatów z...
Szanowni Państwo, Niestety nie znam się na makrach i nie potrafię zmodyfikować podanych wcześniej rozwiązań, a chciałabym dorzucić jedną opcję. Chciałabym, aby wiersze z określonego zakresu (np od 60-70 wiersza) ukrywały się, jeżeli pierwsza komórka w wierszu ma wartość 0. Będę bardzo wdzięczna za pomoc. Pozdrawiam, Dominika
Witam, nie jestem w stanie znaleźć przyczyny nieoczekiwanego działania makra. Plik w załączeniu. W zakładce Summary sa 4 tabele przestawne ciągnące dane z dwóch zakładek i prezentujące dwa pivot itemsy dla każdej z zakładek: Bad goods i alert. Generalnie każda z tabel ma pokazać wszystkie wartości za wyjątkiem kilku, oraz pokazać je po odpowiednim posortowaniu....
... Mam jeszcze jedno pytanko - mianowicie czy można rzeczywiście "chronić arkusz" - ponieważ jak wiemy sposób oryginalny może każdy łatwo odblokować? Łatwo??? Uważasz że jeżeli ktoś będzie chciał skorzystać z twojego arkusza gdyż sam nie potrafi czegoś takiego (podobnego) stworzyć będzie wiedział jak złamać hasło chroniące arkusz. (Odblokować arkusz)....
Tak jak radził tommy zrobiłem wstawiając dodatkową kolumnę i ukrywając ją , było wszystko ok do momentu aż z makro jest brak jakiejkolwiek cyfry. Wówczas lecą błędy w następnej kolumnie. Jeśli chodzi o radę Marka to mam takie skomplikowane makra , że nie wiem gdzie to wstawić W celu zobaczenia wysyłam makra - choć pewnie dopiero z programem można by...
No to zastosuj tu funckcję jeżeli() w komórce D2 piszesz coś a'la: "jeżeli wartość w komórce B2 > 0 to tu wstaw wartość komórki B2" jeżeli(b2>0;b2) - piszę z pamięci, ale coś takiego No i teraz kopiujesz funkcję z D2 do wszystkich używanych komórek w kolumnie D. Można też sobie wymyślić, że jakaś kolumna (np. E) będzie "techniczna", tam można różne...
a mógłbyś mi pomóc z napisaniem makra dla automatycznego filtrowania po zmianie danych? to by rozwiązało moją sprawę Dodano po 10 sortowanie zwykłe nic mi nie da jednak, bo kolumny przy filtrowaniu ukrywają się i sa nie pokolei, także zostaje mi tylko filtrowanie zaawansowane bo wtedy moge to skopiować na inną lokalizacje, albo po prostu wytłumacz mi...
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...
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...
Dzięki, o to chodziło... niestety napotkałem kolejny duży problem. Nie wiem czy to wina Excela 2003,ale okazuje się że w tak przygotowanym arkuszu nie są aktualizowane łącza. W zasadzie miało to działać tak: Wiersze z danymi są zaciągane z zewnętrznych plików, numerowanych od 1 wzwyż, stąd konieczna była zmiana nazw. W przypadku braku pliku excel wyświetla...
Wydaje się, że masz problem z odkryciem arkuszy oznaczonych jako “very hidden” w Excelu przy użyciu funkcji komórek (cells). Oto kilka wskazówek, które mogą Ci pomóc: Użyj stałej xlVeryHidden: W makrach VBA możesz użyć właściwości Visible, aby ukryć lub odkryć arkusz. Wartość xlVeryHidden ukrywa arkusz i uniemożliwia jego wyświetlanie w oknie Excela....
Może w sposób następujący: Ad.2 Zmieniłem formułę formatowania warunkowego. Nie wiem czemu służyło 'LICZ.JEŻELI', więc usunąłem. Ad.3 Procedura zdarzeniowa arkusza + (najprościej) ukrywanie kolumn. W obu przypadkach skróciłem zakresy. Nie znam miesiąca, który miałby 32 dni. Może w jakimś innym kalendarzu? ;) P.S. Pliki wersji >2003 trzeba spakować (ZIP,...
Witam. Bardzo proszę o pomoc. W oparciu o zamieszczone przykłady na forum, tworzyłem formularz zawierający m.in. ramki. Do formularza dodałem makro. Ramka powinny się ukrywać jeżeli w przypisanej jej komórce będzie Fałsz. Poniższy kod pisałem w excelu 2013. [syntax=vb]Private Sub CommandButton2_Click() Dim mojFrame As MSForms.Frame Dim pierwszyWiersz...
Witam Czy ktoś może wie dlaczego rozpatruje się tu tyle opcji (sortowanie, aparat foto, makra, ctrl+G) a Autor wątku jakby "nie chce" (może chce, tylko mi się wydaje, że nie chce) zastosować Autofiltrowania? Nie chodzi mi o Jego podejście do Excela, tylko o to czy są przypadki gdzie faktycznie autofiltrowanie nie spełnia warunków: 1. Ukrywa wiersze...
Witam. Mam problem z napisaniem programu w VBA. Chciałbym by makro ukrywało kolumny w jeżeli w określonej komórce tego wiersza znajduje się zero (komórka ta odpowiada za sumę całej kolumny). Podczas próby odpalenia makra wyświetla się błąd : "Rune time error '1004' Method 'Range' of object ' _Global' failed". Kod programu poniżej. Sub UkryjZeroweKolumny()...
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, potrzebuję pomocy z napisaniem kodu, który będzie w stanie wyszukać we wskazanym zakresie komórki, które mają obramowanie w kolorze czerwonym. Jeśli komórka ma czerwone obramowanie, to dana kolumna w której jest komórka powinna zostać ukryta. Napisałem prosty kod, który to robi i wrzucenie tego w pętle to też nie problem, ale jest pewien szkopuł,...
Witaj. Spróbuj: If Range("B4").Value > 85 And Range("B5").Value > 85 Then na If Range("B4").Value > 85 Or Range("B5").Value > 85 Then
Witam Może ktoś wie jak zrobić test wielokrotnego wyboru w Excel'u. Np. taki http://zis.pap.edu.pl/sylwia/prace_pliki... Pozdrawiam Przecież w tym pliku co go wskazałeś masz wszystko zrobione to co chcesz żeby ci wyjaśniać ??? Skąd co się bierze? Jak się ustawia pola wyboru? spytaj konkretniej Kwestia ustawienia w arkuszu3...
1. #N/D! - da się wyeliminować przez dodanie na zewnątrz formuły JEŻELI.ND albo JEŻELI.BŁĄD. Obie działają podobnie do funkcji JEŻELI, więc nie powinieneś mieć z nimi kłopotów 2. Da radę przeszukać kilka arkuszy jednocześnie - wystarczy w zakresie podać adresy zakresów w poszczególnych arkuszach rozdzielone średnikami, np. Arkusz1!C1:C3;Arkusz2!B1:B3,...
Nie pamiętałem co tam w tym Twoim arkuszu jest "namotane" :cry: W mojej wersji działa tu makro "naprawione", dwie kolumny z listami poprawności danych, formatowanie warunkowe ukrywające :D dane w kolumnie H , oraz formułki w kolumnie J - Ufff... sporo tego i na dodatek jak wprowadziłem weryfikację poprawności danych w kolumnie I - to wszystko "wypaliło...
Witam! Tworzę zestawienie usterek maszyn w Excelu 2010 i mam następujący problem. Na kolumnę C (Nr maszyny) utworzyłem sobie standardowy filtr i wszystko jest OK, z tym że chciałbym, żeby wybrany przeze mnie numer maszyny wyświetlał się również w komórce poniżej (B14). I tu pojawia się problem. Czy można w jakiś sposób odwołać się do wybranej wartości...
Witam potrzebuję pomocy w stworzeniu makra w Excelu 2007. Potrzebuję kodu który przepisze wiersze do nowego arkusza po spełnieniu poniższych kryterium: Zakres analizowania: Od wiersza 12 kolumna B Do wiersza 111 kolumna P Makro: jeżeli w arkuszu nr 1 w kolumnie P z zakresu wierszy od P12:P111 znajdzie się wartość większą (różna) od „0” (wynik...
Że muszę mieć odkryty arkusz to już sam zauważyłem. Ale z czego wynika to , że jak nagrywam macro to wszystko działa. A jak uruchamiam później skoroszyt to jest #ARG? Zarejestrowałem jeszcze raz makra. Tym razem przed Save nie ukrywałem Arkuszy. Wszystko działało. Robie Save. Wychodzę. Uruchamiam. Nie działa. ??????? Wklejam jeszcze raz kod: Sub Nazwisko()...
Witam! Potrzebuję pomocy z poprawnym wstawieniem lub modyfikacją obecnego makra. Aktualne makro po aktywowaniu kopiuje wybrane wartości z kilku różnych kart w kolejności alfabetycznej kart, jeśli w kolumnie C jest konkretny dostawca. Teraz w załączonym pliku potrzebuję w ostatniej karcie "podział na kolory" wstawić (lub przekształcić obecne) makro,...
Witaj Zdaje się że ukrywanie wierszy to tylko przez VBA można zrealizować. Niestety nie jestem specem od VBA, dlatego tylko tyle udało mi się wykombinować. Połączenie VBA z dodatkowymi dwoma kolumnami pomocniczymi. Ktoś bieglejszy w VBA pewnie by to zrobił lepiej i mniej łopatologicznie ;) W tych dodatkowych kolumnach szukamy poszczególnych miast, czy...
Witam, mam taki problem a mianowicie: Potrzebuję makro, które po pojedynczym naciśnięciu na przycisk "UKRYJ" pozwoli mi ukrywać pojedynczo arkusz z wielu odkrytych arkuszy ( tj. jedno naciśnięcie - 1 ukrywany arkusz). To samo w przypadku odkrywania arkuszy. Po naciśnięciu na przycisk "ODKRYJ" również odkrywać pojedynczo arkusze. Oczywiście chodzi o...
Ale ty masz zastosowany właśnie przez makro filtr zaawansowany a tylko trzeba umieć go wykorzystać (sparametryzować). Powiększ w makro filtru zaawansowanego zbiór warunków do A3. Czyli: (i tu ciekawostka) znak "równa się" czyli = (to właśnie dla excela pusta komórka w danych do filtracji [bo ma być równe "nic"] - nie ma tego opisanego w pomocy, przynajmniej...
Dodałem zewnętrzną pętlę na arkusze: Sub przelicz() Const max As Integer = 36 Const max_ark Integer = 36 Dim a As Integer Dim i As Integer a = 4 i = 26 Do While a <> max_ark Sheets(a).Select Rows("26:36").Select Selections.EntireRow.Hidden = False Do While i <> max If Cells(i, 3).Value = 0 Then Rows(i).Hidden = True End If i = i + 1 Loop...
Witam z Nowym Rokiem, potrzebuje pomocy do pliku kontrolek pracy, jako, że Nowy Rok nastał czas ułatwić sobie pracę. Nie znam się za dobrze na Excelu, co potrafiłem to zrobiłem ale potrzebuje Waszej pomocy w kilku sprawach. 1) Potrzebuje Makro do zapętlenia daty; tłumaczę w arkuszu Liczydło w kolumnie Z mamy zakres dat w przedziale Z12 - Z95, potrzebuję...
Mowiąc szczerze nie bardzo mi idze z tym makrem. Probowałem coś z waszymi częściami skryptu, ale ponieważ nie ma co ukrywać jestem zielony nie bardzo wychodzi mi tworzenie do tych skrawków "obudowy". Jeśli macie pomysł dlaczego moj kod działa tylko raz, a nie na cały zaznaczony obszar, będę wdzięczny za pomoc. Lub jakiś kod zastępczy. pozdr.
Czy można zmodyfikować poniższe makro Pewnie można ... jak się komuś będzie "chciało chcieć" ... : ) ... ale wpierw parę uwag dla przyszłych twoich "modyfikacji": 1. xlOpenXMLWorkbook - podawałbym kody liczbowe (w tym przypadku jest to 51) zamiast nazwy stałych, będzie bezpieczniej jeśli plik będzie otwierany w różnych wersjach excela: Function CopyDataRangeP...
bezsens takiego "zabezpieczenia" pliku To może trochę inaczej (załącznik). Wszystko działa ładnie jak się zezwoli na używanie makr. Oczywiście nie polecam trzymać tam danych chronionych, ale np. do przygotowywania listy obecności dla n pracowników jest to fajny pomysł bo wystarczy zrobić jeden plik excela i każdy dostanie listę ze swoimi danymi......
A może być inaczej? Przykładowo przez listbox? http://obrazki.elektroda.pl/9822597900_1... Możesz sobie dodać okno do twojego skoroszytu lub zapisać w skoroszycie makr osobistych. By wywołać okno z np. modułu piszesz np.: ShowHideColumnForm.show by mieć kontrolę nad oknem Excela piszesz: ShowHideColumnForm.show 0 Okno działa samo z siebie....
Próbuję stworzyć kilka makr, które w rezultacie stworzą narzędzie do ujednolicania wyglądu wykresów na podstawie wczytanych z pliku *.csv danych oraz ułatwią przeglądanie. Dążę do pełnej automatyzacji. Stworzyłem makro, które wyróżnia i ukrywa wybrane serie, oraz takie które ustawia styl dla każdej serii wg. moich preferencji, mam pomysł na to jak rozwiązać...
W tabeli, którą pobieram, jest wiele kolumn. Ja filtruję i zostawiam tylko te dwie, resztę ukrywam. Zawsze w tej samej kolumnie sa modele i zawsze w tej samej kolumnie sa klasy, dla potrzeb raportu pozostawiam tylko te dwie kolumny. Tak, sa tam tylko modele, które sa w procesie dla danej zmiany. Na razie Twój plik jest w fazie testów :) Otwieram, wklejam...
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...
.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", ""False"")" Przecież wiersz z tą funkcją znajduje się w procedurze którą zamieściłem w moim poście. Napisałem też, że makro ukrywa to co ma ukryć, natomiast szukam rozwiązania problemu powstającego wtedy, kiedy użytkownik podwójnie kliknie na pasek tytułu Excela - wtedy się wstążka "odkrywa", mimo iż programowo...
Witam, mam napisane makro na kopiowanie całych arkuszy z jednego pliku do nowego. Wszystko mi działa i funkcjonuje poza jednym. W pewnym momencie wyskakuje mi informacja, że zasoby fizyczne do obliczeń są za małe i wyskakuje błąd. Spowodowane to jest tym, że z pliku głównego, gdzie są kopiowane arkusze do nowego pliku podczas mojej procedury początkowo...
W takim przypadku zastosuj to co napisałem wcześniej.
Spróbuj czegoś takiego: [syntax=vbscript]Sub Rozwiñ6_Zmienianie() Dim rn As Range Application.ScreenUpdating = False 'Range("a1").Value = InputBox("które dane pokazac") 'Range("a1").Value = Range("b3").Value Range("c502:c800").EntireRow.Hidden = False Dim rng As Range For Each rn In Range("c502:c800") If rn = Range("A492") Then If Not rng Is Nothing...
Witam Czy ktoś mógłby pomóc w utworzeniu w excelu formuł (to znam jeszcze jakoś) lub może jakiegoś makra (tego nie znam) do obliczania ile potrzebuje zakupić produktów od dostawcy uwzględniając sprzedaż + aktualne zamówienia które są już złożone. Mam do dyspozycji stan na magazynie, aktualne zamówienia na dany produkt, i sprzedaż za ostatnie 30 dni....
makro ukrywać ukrywać kolumna excel makro makro ukrywać arkusz excel
przeróbka mocowania alternatora pomiar parametrów tranzystorów sterowanie chińskie
mazda wypadanie zapłonu mazda wypadanie zapłonu
Converting Bush TR82DAB to DAB+ Compatibility Kondensatory Nichicon MUSE ES w Yamaha MT120