Witajcie. Niedawno prowadziłem długą rozmowę z AI Gemini od Google. Rozmowa zaczęła się serią halucynacji ze strony AI, która nie potrafiąc znaleźć poprawnej odpowiedzi zaczęła wyraźnie kłamać. Zaintrygowało mnie to i w dalszym ciągu rozmowy poznawałem coraz więcej szczegółów na temat działania AI. Zmuszałem AI do analizowania siebie samej. Przy tym...
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
Czy to ma działać jak w załączniku?
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...
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...
Tu masz gotowy plik. Sprawdź czy o to chodziło
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-...
Trochę inny sposób.
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...
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...
Lulubella proszę, oto przykład kopiowania z flash do sram pisany na mikrusa XMega. Dodano po 23 − liczby dla których bit B3=0, − liczby dla których bit B3=1 i B1=0, − liczby dla których bit B3=1 lub B1=0, W tych przypadkach w zupełności wystarczy SBRC i SBRS Można i tak: [syntax=vbnet]ldi R18, &b11111111 andi R18, &b00100000 breq...
Przede wszystkim załącz plik z przykładowymi danymi i pokaż co i jak chcesz filtrować. Napisz też jaką masz wersję Excela i jaki domyślny format daty w systemie operacyjnym. Ogólny schemat postępowania jest tu.[url=https://pl.extendoffice.com/docu...
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.
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...
Kacper sprecyzuj czy chcesz to filtrować filtrem excela?? czy może być każda inna forma aby uzyskać wynik - którego formę też proszę podaj. Sprecyzuję - czy na wykresie ma być suma z konkretnego tygodnia wszystkich pracowników czy odrębnie dla każdego ?? oki chyba jest dobrze tzn sumuje wszystkich pracowników w poszczególnych tygodniach aha - Aby funkcja...
Żaden problem. Tylko przy tych (jak najbardziej prawidłowych) relacjach: http://obrazki.elektroda.net/61_12544705... Należałoby w głównej tabeli wypełnić pole "IDrekrutacja": http://obrazki.elektroda.net/75_12544706... I wtedy zobaczysz czarno na białym: http://obrazki.elektroda.net/81_12544706... Wtedy łatwo dorobić kwerendę. p.s. Przyjrzałem...
Napisałem parser dla twoich wymagań.. cały bufor to jeden string.. dane zamiast pobierać z rs232 to są pobierane z pliku (dla lepszego testu w porcjach o losowym rozmiarze od 1 do 10 bajtów) i przekazywane do parsera... jedyne co musisz zmienić to źródło danych przekazywanych do AppendToBuf oraz samą obsługe odpowiedzi -> zamienić writeln na co kolwiek...
W formularzu 'Main', tak gdzie jest pole z wyborem kraju, przecież.
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ć...
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
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"
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,...
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]
zmień na [syntax=vb]Sheets("Filtr").Range("C" & x).PasteSpecial Paste:=xlPasteValues[/syntax]
Witam, zaznaczam że dawno excela nie używałem, więc nie podam dokładnego przepisu, ale możesz zrobić tak: 1. Excel umozliwia podzielenie arkusza na 4 "widoki". W tym celu przy pionowym pasku przewijania znajduje się uchwyt, przeciągnij go tak, aby był widoczny jeden wiersz komórek. 2. Chyba w menu "widok" znajduje się polecenie "zablokuj podział" lub...
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...
http://img524.imageshack.us/img524/5634/... tak mam teraz ustawione jak mowiles i tez nie dziala :/ wczesniej tez juz tak ustawialem bo tak jest w instrukcji napisane "Na przykład, aby zablokować dla konkretnego adresu IP możliwość przeglądania stron internetowych (protokół HTTP) należy wykonać poniższe kroki: • IP / MAC Filter Set...
I. Zakładanie konta Wejdż na stronę http://www.elektroda.net i kliknij Załóż konto w sekcji WWW z PHP i MySQL .eu . http://obrazki.elektroda.net/2_127219493... Następnie wypełnij formularz tworzenia nowego konta. Musisz podać nazwę konta (nazwa ta będzie później nazwą domeny nazwa.elektroda.eu ), hasło i swój adres e-mail. Ponadto należy podać...
Ślad w windzie pozostaje praktycznie na zawsze. Rejestr, historia stron itd itp. winda to jeden wielki koń trojański, i albo trzeba wiedzieć jak go używać by nie narobić sobie kłopotów, albo z niego zrezygnować. M$ posiada (wchodzi w posiadanie w momencie instalacji windy) prawa do zbierania informacji o stanie komputera, sprzęcie, zainstalowanym oprogramowaniu,...
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
Tu masz przykład zrobiony "na szybko". Dodaj tylko obsługę błędów i filtrowanie danych znaczących. Pozdrawiam...
Filtr działa, wg Twoich danych i ustawień tylko 1 data jest większa niż dzień dzisiejszy. Może przyjęłaś błędne założenia ? Oczywiście trzeba zmienić nazwę arkusza i numer kolumny wg której makro ma filtrować dane ...
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...
Tak na szybko, sprawdź czy o to chodziło. Skoro piszesz, że to przykład to nie dodałem warunków zabezpieczających makro przed błędem. np po wpisaniu litery zamiast liczby do B8 Jak pisał "paweliw" to dość niewygodny sposób dodawania danych do arkusza.
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ę...
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ę...
Pierwsza linia działa, druga nie Nje działa, bo oczekiwany jest obiekt typu tabela lub kwerenda, a nie zapytanie SQL.
Dzień dobry, potrzebuję takiego makra, które przefiltruje wszystkie wartości po jednej kolumnie i stworzy nowe pliki tyle ile jest wariantów w filtrze. 1. na C jest katalog dostawcy (zamieszczony) w nim plik z makrem start.xlsm i plik z danymi dane.xlsx i folder podzielone 2. makro start w pliku start.xlsm otwiera plik dane.xlsx 3. sprawdza w kolumnie...
[syntax=vbnet] Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim ReceivedText As String ReceivedText = SerialPort1.ReadLine MsgBox(ReceivedText) End Sub [/syntax] Jeśli dane są wysyłane co 5 sekund, to możesz ustawić Timer na 4 sekundy i zobaczysz co wyświetli się w okienku MsgBox . Jeśli twoja...
Ten plik musi mieć przede wszystkim uporządkowaną strukturę. Sporo czasu zajęło mi zanim doszedłem co jest co. W arkuszu Exports kolumna nazywa się " date" ze spacją na początku(!), a w arkuszach imiennych nazywa się już "Export date", w arkuszu Exports i w arkuszach imiennych jest kolumna "Date - Scan.copy", a w arkuszu zbiorczym "Date - Scan". Kolumna...
00. Plik SAS: "example1" 01. Zdefiniowanie opcji programu: 68 znakow w wierszu, bez daty w naglowku kazdej strony 02. Definiowanie zbioru danych o nazwie "class" 03. Formatowanie wejscia: 5 zmiennych, z czego dwie pierwsze to wyrazy (znak $), reszta to domyslnie liczby 04. Informacja, ze kolejne linie zawieraja dane. ... 24. Drukowanie zbioru wynikowego...
Zobacz taki przykład, możesz odczytać po kluczach zawartość słownika:[syntax=vbnet]Sub slownik() Dim dic As Object Dim r, kom As Range Dim k Set dic = CreateObject("scripting.dictionary") Set r = ActiveSheet.UsedRange For Each kom In r If Not dic.exists(kom.Value) Then dic.Add kom.Value, kom.Value End If Next For Each k In dic.Keys() Debug.Print k Next...
do tabeli z z filtrowanymi danymi (badaniami) po prostu wkleić z innego arkusza inne dane (badania) Teoretycznie jest to możliwe, ale moim zdaniem znacznie łatwiej przeprowadzić to poprzez stworzenie kilku nowych arkuszy dla określonych zestawów (kilka wyfiltrowanych wierszy z Tabeli 1, oraz jeden wiersz z "pakietem") :idea: Jak zaczniesz kopiować...
Może w ten sposób...
Witam serdecznie, Wpadlo mi w rece stare radio lampowe produkowane przez firme Atwater Kent w latach 1931 i 1932. Jest to model 80. Service Manual w zalaczniku. https://obrazki.elektroda.pl/8899509800_... Jest w dosyc oplakanym stanie wizualnym na zewnatrz. Wnetrze wyglada troche lepiej, gryzonie sie nie zainteresowaly. Bylo kilka przewodow...
I gdzie jest problem ? Lista stworzona w Calcu, użyty filtr na potrzebne miasto i kopia do Writera.
dzięki za pomoc
Jeżeli to jest niemożliwe to chociaż potrzebowałbym taką funkcję: Mamy raporty dzienne z każdego miesiąca zapisane w ten sposó; 5.MAJ-2011/R.D 5-1 do 5-31 i tak w każdym misiącu. Wpisuję kwote 1000 i wyszukuje mi we wszystkich plikach każdej takiej kwoty... :)
Możesz zastosować filtr formularza lub ponownie otworzyć ten sam formularz uzależniając ustawienia jego źródła danych od wprowadzonych dat. Zerknij tu: https://access.marzatela.pl/filtrowanie-...
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...
filtrowanie danych excel filtrowanie danych makro filtrowanie danych
cyfral panel czujnik ciśnienia cyfrowy sterownik zaworu drogowego
bateria parkside interfejs diagbox
Metracoil 500MΩ – pomiar zwarcia do ramy w podeście ruchomym, procedura krok po kroku Bosch SPS53E08EU – schemat serwisowy, wiring diagram, rysunki rozstrzelone, diagnostyka