bardzo często dodajesz jakieś produkty do bazy -> kolumna M. Zastanawiam się nad przypisaniem tych 3 twoich dodatkowych kolumn do jakiejś stałej > tylko problem taki, że w momencie dodania do bazy nowego produktu trzeba zrobić ręczny update w excelu
A tak [syntax=vbscript]If Format(ark.Cells(i, "BT"), "yyyy") = CDate(Alpex.cmROK) Then[/syntax]
Witam To jest makro wyszukane w jakiejś książce nie pamiętam. Tworzy nowe skoroszyty dla filtra z tabeli przestawnej. Zmień fragment aby tworzyło nowe arkusze Dodano po 6 Proponuję stronę helion.pl Tam do książek są przykłady na FTP. Skarbnica przykładów ;-)
Numer filtrowanego miesiąca wprowadza się w komórce B1 [syntax=vb]Sub PVFIELDS_MONTH() Dim oPvtItem As PivotItems Dim iFltr As Integer iFltr = Cells(1, 2).Value Set oPvtItem = ActiveSheet.PivotTables("Tabela przestawna1").PivotFields("Okres").Pivot... 'wyczyszczenie filtra For Each pvt In oPvtItem pvt.Visible = True Next 'wyświetlenie żądanego miesiąca...
Czy to ma działać jak w załączniku?
W załączeniu z kolumna pomocniczą (po przemyśleniu jednak najprościej będzie z kolumną nawet dla suma.warunków()). Datę poszukiwaną wpisujesz wg formatu daty excela (w polskim rok-miesiąc-dzień) Ponieważ nie było pliku a miałem wolną chwilę to recognitą "przeleciałem" twoje zdjęcie. :) ale na przyszłość załączaj pliki z przykładami a nie fotki.
Czy nie jest to łatwiejsze w pierwszym arkuszu użyć WYSZUKAJ.PIONOWO? Dodano po 23 Przy założeniu, że w skoroszycie 2 arkusza i w arkusz1 w kolumnie A jest naglowek, taky samy jak w arkusz2:[syntax=vb] Sub Filtter_Tab() Dim crt As Range With Sheets(1) Set crt = .Range(.Cells(1, 1), .Cells(Rows.Count, 1).End(xlUp)) End With Sheets(2).UsedRange.AdvancedFilter...
Przykład: [syntax=vb]Application.ScreenUpdating = False For Each k In Range("A2:A200") wzor = LCase(Left(k.Value, 1)) If wzor = "a" Or wzor = "b" Or wzor = "c" Then Rows(k.Row).Hidden = False Else Rows(k.Row).Hidden = True End If Next k Application.ScreenUpdating = True[/syntax]
Witaj Pozeraj, może być dobre. w kolumnie O nowy FID 2 powtarza, tu są ten sam numer i miasto( w starom)
Nie piszesz, której wersji Excela używasz, mam nadzieję, że co najmniej 2010. Bo od tej wersji dostępna jest właściwość DisplayFormat, która rozwiąże Twój problem. Tylko przykład dobrałeś niefortunnie, bo Twój kod działał w obu arkuszach: w jednym były dwa formatowania zwykłe, a w drugim dwa warunkowe, a Twój kod porównuje formatowania zwykłe, które...
Dobry wieczór, Przyjęte założenia: 1) Dla jednej osoby w danym dniu kod U lub X może wystąpić tylko 1 raz. Gdyby było inaczej uwzględnione będzie pierwsze wystąpienie. 2) Kolejność kolumn z datami jest taka sama w danych źródłowych i tabeli wynikowej. Rozwiązanie w załączniku. Formuły tablicowe jednokomórkowe. Można kopiować w obu kierunkach. Format...
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) & "...
Wbudowany filtr nie wystarczy?
Kolego podpowiedz mi jeszcze jak zablokować te dwa górne wiersze tak by zawsze były widoczne. okno->zablokuj okienka. [url=http://abc-excel.blogspot.com/2010/... w excelu
na przykład: w tabeli nie jest "ALIOR"
To, co w bazie jest naturalne, do Excela jest "przyszywane". Odkąd mnie kiedyś Excel oszukał podczas sortowania i filtrowania sporej "bazy", nie zlecam mu tak karkołomnych zadań. To nie ma sensu, skoro są dedykowane narzędzia do baz. Tylko ludziom czytać się nie chce.
Bardzo możliwe, że Pan Maciej zrobi tej formuły. Ale ja w takich przypadkach nie złom głowy i użyć makra Działa na podstawie aktywacja "Zestawienie"
A, rzeczywiście. Trzeba odkryć wszystkie wiersze przed end(xlUp)
To nie taki hop-siup: w VBA masz trochę ograniczoną liczbę obiektów którymi by można to wykonać w miarę prostu, więc trzeba samemu napisać dwa fragmenty kodu: jeden odpowiedzialny za wyłuskanie niepowtarzających się wartości z podanego zakresu i drugi, który je posortuje rosnąco (zakładając, że te dane mają być posortowane). Można by do tego wykorzystać...
W kolumnie C, jak piszesz, jest data. Wynik więc powinien być w D i E... Spróbuj w D2 takiej formuły tablicowej (Ctrl+Shift+Enter) [syntax=text]=MIN(JEŻELI(A$2:A$100=A2;JE... przeciągnij w dół. W kolumnie E, analogicznie MAX Oczywiście wpisz własne zakresy. Im mniejsze, tym szybciej będzie przeliczało (żadne A:A...
Podstaw zmienną z Nr kolumny wyniku wyszukiwania: kol =Cells.Find(..). column ActiveSheet.Range("$A$2:$P$697").AutoFil... Field:= kol , Criteria1:=RGB(255, _ 199, 206), Operator:=xlFilterCellColor
Hmm... 1. sprawdzić ilość spacji - musi być tylko jedna 2. sprawdzić kody znaków - tylko duże litery od A do Z w obu wyrazach. Takie coś? http://obrazki.elektroda.pl/3887959700_1...
Ktoś już kiedyś walczył z filtrowaniem listBox'a: http://www.elektroda.pl/rtvforum/viewtop...
Jeśli wszystkie warunki były znane od początku, to być może byłoby oczekiwanych wyników. biorąc pod uwagę fakt, że Pan dwa razy więcej postów i są wystarczająco dużo punktów, myślałem, że to po prostu dać wskazówkę. Dlaczego wyszukiwanie w kolumnie I nie działa z poniższym kodem ).AutoFilter Field:=9: w tym przykładzie nie ma nic o kolumnie 9 przy pierwszym...
Coś niewłaściwie skopiowany ten kod. Mają podwójne "With", a raz "End With" Dodano po 7 [syntax=vb]Sub Kr() Dim bs As Range, r&, i&, j& Dim ik As Boolean, wb As Workbook, br As Range Dim b Set bs = ThisWorkbook.Sheets(1).Columns(4).Cells Set br = ThisWorkbook.Sheets(1).Rows Set a = New Collection r = 1 While bs(r + 1) <> Empty r =...
Dobry wieczór, Jeżeli w Arkuszu2 nie będzie niczego więcej poza tym kryterium i zakres kryterium będzie ciągły (bez pustych komórek), to chyba najprościej zamiast konkretnego zakresu napisać UsedRange, czyli w tym przypadku: [syntax=vb]CriteriaRange:= Sheets("Arkusz2").UsedRange[/syntax] Pozdrowienia
Ok teraz masz kryteria w tablicach w kodzie VBA w razie jakbyś chciał dodać kryterium, musisz zwiększyć tablicę o 1 i dopisać do tego dodatkowego elementu kryterium z gwiazdkami. Jak zobaczysz kod to chyba będziesz wiedział o co kaman. Dodałem też zabezpieczenie przed kliknięciem dwa razy na makro
Taka opcja istnieje, tylko że zawsze jest coś za coś. Będziesz musiał stworzyć procedurę/funkcję pobierającą z zadanego zakresu wartości, filtrującą i umieszczającą wyniki w określonym miejscu. To wszystko trzeba będzie zrobić dla każdego elementu zakresu, czyli w jakieś pętli, co dla dużej ilości elementów bardzo spowolni operację. Elementy wbudowane...
Wzorowałem się na pliku z dwoma zmiennymi, który działa idealnie. Dodałem trzecią zmienną i wszystko się posypało Zwróć uwagę, że: 1. W pliku "wzorcowym" istniejące tam dwa warunki działają "na krzyż", tzn., że jeśli jeden z nich = "Wszystkie", to sprawdź wartość drugiego i jeśli ten jest inny jak "Wszystkie" to wykonaj kryteria przypisane do tego...
Cóż, taka już natura Excela... Pewnie wklejają się wszystkie odfiltrowywane wiersze, tylko jeden pod drugim, począwszy od pierwszego widocznego. Jak po tej operacji zdejmiesz filtr, to wszystkie odfiltrowywane wartości z kolumny A powinny być w kolumnie C, tylko jedna pod drugą. Nic na to nie poradzisz, trzeba po prostu być ostrożnym przy używaniu filtra...
Niby spoko ale czasochłonne dla mnie :cunning: Widać, że masz niewiele doświadczenia z Excelem i nie potrafisz nawet wykorzystać natywnych możliwości programu :cry: Pierwsze 6 wierszy (te z kryteriami filtrowania) możesz zawsze ukryć przed użyszkodnikami :D tego arkusza. Warunki filtrowania zapisane są w postaci samo aktualizujących się formuł więc...
A nie wystarczy zwykła tabela przestawna? Jest tam i filtrowanie i możliwość zliczania wartości. Dowolnych nie tylko liczb. Po posortowaniu może być np. w pierwszym wierszu.
Dwa pytania na wstępie. Czy możesz ingerować w ten skoroszyt (dodać dodatkową kolumnę dzięki której później będziesz filtrował dane)? O jaką tabelę ci chodzi (z którego arkusza)? Jeżeli możesz ingerować w arkusz dodaj jedną kolumnę przy nazwisku. Wpisz formuły odnoszące się do nazwiska we wszystkich wierszach dotyczących tego nazwiska. Zaznacz grupę...
Mam już rozwiązanie: należy zaznaczyć komórki, Ctrl+G -> specjalnie -> tylko widoczne komórki: i wtedy albo kopiuj albo usuń itd.
nowe rekordy muszą się wklejać po kolei w te tabele obok (A1:D1, A8:D8 itd.) :?: :?: :?: Czy to ma znaczyć, że nowe rekordy mają być dopisywane do poszczególnych tabelek z tym samym ID ??? Jeśli istnieją jakiekolwiek racjonalne przesłanki, że poszczególne segmenty tabeli nie mogą być dziesięcio-wierszowe :cry: to w kodzie te dane mają kopiować się...
Tu masz proste makro: (sprawdza kolumny dopóki jest wartość w kolumnie C zaczynając od 7 wiersza Sub filtr() a = Range("C3") b = Range("C4") i = 7 Do While Cells(i, 3) <> "" If (Cells(i, 3) >= a) And (Cells(i, 3) <= b) Then Rows(i).EntireRow.Hidden...
Przypisz nazwę dla zakresu np. A2:A20 w arkuszu '2' Dla A4 użyj 'Poprawność danych' - lista, żródło - nazwa zakresu Dla B4, E4 - funkcja WYSZUKAJ.PIONOWO
Mam [url=http://www.multipasko.pl/wyniki-csv... plik z wynikami minilotto i zastanawiam się jak z całości wywiltrować wysttępowanie poszczególnych liczb. ile razy wystąpiła dana liczba i wyświetlanie tylko tych wierszy z daną liczbą, czyli numer losowania i wynik losowania np. liczba 9 nr los. l1 l2 l3 l4 l5 18 9 23 35 12 46 21 9 32...
Tak jak już napisał Maciej Gonet bez załącznika to trochę wróżenie z fusów, ale spróbuj dostosować do Twojego pliku taki kod: [syntax=vb]Sub TrzyOstatnieDni() Dim rRng As Range Dim lLstRw& Dim sData$ Dim dData As Date sData = InputBox("Podaj Datę w formacie dd/mm/rrrr):") sData = Format(sData, "dd/mm/yyyy") dData = CDate(sData) lLstRw = Cells(Rows.Count,...
W załączniku.
Może w ten sposób...
Tak, dokładnie o coś takiego chodziło. Tylko Skąd i Dokąd bym na dwie kolumny rozbił (zakładając że chcesz je mieć potem w raporcie). Nazwy mają się powtarzać. Teraz możesz np. zrobić tabelę przestawną jak w załączniku: http://obrazki.elektroda.pl/2261331300_1... popróbować z różnymi funkcjami czy nawet próbować jakieś makro napisać,...
U ciebie są pięknie posortowane dane, a u mnie nie - i nie będzie tak bo dane są dopisywane na bieżąco W kolumnie 'G' (Lista unikatów 'Projekty') masz funkcję wyświetlającą posortowane unikaty - zastosuj ją do innych kolumn (projekty, osoby) i będziesz mieć porządek.
Witam serdecznie, chciałbym się dowiedzieć jaki filtr bądź fukcję należy zastosować, aby excel zwracał mi ten sam dzień z kolejnych miesięcy. Dla przykładu: spółka X w dniu 10 stycznia 2010r. notowana była po kursie Y. Chciałbym, aby excel pokazał mi, jakie były notowania spółki za miesiąc, dwa (10 luty 2010, 10 marzec 2010) itd. Próbowałem z filtrem...
Dzięki. Problem rozwiązany dzięki pomocy kolegi (pozostało tylko usunąć zliczanie pustych komórek) przy zastosowaniu takiego oto kodu: Sub copyUniqueWordsToNewSheet() Dim outputColumn As Range, cellsInCurrentColumn As Range Dim numberOfColumnsInCurrentSheet As Integer, currentColumn As Integer Set outputColumn = ThisWorkbook.Sheets("zestawienie").Colum...
Sprawdź [syntax=vbscript]Sub przyszly_tyd() With ActiveSheet .AutoFilterMode = False .Range("a6:Q3922").AutoFilter Field:=11, Criteria1:= _ xlFilterNextWeek, Operator:=xlFilterDynamic End With End Sub[/syntax] lub [syntax=vbscript]Sub przyszly_tyd() With ActiveSheet If .AutoFilterMode Then .ShowAllData .Range("a6:Q3922").AutoFilter Field:=11, Criteria1:=...
Daj exela arkusze jeszcze. Sorry zapomniałam o pliku :)
Możesz wykorzystać fragment.tekstu(), lewy(), prawy(). W sumie to nie musisz konwertować. Wrzuć to co zrobiłeś, albo przynajmniej arkusz wypełniony tak jakbyś chciał żeby był. Z Twojego opisu mało wynika.
Ja bym sprawdził DateTime.Month z innym DateTime.Month.
witam mam tabele z 4 kolumnami nazwisko pracownika | imię pracownika | kolor zmiana | stanowisko i teraz chce stworzyc tabele, w ktorej beda tez te 4 kolumny ale tylko pracownicy z jednej (a jest cztery) danej zmiany np. zmiany RED. chcialbym tez zeby automatycznie po wpisaniu danych do tabeli 1, dane pracownika ze zmianu RED pojawialy sie w tabeli...
Witam! Mam plik w którym (kolumny po kolei to) nazwa, jednostka miary, sztuki, cena. Chciałbym stworzyć arkusz, w którym wpisując nazwę będzie mi excel filtrować kolumnę z nazwami i jeżeli wyszuka taka nazwę/kod – to wtedy będzie kopiował mi ta nazwę wraz z jednostka miary i cena do listy? Sztuki będę wpisywał sam... może ktoś pomoc bo próbuje...
Np porównanie (funkcja JEŻELI) + filtr na kolumnie wynikowej...
Myślę że można ten kod uprościć tylko nie trafiam za twoim myśleniem (może zaspany jestem). Na początku wyrzucić to co jest zbędne np. tak: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("zmieniane3")) Is Nothing Then NumerWiersza = 3 For NumerKolumny = 2 To 7 If (Worksheets("biblioteka").Cells(1, NumerKolumny)...
Owszem to filtrowanie danych ale w żadnym wypadku nie powinno być powiązane z auto-filtrem, tym bardziej jak masz excel 2003 i poniżej. Tu masz kod. Tłumaczyć? [syntax=vb]Sub Makro1() Dim ostWrs As Long, x As Long Dim tekst As String, szukane As String ostWrs = Range("B" & Rows.Count).End(xlUp).Row tekst = InputBox("Podaj szukany ciąg", "Podaj szukaną")...
Coś ala tak, pod zmienna wartość będziesz miał zawartość komórki "A2" po filtrowaniu. [syntax=vbscript]wartosc = ActiveSheet.AutoFilter.Range.Offset(1).S... 1)[/syntax]
Gdybyś spojrzał do pomocy VBA, to znalazłbyś takie zdanie: This property applies only to worksheet pages. :( Znalazłem na szybko taki [url=http://www.vb-helper.com/howto_prin... Po modyfikacji do VBA i Twoich założeń powinien wykonywać to czego oczekujesz. Pozdrawiam
Witam wszystkich, Głowię się jak można zablokować AutoFilter na konkretnym wierszu ale jednocześnie umożliwić filtrowanie w pozostałych kolumnach. Wykorzystanie kodu: ActiveSheet.ListObjects("umowy&... Field:=7, Criteria1:="xxx123" Niestety robi to tylko raz :( Macie jakiś pomysł jak można to zrobić?
=AND(IF(A1<DATEVALUE("2013-07-01");TR... Warunek dla komórki A1 W wyższych wersjach Excela jest możliwość ustawienia AutoFiltra dla daty z parametrem "pomiędzy". Trzecia możliwość - posortować całość po dacie i wybrać żadany zakres.
Dzięki wielkie za pomoc- już sprawdzam. A Excela miałem na wirtualnej maszynie, sprawdzę ASAP na normalnym komputerze i napiszę czy się udało, z góry jednak dzięki!
Nie, ponieważ mógłbym wtedy zafiltrować tylko jeden kolor, Ale po to są operatory ORAZ() i LUB() za pomocą których można zawrzeć wiele warunków w jednym warunku. Cały czas mówię o filtrze zaawansowanym. A może podaj w pliku xls jakiś przykład. Nawet w VBA filtrowanie po kolorze jest "kłopotliwe" jeżeli korzystasz z formatowania warunkowego. Trzeba...
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...
Do takiego filtrowania listy musiałbyś wykorzystać TextBox. Raczej nie da się tego wykonać "wewnątrz" ComBox'a, gdy jest aktywny (posiada focus).
Makro napisane, do zamknięcia
Nie dałeś załącznika, więc nie ma na czym sprawdzić, ale jeśli problemem jest amerykański format daty, to zapis typu: systemowy separator daty. Jeśli ma być faktycznie ukośnik, niezależnie od ustawień systemowych, to trzeba np. tak: [syntax=vbscript]NewDate = Format(DateAdd("d", 126, Date), "m\/d\/yyyy")[/syntax]
Tu masz nagrany kod z rejestratora przy filtrowaniu daty w zakresie od... do... [syntax=vb]ActiveSheet.Range("$A$1:$E$23... Field:=3, Criteria1:= ">=2012-02-03", Operator:=xlAnd, Criteria2:="<=2012-02-06"[/syntax]. Wystarczy, że zamiast daty wstawisz (złączysz znakiem &) swoją datę początkową i końcową i uzyskasz efekt o który Ci...
skopiować z arkusza nr 1 (Data), tylko te kolumny z którymi pokrywają się nagłówki znajdujące się w arkuszu nr 2 Sprawdź: [syntax=vba]Option Explicit Sub odkopiuj() Dim kc As Integer, kd As Integer Dim wrs As Long Dim nagl As String Dim arkC As Worksheet Application.ScreenUpdating = False Application.Calculation = xlManual 'Niekoniecznie Application.EnableEvents...
Zadanie nierozwiązywalne. Za słabe sprecyzowanie. Czy: MOJ1 MOJ2 to też duplikaty MOJKOT ? A MO1 to także duplikat MOJKOT? A MXYZ też?
Witam , Ropsi - jestem pełen uznania dla twego ..... co tu dużo ukrywać - geniuszu - dokładnie o taki efekt mi chodziło - dzięki serdeczne - działa wyśmienicie. Nie wiem czy da się to jakoś zoptymalizować aby samo filtrowanie przebiegało minimalnie szybciej - ale nie ma to już takiego znaczenia - Najważniejszy jest efekt , a efekt jest własnie taki...
Jak masz kłopot ze wstawieniem to spakuj to zipem A na temat zrób tak jak radzi paweliw wstaw hiperłącza odwołujace się do tego samego dokumentu i już
Swój problem rozwiązałem rejestratorem makr. Uruchamiamy Filtruj z zakładki Dane, i usuwamy zaznaczenie "Puste" Przechodzimy do drukowania, w którym zaznaczamy ilość kopii i czy mają być sortowane czy nie . I drukujemy. Usuwamy filtrowanie. Zatrzymujemy rejestrator makr. I mamy makro filtrowania i drukowania. Powodzenie tym, którzy rozwiązują ten problem....
Tak ma pan racje. Jest to projekt zaliczeniowy i udostepniłem tylko tę częśc kodu.
Nie wiem jaką masz wersję excela, ale od 2007 w górę to będzie karta DANE->Sortuj, otworzy się okno dialogowe, gdzie będzie można wskazać kolumny i kolejność sortowania. P.S. Podmień dane w pliku o ile są prawdziwe, za dużo danych osobowych jest publicznie przedstawione
Aby wykorzystać filtr zaawansowany musisz w specyficzny sposób ustawić dane, a w szczególności nad tabelą z danymi (lub obok) powinieneś zostawić miejsce (wiersze) na warunki które powinien spełniać wynik (muszą być te same nagłówki kolumn). Dokładny opis jak to stosować będziesz miał jak wciśniesz pomoc (ikonka ze znakiem zapytania) i napiszesz "Filtr...
Zrób plik przykładowy i załącz go na forum :D i wyjaśnij dlaczego potrzebujesz VBA :?: i na czym ma polegać "Filtrowanie od A do Z" :cunning:
Jedna z metod na ustalenie ostatniego wiersza, którą ja stosuję: [syntax=vb]If FilterMode Then ShowAllData ost_w = Cells(Rows.Count, "A").End(xlUp).Row[/syntax] W tym wypadku - ustala wiersz z ostatnią komórką w kolumnie A. W zmiennej ost_w masz wtedy numer wiersza, który znaczkiem & możesz dokleić do adresu w VBA.
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...
To podziel lub zablokuj sobie okno Excela (Menu Okno->Podziel/Zablokuj okienka) aby wiersz z autofiltrem był zawsze widoczny. krzychoocpp :arrow: Pisałem post nie widząc jeszcze Twojej odpowiedzi, myśle że stanowi on dobre uzupełnienie Twojej wypowiedzi.
Sortowanie danych to podstawy Excela i nie wolno, chcąc w nim pracować, iść na łatwizne. Trzeba to przetrawić samemu aby nabiło się do baniaka. Można napisać że, help Excela jest po to aby go czytać a nie "olewać", więc tylko podam z brzegu, adresy stron o rzeczonym problemie ( jest ich mnogo a google zasypuje informacjami ): http://office.microsoft.com/pl-pl/excel-...
Zabrałąe sie za tworzenie bazy danych i wymysliłem sobie że zrobie formularz i bedzie sam uzupełniał bazę danych i ok wyszło mi coś tam w vba napisało mi się jako tako. Ale stoję teraz pod murem mam bazę, która zawiera obecnie 1750 rekordów w 16 kolumnach. W kolumnach mam pokolei: nazwisko, imię, data zatrudnienia...... i np w ostatnich dwóch data badania...
Idealnie. Bardzo dziekuje!
1) zapisane w folderze / lokalizacji liku, z którego były kopiowane Przed 'r = 2' dodaj linije ChDrive ThisWorkbook.Path ChDir ThisWorkbook.Path 2)Nezrozumiale - docelowy skoroszyt + filtrowanie(?) co tam filtrowac dla jednego portfela?? Nagraj makro dla np P001
Bo masz bajzel z tymi datami. Np w D797 jest 1/13/2014 w D1403 jest 13/01/2015 oraz wiele, wiele innych. W związku z tym 10/12/ to dwunastego października, czy dziesiątego grudnia? I co z tym biedny Excel ma zrobić?
Za mało konkretów podałeś. Nie wiadomo, na czym ma polegać to filtrowanie. Czy kryteria filtra będą stałe, czy zmienne? Czy ma to być autofiltr założony wprost na danych źródłowych, czy myślisz o filtrowaniu formułami? Daj załącznik z próbką reprezentatywnych danych i wyjaśnij, jakich oczekujesz wyników.
[syntax=vbscript]If rn.Value = 0 Then[/syntax]
Założenie było takie, żeby kopiował wszystkie wiersze w których w kolumnie F była wartość "tak" ale w takiej formie kopiuje wszystko niezależnie od "<>". Założenie było w miarę dobre. Z realizacją trochę gorzej. Makro działa tak jak je napisałeś tj. porównuje wartość komórki F1 z wartością zmiennej nazwanej przez Ciebie nie . Jeżeli chcesz aby...
Lecz pomimo jej przefitrowania w listboksie widzę wszystkie pozycje. Jak zrobić bym widział tylko te po filtracji? Najszybciej przez 'additem' (czyli pętla po widocznych komórkach i ładowanie do listboksa)
Witam! Mam problem z exelem, a dokladnie jak w temacie z filtrami. Otoz mam date z godzina w pierwszej komorce, w kolejnych mam dane z ktorych musze zrobic wykres. Problem w tym ze wykres musze zrobic ze wszystkich dni w roku, ale tylko np. z godziny pierwszej. Wie ktos moze jak to odcedzic zeby zostaly same np. pierwsze godziny?? Za wszelka pomoc z...
jak mogę zrobić aby makro weryfikowalo hasla [syntax=vbscript]Private Sub Loguj_Click() Set dl = Sheets("Dane logowania") ow = dl.Cells(Rows.Count, "A").End(xlUp).Row On Error Resume Next a = Application.Match(Me.User, dl.Range("A1:A" & ow), 0) If a > 0 Then If Me.Password = CStr(dl.Cells(a, 2)) Then MsgBox "Zalogowany", vbOKOnly Unload Logowanie End...
Kiedyś na forum był temat magazynu. uchował mi się plik. Jeśli towarów jest naprawdę dużo, to zerknij na filtry (przede wszystkim ten po nazwie) w formularzu pod przyciskiem "Wydanie z magazynu". Projekt oczywiście nie jest dokończony, ale chodziło wtedy o to filtrowanie. Może w ten sposób?
Gdy zakładasz ochronę musisz dodatkowo zahaczyć sortowanie i używanie autofiltru Zaznaczałam, niestety nie działało.
hej mam problem musze stworzyć arkusz który bedzie od razu pobieral sobie dane i tworzyl baze danych. w arkuszu ktory dolaczylem jest 26 pozycji ktore odpowiadaja za jakis dokument oczywiscie tych pozycji w przyzlosci bedzie kilka tysiecy. chcialbym aby w bazie tych dokumentow znajdywaly sie wiersze w ktorych jest slowo "pierwsza" i "druga" i tylko...
--Witam, potrzebuję pomocy w filtrowaniu raportu RCP Excel dla pracownika, chciałbym uzyskać czas pracy dla danego przejścia obliczany jako pierwsze wejście i ostatnie wyjście oraz czas jaki pracownik spędził na przerwie w czasie pracy. W załączniku przesyłam raport zdarzeń jaki otrzymuję z systemu.
Ewentualnie filtrowanie.
Witam Mam problem przy filtrowaniu zaawansowanym. Po wybraniu opcji Zakres listy - lista do filtrowania (Arkusz2!$A$2:$G$93") Zakres - zakres kryteriów (Arkusz!Kryteria) N5:P6 Kopiuj do - Arkusz1!B$5:$H$5 wyskakuje błąd w wydzielanym zakresie występuje nazwa pola lub jest ona niepoprawna Ten sam błąd jak wpisałem z ręki kod Sheets("Arkusz2").Range("A2:G93").Advanc...
Tę niesłychanie skomplikowaną procedurę przypadkiem ktoś [url=http://office.microsoft.com/pl-pl/e... Pozdrawiam.
Z tego co zrozumialem mozesz uzyc filtrowania.
Napisz dokładniej, o co ci chodzi, najlepiej podaj przykład w pliku Excela. Co rozumiesz przez dane odfiltrowane? Czy chodzi o użycie autofiltra na tych danych, czy o funkcję FILTRUJ? Użycie funkcji FILTRUJ w połączeniu z UNIKATOWE wydaje się być najprostszym rozwiązaniem, o ile można określić kryterium filtrowania.
Kurde, potrzebuje niby czegoś prostego jeśli będe dodawał makra do tej bazy która waży juz 15 MB to sie w niej pogubie, i tak nie wiem czy nawet sobie poradze z dodaniem tego. Już prawie mi sie udało to zrobic poprzez filtrowanie zaawansowane ale po zmianie jakiegoś argumentu trzeba naciskać na filtr od nowa;/
Witaj Można użyć kwerendy do filtrowania dla pierwszej kolumny(DSN = Text Files) Musi być ustawiona MSQuery
Zakres [syntax=vbscript]Range("E3:F" & Rows.Count)[/syntax]zawiera dwie kolumny (2 pola), a Ty chcesz filtrować po trzecim: [syntax=vbscript]field:=3[/syntax]
filtrowanie excel excel filtrowanie danych excel makra filtrowanie
przepływomierz odpowiada rozmiar czcionki obliczanie transformatora impulsowego
moduł komfort termet banggood opinie
Połączenie kabli zapłonowych z kopułką w Audi 80 B3 1.8 benzyna 1989 Czy zapora Windows 11 jest potrzebna przy zaporze na routerze?