zamiast: If Cells(wrs, 1) <> "" Then powinno być: If .Cells(wrs, 1) <> "" Then (trzeba dostawić kropkę) Niemniej jednak proponuję najpierw odfiltrować całą oryginalną kolumnę (niepuste) i skopiować wszystko za jednym zamachem do nowego arkusza - trwa jedno mrugnięcie okiem.
Jeśli chcesz uzyskać osoby, które (ani raz) nie wpłaciły, albo cokolwiek (choć raz) wpłaciły wystarczy zsumować wartości z poszczególnych miesięcy w dodatkowej kolumnie. Potem robisz filtr, lub (jeszcze prościej) sortujesz sobie wg tej kolumny (sumy z wszystkich miesięcy). Będzie suma - wpłacił. Będzie puste - nie wpłacił. Prościej nie umiem wytłumaczyć.
Brak pliku do testowania!!! Jak coś Ci nie zadziała, poprawisz sobie sam. Dodałem makro RemoveShapes. Zobacz w moim załączniku.
Dziękuję Panie Macieju za pomoc, udało mi się to wcześniej znaleźć. Mam jeszcze prośbę czy w tej tabeli dałoby radę, żeby za pomocą formuły odfiltrować projekty z "1" w kol. D? Sortowanie chciałbym żeby zostało tak jak jest ale żeby te projekty z "1" usunąć z kolumn F-J. W załączniku kolorem żółtym zaznaczyłem projekty, które po odfiltrowaniu powinny...
Wydaje mi się, że najprostszym osiągnięciem celu jest zaznaczenie obszaru po odfiltrowaniu i proste copy - paste.
Robiłam, na tym komputerze zdecydowanie bardziej zaawansowane makra i działały normalnie, więc to nie to :) Ale już sobie poradziłam z problemem, dodałam do kodu linijkę, która po zafiltrowaniu wartości na konkretnej kolumnie, ma odfiltrować na pozostałych kolumnach, trochę na około, ale działa :)
Wstaw kolumnę z funkcją [syntax=vb]=MOD(WIERSZ();5)[/syntax] a potem użyj jej do odfiltrowania i usunięcia niepotrzebnych wierszy. Ewentualnie, jeżeli dane można uśrednić, możesz dołożyć do tego funkcję ŚREDNIA z 5 poprzednich komórek i dopiero wtedy odfiltrować zbędne wiersze.
Wyłącz odświeżanie ekranu (screenUpdating) na czas działania makra. Z drugiej strony... sheets(1).range("A1:X" & LastRow).copy sheets(2).Range("A1") i w pętli usunąć puste Może szybciej będzie. Jeszcze inna opcja: Odfiltrować puste i skopiować cały zakres ("zwykłe" Copy kopiuje tylko widoczne).
Podaj pozycję: =PODAJ.POZYCJĘ(C1;$A$1:$A$8;0) Pierwszy parametr to szukana wartość (czyli kolejne elementy z drugiego spisu), drugi parametr to tabela, w której ma być wyszukiwane, trzeci parametr, 0 zwraca '#N/D', jeżeli brak dopasowania (wystarczy potem odfiltrować rekordy, które mają '#N/D'). Musisz wymyśleć sobie unikalny parametr, po którym będziesz...
Kolega piotr__80 słusznie sugeruje użycie autofiltra. Uprościłbym jednak sprawę wpisując formułę Np JEŻELI(ORAZ(war1;war2;war3;war4&... bezpośrednio do kolumny pomocniczej, rezygnując z formatowania warunkowego. Pozostaje odfiltrować jedynki i gotowe.
witam , a moze ktos moglby mi pchnac zachodniopomorskie w jakims formacie ktory moge uzyc tzn .txt access excel excel dbf cokolwiek :) byle nie .tp ;) blaaagam to dla mnie sprawa zycia i smierci musze przetestowac moj program do piatku :((( a nie wiem cz beda w nim dzialaly takie bazy :(
Posiadam dwa kody, które osobno działają, ale mam pewien problem jak je połączyć. Mam dane w pliku xlsx, które chcę wyfiltrować według kryteriów (daty i wartości w jednej z kolumny). [syntax=vbscript] Sub Filtr() Worksheets("Sheet1").Range("A:F").AutoFi... Field:=3, Criteria1:="Mag" Worksheets("Sheet1").Range("$A$1:$F$9597... Field:=4, Operator:=xlFilterValues,...
Witam, Mam pewien problem, ponieważ chcialem stworzyć makro a nawet nie wiem jak to ugryźć. Generalnie chodzi o to aby: po uruchomieniu makra wyswietlało sie pole do wpisania od... i do... w którym będę mógł okresic daty. Format daty to dd-mm-rrrr. Daty są w każdym arkuszu w jednej kolumnie, powiedzmy D. Wyświetlone komórki powinien kopiować do nowego...
Witam, Potrzebował bym zrobić autofiltr, w który będzie można wpisać więcej danych np 50. Filtr ten będzie wyświetlał tylko interesujące mnie zwroty z całej bazy. Prawdopodobnie będzie to trzeba zrobić Makro jednakże nigdy nie robiłem czegoś takiego Temat zmodyfikowany. zamieściłem plik z danymi. zawiera on makro ktore nie wychodzi mi. Niestety elektoda...
Bo usunałeś chyba te kolumny Nie, ukryłem tylko. Tak zwykle postępuje się w takim przypadku. Oczywiście można inaczej: -Zaznaczyć i skopiować potrzebne kolumny do "z góry upatrzonej" i następnie założyć fitr. -Odnieść się do komórki, skopiować formułę i odfiltrować niepotrzebne. -Jeśli chodzi o jedno, dwa nazwiska, WYSZUKAJ.PIONOWO... -Wreszcie napisać...
Można uporządkować nieco kolumnę i zastąpić wszystkie wyrazy "wymieniono", "stary", "nowy" oraz ":" pustym ciągiem. Wtedy dostaniemy dwa identyfikatory rozdzielone mniejszą lub większą ilością spacji, ewentualnie z możliwymi spacjami na początku i końcu. Dalej można to odfiltrować funkcją "usuń.zbędne.odstępy", co wywali poprzedzające spacje oraz zwielokrotnione...
Powiedzmy że korzystasz z zeszytu "faktura" oraz ":cennik" W zeszycie faktura w komórce A10 wpisujesz symbol artykułu, w B10: =WYSZUKAJ.PIONOWO(A10; cennik!A1:A7203; 2; FAŁSZ) W C10 =WYSZUKAJ.PIONOWO(A10; cennik!A1:A7203; 3; FAŁSZ) Zakładając że zeszyt "cennik" posiada w kolumnie A symbol, B nazwa, C cena netto W formule wyszukiwania jest tak: Cały...
Spróbuj np. tak - najpierw zaznaczasz dane w wybranej (pojedynczej) kolumnie, potem wykonujesz makro. [syntax=vb]Application.ScreenUpdating = False For w = Selection.Row To Selection.Row + Selection.Count - 1 Step 2 Cells(w + 1, Selection.Column).Value = Cells(w, Selection.Column).Value Next w Application.ScreenUpdating = True[/syntax] PS. Takie rzeczy...
Dzięki. Nie wiem, czy nadal kraj nie jest podwójnie liczony, muszę sprawdzić ze wszystkimi funkcjami wpisanymi. Czy funkcja dla Niemiec, dla przedziału mniejsze równe 10 powinna wyglądać tak? =LICZ.WARUNKI(Dane!$D:$D;$B9;Dane!$E:$E;... (at)cbrman Jednak działa OK :) dzięki. Mam jeszcze jedno pytanie (nie chciałem zakładać nowego...
Moje makro uruchomione na Twoich danych daje taki wynik: Jan Kowalski2013-04-031/1 Pawel Nowak2012-06-051/1 -> 1/2 Z czego linia druga jest czerwona. Makro pozostawia wpis z najświeższą datą oraz wstawia wcześniejszy wymiar zatrudnienia (gdzie aktualny zostaje najbardziej z prawej strony). W taki sposób można łatwo odfiltrować sobie jednych (np w...
Tak, teraz dopiero wiadomo, o co chodzi. Podaję dwie propozycje formuł. Pierwsza w "starym stylu" bez funkcji LAMBDA: [syntax=text]=UNIKATOWE(FILTRUJ($K$5:$K$... z wykorzystaniem funkcji pomocniczej LAMBDA: [syntax=text]=LET(dane;$K$5:$K$24;UNIKAT...
W Twoim kodzie było: [syntax=vbscript]ActiveWorkbook.Close[/s... tę linijkę po prostu przepisałem. Gdy zapisuje się plik pod nową nazwą przez SaveAs, otwarty skoroszyt przyjmuje nazwę zmienioną pod którą był zapis. Nie wiem, czy można zmienić nazwę otwartego skoroszytu inaczej niż przez zapisanie go. Zatem w tym przypadku proponuję ponowny zapis...
Np =JEŻELI(SUMY.CZĘŚCIOWE(2;C3:... W tłumaczeniu: wyświetli Nr maszyny, jeśli odfiltrujesz wszystkie poza jedną.
Rzecz w tym, że nigdy nie będziesz pewien wyniku. Z InputBox'a pobierasz 01-12-2015, w arkuszu może być 12/1/2015, 12/01/2015, 1/12/2015, 01/12/2015. Który tekst (w obecnym formacie) odfiltrować? Pewnie wszystko (tylko czy odfiltrowaliśmy pierwszego grudnia, czy dwunastego stycznia?). Wartości w kolumnie D nie są datami, w rozumieniu Excel'a, a zwykłym...
Z tego co widzę próbujesz sumować warunkowo dla wybranych klientów? Dlaczego nie używasz filtra? Można odfiltrować niepotrzebne, skopiować do nowego arkusza. W swoim przykładzie odwołujesz się do całych kolumn (Np A:A), co zdecydowanie spowalnia działania na tablicach. Dlatego zamieniłbym zakres na tabelę Excela. (zaznacz, Menu>Wstw>Tabela). Zamiast...
Są dwie funkcje, które "zauważają" użycie filtra zwykłego: SUMY.CZĘŚCIOWE i AGREGUJ. Żeby za bardzo nie komplikować wykorzystałem kolumnę F (tam były daty w formacie ogólnym, ale to nie jest do niczego potrzebne, bo można do dat odwoływać się wprost), żeby umieścić w niej informację, czy wiersz jest widoczny. Ta informacja jest dodawana jako dodatkowy...
"Konkurencyjne" rozwiązanie oparte o WYSZUKAJ.PIONOWO, z dwoma zasadami formatowania warunkowego, wyborem cennika do porównania (poprawność danych/lista) i filtrowaniem, gdzie można odfiltrować wyniki na kilka sposobów: http://obrazki.elektroda.pl/1248314000_1... Ceny większe/mniejsze/brak w cenniku.
Gdyby nie było pewności, czy żółte komórki są co trzecia, ale byłaby pewność, że interesuje nas tylko jeden kolor i mamy Excela w wersji 2007+, czyli plik .xlsx (nie wiem czy załącznik w formacie .xls oznacza, że ma to być używane w Excelu 2003-?), to można odfiltrować komórki według koloru i do tych żółtych zastosować funkcję SUMY.CZĘŚCIOWE. Jak w...
Ustaw sobie autofiltr na tym zakresie danych, wypiesz "abc" i masz odfiltrowane wyniki. To najprościej.
Tak wiem o tym, ale ma pokazywać wszystkie godziny nawet jak jest 0 wystąpień. Jak odfiltruje to i tak nie widać tych godzin.
Witam, Mam dane z pomiarów jak poniżej, w pierwszej kolumnie są wartości zadanego wymuszenia i wierszami a wierszach zanotowane wyniki. Dla każdej wartości zadanej wartości wyników jest około 1000. wyniki są różne, są tam wartości pochodzące od błędów bo znacznie odstają od pozostałych. Moje pytanie jest takie jak odfiltrować w excel’u błędne...
Nie zauważyłem by autor pytania prosił koniecznie o formułę. Owszem wspomniał, że: "Wiadomo jest to jedna formuła", ale nie wiemy czy kurczowo zamierza trzymać się formuł, bo jest (jak np: ja) entuzjastą Excel'a, aczkolwiek dopiero "raczkującym", czy być może jest to dla Niego rodzaj testu, zadania (ze szkoły, studiów, pracy - niepotrzebne skreślić)....
Czyżby taki prosty błąd?[syntax=vb] For i = 3 To ostWrs If (InStr(1, etat, "| " & .Cells(i, 5) & " |") > 0 Or .Cells(i, 5) Like etat) And _ (InStr(1, firma, "| " & .Cells(i, 9) & " |") > 0 Or .Cells(i, 9) Like firma) And _ (InStr(1, szef, "| " & .Cells(i, 10) & " |") > 0 Or .Cells(i, 10) Like szef) And _ (InStr(1, kopalnia, "| " & .Cells(i, 11) & "...
To proponuję zastosować dodatkowe kolumny tworzące identyfikator braku w postaci Nr i Sztuk, a następnie sprawdzenie liczby wystąpień takich w pierwszej tabeli. Na koniec odfiltrowanie tylko tych których nie ma w tabeli pierwszej (liczba wystąpień równa 0). Przeanalizuj plik z załącznika. Wynikiem będą odfiltrowane wartości w drugiej tabeli.
A więc to co sobie wymyśliłeś jest dosyć mocno skomplikowane. Można by próbować napisać makro, ale trzeba by przemyśleć algorytm i trochę nad nim posiedzieć... Można też próbować w następujący sposób: Każdą z baz - A - B - wrzucić do oddzielnych zakładek. Doprowadzić bazy do takiej postaci, jak na rysunku 1. Posortować pary indeks-zamiennik (najpierw...
Operacje na tekstach nie są tu specjalnie wygodne, moja propozycja rozwiązania jest trochę okrężna, ale jak dotąd nie ma innej, może ktoś jeszcze wymyśli coś prostszego. Żeby sprawdzić identyczność odfiltrowanych wpisów odwołuję się do nazwy 'Dokument', która była już zdefiniowana. Zdefiniowałem nową nazwę 'wynik' wg formuły:[syntax=text]=SUMY.CZĘŚCIOWE(103...
>Oska10 Z funkcji jedynie ZAOKR, ZAOKR.DO.CAŁK i cztery działania matematyczne "+", "-", "*", "/". Poukładaj dane źródłowe i wyniki w arkuszu tak, aby łatwo było zrobić wykres. Najlepiej obok siebie w wierszach lub w kolumnach. Do przedstawienia wyników najodpowiedniejszy będzie wykres kołowy. potrzebuje duzo duzo wiecej (ponad 2 miliony) (?) Access...
Mam w kolumnie hiperłącza do plików PDF. Chciałbym aby po filtrowaniu wydrukować wszystkie pliki z widocznych (filtrowanych) w komórkach hiperłączy. Bazowałem na wpisie http://www.elektroda.pl/rtvforum/topic28... nie wiem jak przekazać wartość hiperłącza z komórki do komendy [syntax=vb].PageSetup.PrintArea =[/syntax] i dalej... jak to...
Witam. Dziękuję za zainteresowanie, jednak nie chodzi w tym o samo odfiltrowanie, ale raczej przetworzenie wszystkich danych. Nic nie może zostać usunięte, wszystkie dane muszą pozostać na swoich miejscach, a nowe dane w zakresie A21:A30 mają być modyfikowane.
za chwilkę coś wystukam https://megawrzuta.pl/download/dcf8e5da7... coś mi nie chciało wrzucić załącznika plik z obsługą makr :/ cells nie może mieć na sztywno parametrów musi to jakoś pobierać automatycznie z tego wyszukanego/odfiltrowanego ale lista od czasu do czasu też się zmienia
Czy to musi być Visual Basic, czy nie wystarczy zwykły filtr lub filtr zaawansowany? I jak ma to działać? Czy będą dopisywane wiersze? Czy będą się zmieniały te wybory tak/nie? Kiedy ma być tworzona ta kopia w drugim arkuszu i do czego ma ona służyć? Czy w ogóle jest potrzebna, czy nie wystarczy odfiltrowanie niepotrzebnych danych? I najlepiej załącz...
Witam, Ja bym odfiltrował dane do wykresu do osobnego wiersza. Zastosuj np. formułę jeżeli i przy jej pomocy wyciągnij tylko dane większe od X.
"Brałaś" jak już ;) Co mi da filtr, jak ja muszę wpisać konkretne ilości sztuk? Jeżeli odfiltrujesz, to bez problemu policzysz ilości sumę, średnią, max., min. i co jeszcze sobie wymyślisz.
W arkusz1 masz bazę. W arkusz2(aktywny) kryteria filtrowania i określenie miejsce w które chcesz odfiltrowane dane umieścić. Faktycznie w ten sposób to także zadziała. Nigdy nie podchodziłem do tego tematu w ten sposób.
To proponuję coś takiego: W tabeli z miastami obok miasta utworzyć kolumnę sprawdzającą ile razy miasto miejscowość pojawi się w kolumnie z adresami. Później odfiltrujesz te większe od 0. https://obrazki.elektroda.pl/4992195800_...
Wszystko ma być zrobione w USER FORM Załącz plik z tym formularzem i przykładowymi danymi do odfiltrowania/wyszukania. Trudno wyczuć, czy najpierw filtrujesz listBox, czy kopiujesz "w locie" po... no właśnie otwiera się okno do wpisania wyszukiwanego tekstu
(at)kik192 Raz piszesz o podziale do nowego skoroszytu a innym razem do arkusza. Każdy odfiltrowany typ danych ma być zapisany w osobnym skoroszycie czy może być jeden skoroszyt z oddzielnymi arkuszami dla każdego odfiltrowanego typu danych? Operacja dzielenia danych będzie wykonywana za każdym razem na nowym skoroszycie? Chodzi o to, czy makro ma...
Cześć, mam tabele w excelu z następującymi danymi w kolumnie A mam rodzaje paczek(powtarzają się) w kolumnie B mam kody pocztowe na które zostaną dostarczone paczki(powtarzają się) w kolumnie C mam przewidywane daty dostarczenia paczek na poczte( jest ich kilka i się różnią) Problem polega na tym jaką funkcją odfiltrować paczki np. "aba" znajdujące...
Jeżeli to jednorazowa akcja, tu odfiltruj wiersze z warunkiem "zawiera" ULGA, w komórkę obok wstaw jakiś wyraz i przeciągnij go na pozostałe wiersze, potem zdejmij filtr i wykonaj zastępowanie w pierwszej kolumnie. Jeżeli ma być funkcja, to np. SZUKAJ.TEKST + sprawdzanie, czy nie zwraca błędu (funkcje: JEŻELI + CZY.BŁĄD)
Jak założenia są proste, to napisz swój przykładowy kod i powiedz, co Ci w nim nie działa. Wtedy przynajmniej będzie wiadomo, czego naprawdę oczekujesz. Jak dla Twoich przykładowych danych zaproponowałem działające rozwiązanie, to napisałeś, że Ci nie odpowiada, bo Sortowanie odpada z uwagi na pobieranie danych do arkusza brudnopis z innego arkusza....
Mam jeszcze jedno pytanie czy da się do makra które wklejam poniżej a służy do usuwania nieodfiltowanych wierszy, dodać opcje żeby usuwane wraz z nieodfiltrowanymi wierszami były też znajdujące się w tych komórkach grafiki? W każdej z tych grafik mam zaznaczoną opcję: "przenoś i zmieniaj rozmiar wraz z komórkami" ale nic to nie daje i grafiki, pomimo...
Przyznam, że ja też nie bardzo "łapię". Przy wyborze kryteriów filtrowania jest: "filtr tekstu" i kilka opcji do wyboru m.in. "zawiera". Jeżeli wybierzesz "a", to odfiltrowane zostaną wszystkie wiersze zawierające "A". Czyli: "A", "A, C", "A, B, C", "adamas_nt" itd. http://obrazki.elektroda.net/30_12288445... -------- (Office 2007)
być może "Sprawdzanie poprawności danych" będzie przydatne.. Ba... Ale tu lista musiałaby być odfiltrowana. No dobra, dałoby się. Nazwa, lista dynamiczna (przesunięcie) z wyszukiwaniem w kolumnie pomocniczej (słynne MAX()+1). Komórkę z listą (poprawność danych) mamy "załatwioną". Ale wcześniej trzeba wydzielić komórkę z parametrami dla filtrowania....
odfiltrować zakłócenia odfiltrować zasilacz odfiltrować napiąć zasilać
regulacja wypełnić zaschnięty głowica drukarka epson motorola migający ekran
Volvo XC40 T3 2021 – zmiana języka komputera pokładowego z włoskiego na polski Volvo Sensus Connect – cztery kafelki na ekranie głównym infotainment