chciałbym aby to wyświetlało się od razu po dodaniu w arkuszu głównym Jeśli ten projekt jest taki prosty jak w Twoim przykładzie :D to nawet w starszych wydaniach Excela można to zrealizować w oparciu o funkcje wyszukaj.pionowo przy wykorzystaniu kilku tricków (np. pomocnicza kolumna z "indeksami", funkcje "nazwane" itp. ) :spoko: Całość widać na zrzucie...
wcztywanie danych ma nastąpić z innego arkusza oraz szukanie po imieniu i nazwisku Trzeba oczywiście dostosować bazę danych i formuły do takiego rozwiązania :D np tak jak na zrzucie i w załączonym pliku :spoko: 1044835 1044836
W Excelu 2016 możesz użyć formuły: [syntax=text]=PODAJ.POZYCJĘ(PRAWDA;CZY.L...
Może spróbuj wyszukać przez "CtrlF"? W VBA będzie to jakoś tak: Dim r1 as Range Set r1 = Range("C1", Range("C1").End(xlDown)).Find("Szukane") If r1 Is Nothing Then ' nie znaleziono ...
http://obrazki.elektroda.pl/5044212000_1... http://obrazki.elektroda.pl/5044212000_1...
wyszukiwanie różnych słów
użyj formuły =wyszukaj.pionowo
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$10" Then Application.EnableEvents = False Range("A11:B" & Cells(Rows.Count, "A").End(xlUp).Row).ClearContents ow = 5 ok = Cells(1, Columns.Count).End(xlToLeft).Column x = Target.Row + 1 For k = 1 To ok Set a = Range(Cells(1, k), Cells(ow, k)).Find(Target, LookIn:=xlValues,...
"Mój tekst" Sheets("Arkusz2").Range("D4")
Funkcja(UDF) w Module1 Patrz przyklad.
Sprobuj Optional txt As String = "; "
Należałoby przeszukać sąsiadów w wierszu "wierszkontrahenta"... Taki efekt: http://obrazki.elektroda.pl/8119171000_1... uzyskałem przy pomocy [syntax=vb]Sub Szukaj() ilekontrahentow = 20000 ListaFirm = "nazwisko" 'symulacja wartości pola tekstowego wiersz = Worksheets("KONTRAHENT").Range("B3", "B" & ilekontrahentow) _ .Find(what:=ListaFirm,...
Użyj formuły [url=https://support.office.com/pl-pl/ar...
Proponuję użyć formuły jak na zrzucie :D 923279
Dlatego ze Frytek Grzegorz jeszcze nie pracowal Czekaj...
Czy ma ktoś jakiś pomysł na formułę która zautomatyzuje poszukiwania? Proszę o pomoc. W załączeniu Excel Rozważyłbym przeprojektowanie tej tabelki albo skorzystanie z tabelki przestawnej. Ale ok. Potraktowałem to jako challenge - powstała jednolinijkowa formułka ;) Zasada działania: iloczyn logiczny ze sprawdzenia miesiąca z dniem daje nam dzień albo...
Jeżeli działasz na tym pliku, to zmień wszystkie wystąpienia Arkusz5 na Arkusz4. Po tak "wylewnym" opisie problemu ciężko coś więcej powiedzieć... :]
Jeśli ma być odwrotnie, to pozamieniaj w kodzie "A" z "B" Też zadziała, ale... Edit: Jeśli powtarza sie wiele razy lepiej Sub UsunPowt() licz = 0 For i = 1 To Cells(Rows.Count, 2).End(xlUp).Row licznik = 0 For Each kom In Range("A:A") If kom.Offset(-licznik, 0) = "" Then Exit For If Cells(i,...
Czy w danym wierszu (nazwie grupy) da się ustawić funkcje, która będzie wyszukiwała czy pojawiła się wartość C1 lub C2 i zwracała datę? Tak, można tak jak na zrzucie znaleźć datę pierwszego wystąpienia jednej wartości :D jeśli w nagłówkach będziesz miała daty, a nie jakieś cyferki czy literki :!: 1017338
Trochę zmodyfikowałem, i tak: W arkuszu NUMERY KONT BANKOWYCH masz kontrahentów i tu możesz dodawać kolejnych, to jest Twoja baza kontrahentów, adresy konta itd. W arkuszu PŁATNOŚĆ w kolumnie PŁATNOŚĆ-SKRÓT wybierasz z listy kontrahentów i wprowadzasz FV. Z resztą sam poćwicz... Nie wiem po co Ci kolumna PŁATNIK:, no zawsze coś tam można wrzucić. ;)
Analogicznie [syntax=vb] For Each c In ActiveSheet.Range("C1:C22") ' przeszukiwanie If c = cc2.Value And Range("A" & c.Row)= cc1.Value Then wiersz = c.Row Exit For End If Next c [/syntax] Edit
Czy na pewno potrzebujesz makra? W załączniku formuła i przykład makra (pod przyciskiem). "Współrzędne" pobierane z L1, L2.
Dzień dobry, Excel nie jest dobrym narzędziem do przetwarzania tak dużej liczby danych w sposób złożony. Próbowałem zmodyfikować te formuły, tak aby możliwe było wielokrotne szukanie tych samych danych, ale to rozwiązanie jest mało efektywne, bo działa na wszystkie rekordy, a nie tylko te zwielokrotnione. Poza tym nie wiem ile może być tych powtórzeń....
Program masz "prawie" gotowy. Pomyśl, potrzebujesz odwołać się do Nr wiersza komórki spełniającej kryteria (tutaj zmienna "abc", zadeklarowana jako 'Range'). Będzie to wartość właściwości 'Row'. Następnie należy znaleźć lub określić Nr ostatniej w wierszu. Zadziałaj podobnie (metoda End), jak masz to z licznikiem pętli. Pozostaje przeliczenie (wymnożenie)...
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...
Zaproponuję taką funkcję: [syntax=vb]Function SzukajPracownika(Dzien As Integer, Zmiana As String) As Integer Sheets("Dane").Select ostw = Cells(Rows.Count, "A").End(xlUp).Row For x = 4 To ostw If Cells(x, Dzien + 2) = Zmiana Then SzukajPracownika = x Exit Function End If x = x + 1 Next End Function[/syntax] Zastosowanie: =SzukajPracownika(17;"108b")...
To naprawdę prosta sprawa. Przeanalizuj dostosuj do własnych potrzeb.
Uruchom makro i wybierz Makro1 / lub podepnij pod przycisk. Ja tylko wtrące że można prościej napisać to makro (zostawiając pomysł) [syntax=vb]Sub Makro1() Dim maxIndex, x, y As Integer maxIndex = Cells(ActiveSheet.Rows.Count, 2).End(xlUp).Row For x = 1 To maxIndex For y = 1 To maxIndex If Abs(Cells(x, 2).Value + Cells(y, 2)) < 0.01 Then Cells(x,...
To tylko makrem
Na przykład [url=http://www.elektroda.pl/rtvforum/vi... masz odpowiedź na swoje pytanie.
firma z przypisanym kodem z kolumny A kod_2 nie ma znaczenia? Dodano po 43 [syntax=vb]Sub kokos() Dim bs As Range, bd As Range, bt As Range Dim rs&, re&, rd& Set bs = Sheets(1).Range("A:J").Cells Set bd = Sheets(2).Range("A:D").Cells re = bd(Rows.Count, 1).End(xlUp).Row + 1 Range(bd.Rows(2), bd.Rows(re)).Delete bs.Sort key1:=bs(1, 3), key2:=bs(1,...
Wnioskuje że w jakimś okienku (ZaznaczForm) w polu (tbWartość) chcesz wprowadzać tekst (i tylko tekst). Tak? Może wystarczy tylko wykasować w linijce kodu wartość = Val(ZaznaczForm.tbWartość.Value) funkcję zmieniajacą "Val" czyli wartość = ZaznaczForm.tbWartość.Value Tylko jak to się będzie miało do większy mniejszy od jakiegioś innego tekstu wpisanego...
Czy da się coś zmienić w kodzie żeby to wykonywało się szybciej ?? 1. Na początek wyłącz wszystkie opóźniacze, które mogą rzutować na szybkość kodu: [syntax=vbscript] With Application .ScreenUpdating = False: .DisplayAlerts = False: .DisplayStatusBar = False .EnableEvents = False: .Calculation = xlManual End With [/syntax] Na końcu makra włączysz je...
A zwykłe WYSZUKAJ.PIONOWO nie wystarczy?
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
Witaj Ponieważ wiemy tylko zakres wejściowy jest nieznany, gdzie wynik, Załóżmy, że R3. znaleźć komórki z największą wartość - colrez=Application.WorksheetFunction.Mat... i skopiuj format do klatki wyniku R3 - Range("S3:AD3").Cells(colrez).copy Range("R3").PasteSpecial xlFormats Application.CutCopyMode = False Oczywiście...
Czyli ustawiasz kursor w którymś z wierszy, naciskasz przycisk i ma się dodać wg wartości w tym wierszu? Oj, żebyś żonie nie uprzykrzył ;) Nie rozsądniej byłoby zrobić to za pośrednictwem formularza? Wybierasz z pól kombi (stan w podglądzie) i dodajesz pod przyciskiem. Update 7:50 Coś jak w załączniku. W ostateczności wykorzystaj makra...
no Więc dobrze postanowiłem zrobić to sposobem, który zaleciłeś Markoz. Wyliczyłem, że bede potrzebowal około 3000 kombinacji czyli 3000 kolumn pomocniczych. Cos strasznie kombinujesz. W excelu nie wskazane jest rozbudowywanie arkusza na szerokość, bo to go strasznie spowalnia. Z tego co widzę bardzo mało znasz excela, a to sprawia, ze niewłaściwie...
Ponieważ zamknąłeś topik adamasa_nt i uważam że jest jak najbardziej trafione.
Zależy mi na tym, aby formuła w drugiej zakładce znalazła wiersze z wybranej daty, następnie znalazła użytkownika z tej daty (jeżeli by go nie było to wpis: BRAK) oraz aby w pierwszej komórce wpisała pierwsze logowanie do systemu, a w drugiej ostatnie z tej konkretnej daty. Formuły tablicowe (zatwierdzanie CTRL+SHIFT+ENTER): wejście: [syntax=text]=JEŻELI(MIN(JEŻELI(((Stycze...
Zamień w odpowiednim miejscu kod na poniższy: [syntax=vb] If b Like "[ ][ ]333" Then p4 = InStr(a, " 4") p7 = InStr(a, " 7") If p4 > 0 Then x4 = Mid(a, p4 + 1, 5) Else x4 = "" If p7 > 0 Then x7 = Mid(a, p7 + 1, 5) Else x7 = "" t = t & x4 & ";" & x7 & vbNewLine End If [/syntax] Wynikiem jest: 11406;42005;70005 11414;42005;79999 11423;44013;70001 11433;;70000...
Zarejestruj jeszcze wyszukiwanie tekstu (Ctrl+f), zamiast 'Activate/Select' wpisz 'Column' i przypisz do zmiennej. Powinno wyjść coś takiego p.kaczmarek2 . Do tego obsługa błędu, w razie nieznalezienia, oraz różne takie mniej istotne...
Ten plik działa prawie poprawnie. Jedyne, co mi się rzuciło w oko to brak nazwy magazynu na arkuszu. Powód: Range("J1").Select ActiveCell.FormulaR1C1 = x Range("H1:M1").Sel... "x". Wyszukiwanie arkuszy OK.
Nie bardzo rozumiem, masz listę użytkowników i nie umiesz znależć tego którego już znasz z loginu? Najprościej: zwykłe wyszukiwanie w tablicy (i co z tego, że to Excel). Jak wolisz po Excelowemu to użyj Range.Find i pobierz sobie wiersz (chyba to pionowa tablica?) i dalej to już proste. Jeżeli używasz pliku na serwerze to właściwie już jest to jakaś...
Sprawa dość prosta. Procedura zdarzeniowa arkusza "przy zmianie" Range(zakres).Find i przypisywanie...
Witam wszystkich. mam problem, nie mogę znaleźć żądnej funkcji która by wyszukiwała jedno wyrażenie (słowo) w jednym arkuszu i wyświetlałą je w drugim. Np. mamy tabele z 5 kolumnami i wyszukujemy w kolumnie 2 słowo np. "głowa" i w drugim arkuszu wyśiwetli wszystkie wiersze zawierające słowo "głowa" + dane mieszczące się obok np rozmiar itp. Bardzo prosze...
Pytania uściślające: - w której wersji Excela ma to działać (jeśli w kilku wersjach, to podać najstarszą), - jak rozumieć te kategorie wagowe, np. pozycja [syntax=text]0,9 kg 3,38[/syntax] oznacza wagę powyżej 0,4 kg do 0,9 kg włącznie, czy od 0,9 kg do 1,4 kg wyłącznie? - czy ustalenie kategorii wagowej ma służyć jeszcze do czegoś innego poza ustaleniem...
Takie wyszukiwanie jest możliwe lecz ... raczej nie za pomocą funkcji wyszukaj pionowo :cry: Można to zrobić np tak jak na zrzucie przy użyciu jednokomórkowych formuł tablicowych :spoko: 873542 Całość wraz listą wyboru wyszukiwanego klubu masz w załączonym pliku :D 873546 Ps. na zrzucie widać jeden błąd, który skorygowany jest dopiero w pliku :bye:
Witam, Mam uprzejmą prośbę o pomoc. Potrzebuje napisać makro w MS Excel, które będzie zaznaczać „ustaloną” liczbę takich samych (następujący po sobie znaków, w komórkach arkusza MS Excel). Potrafię napisać makro które będzie wyszukiwać i wyróżniać (np. innym kolorem tłą) takie same ”stringi”. Działający przykład w załączeniu....
Czy ktoś mógłby mi pomóc , poradzić jak się za to zabrać? Jeśli wszystko umieścisz w jednym skoroszycie, a następnie będziesz posługiwał się tylko "identyfikatorami", a nie gołymi nazwami miejscowości - to możesz rozwiązać swoje zadanie poprzez proste funkcje i dynamiczne nazwy zakresów wyszukiwania :spoko: - tak jak to widać na załączonym zrzucie...
Pobaw się tym.
Witam, staralem sie od 2 dni i po prostu nie dam rady zrobic aby to dobrze dzialalo. Mianowicie - chcialbym aby po kliknieciu przycisku znajdujacego sie w Arkusz1 excel zrobil cos na zasadzie dzialania funkcji wyszukaj.pionowo tzn pobral slowo wpisane w komórce A1 w Arkuszu1 i wyszukal w kolumnie A Arkuszu2 a nastepnie przypisal wartosc z tabeli z Arkuszu2...
Potrzebuję pomocy z makrem w excelu - Plik1/Arkusz1: Kolumna A - indeks artykułu Kolumna B - wynik wyszukaj.pionowo1 -> lokalizacja1 z Plik2 Kolumna C - wynik wyszukaj.pionowo2 -> lokalizacja2 z Plik2 itp Plik2/Arkusz1: Kolumna A - indeks artykułu Kolumna B - lokalizacja1 Kolumna C - lokalizacja2 itp Zwykłe wyszukaj pionowo działa ok, ale muszę to wrzucić...
Witam. Poszukuję jakiegoś rozwiązania na użycie funkcji wyszukaj.pionowo ale żeby zakres wyszukiwania był od końca * od ostatniego wpisanego elementu. A B 1 1 3 2 2 1 3 1 2 4 4 4 5 3 3 6 4 4 7 1 1 I chciałbym aby funkcja wyszukaj.pionowo powiedzmy dla wyszukiwanej 1 dała nam wartość z wiersza 7 a nie jak zwykle daje z wiersza 1 . Lub jaką ewentualnie...
Witam. Chciałbym stworzyć wyszukiwarkę produktów. Na razie korzystam z mało ciekawego rozwiązania. Wyszukuje produktu po ID za pomocą funkcji podaj.pozycje w innym pliku. Następnie za pomocą makra wyszukuje dany wiersz i kopiuje cały do arkusza. Niestety za każdym razem muszę modyfikować funkcję podaj.pozycję zmieniając nazwę pliku i skoroszytu. Plik,...
excel2003pl wyszukiwanie po kilku znakach / modyfikowanie / dodawanie nowych Witam poszukuję rozwiązania dla mojego problemu dotyczącego wyszukiwania mam listę osób i rozegranych z nimi pojedynków Przykładowa lista: osobawygralprzegralremis poddanyz kim gacek11200ozon pinki kajko rak44-3000kosa lipa rety taki_jaki0111fanty azory sepy Co będzie mi potrzebne...
Witam! Przyznam, że nie jestem nawet średniozaawansowany w Excelu. Muszę utworzyć kilkaset nowych wierszy w arkuszu. Posiadam plik z około 22000 wierszy. Na nowym arkuszu chciałem utworzyć jedną komórkę, w którą podawałbym wartość. Ta wartość miałby być odszukana w tym wielkim pliku (arkuszu) i miałaby pociągnąć wartości z kilku komórek (np. G,H,Z)...
Ale nie wiem jak to zrobić ??? Chodzi mi oczywiście o Private Sub Szukaj - aby znajdowało kolejne identyczne powtórzenia. Dziękuję za pomoc [syntax=vbscript][ Option Explicit] [syntax=vbscript]Private Sub Szukaj_Click() Dim kolumna As Integer For kolumna = 2 To Cells(2, Columns.Count).End(xlToLeft).Column Step 3 If UCase(WorksheetFunction.Trim(Cells(2,...
Witam, mam do dyspozycji excela 2010, komputer bez dostepu do internetu a tym samym do PQ. W pliku excela na zakładce nr 0 chcę mieć komórkę w której wpisuję odpowiednie ID i na jego podstawie wyświetla mi się miejscowość i nazwa ulicy przypisana do tego ID. ID (adresy) znajdują się w 3 zakładkach, ID zazwyczaj nie powtarzają się. Chciałem wykorzystać...
Witam, Panowie i panie potrzebuje pomocy przy Excelu a mianowicie chodzi o wyszukiwanie pionowe po dacie i kopiowanie danych na raport. Problem w tym że zależy mi aby kopiowane zostały 3 wiersze, czy jest taka możliwość ? Poniżej screen o co dokładnie mi chodzi :)
Dzień dobry Mam prośbę. Posiadam średniej wielkości bazę danych w excelu składająca się z 2 arkuszy i stworzyłem formularz do jej wypełnienia. W tym celu w formularzu mam multipaga i tam wstawione i oprogramowane pola tekstowe i kombi. Hmm mój problem to jak napisać kod by móc przeglądać też w formularzu zawartość bazy danych? Czyli jak stworzyć i oprogramować...
Dzień dobry, Czy jest jakiś sposób, żeby pobrać dane z innego skoroszytu Excel z wieloma arkuszami na podstawie parametru? Chciałbym, zeby kod/funkcja przeszukała konkrenty zakres wierszy w danej kolumnie, i jeśli tam znajdzie się odpowiednie słowo, zwróciła mi odpowiednie komórki znajdujące się w tym wierszu. Konkretny przykład: W miesięcznym rozliczeniu...
Witam, chcę stworzyć plik excel "consumer" w którym będę mógł zamieszczać poszczególne dane ( one w czasie będą dochodzić, zmieniać nazwę itd.). Zależy mi głównie na : 1. dodaniu przycisku WYSZUKAJ ( HLA50, czy HLA 50 - w celu szybszego wyszukania spacja nie powinna być brana pod uwagę), 2. jak wyszuka zaznaczenie całego wiersza na jakiś kolor, 3. automatyczne...
Witam, Chciałbym ułatwić sobie pracę w excelu i wpadłem na pomysł aby stworzyć coś na wzór automatycznego wyszukiwania interesujących mnie pozycji i przenoszenie np do oddzielnego arkusza lub usuwanie zbędnych komórek. Co dokładnie robię ? Musze przygotowywać refaktury dla drugiej firmy tym samym muszę pobrać załącznik w excelu gdzie mam wszystkie pozycje...
witam Mam taki problem Posiadam arkusz w którym mam powiedzmy w kolumnie A id produktu I w kolumnie C jego miejsce. W nowym skoroszycie tego arkuszu chcialbym po wpisaniu iD produktu automatycznie znalesc jego miejsce I wkleic w komorke np C W skrocie Po wpisaniu ID produktu Excel szuka w drugim skoroszycie czy takie ID juz jest A jezeli tak to importuje...
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...
Witam, w pliku exscla mam kilka arkuszy (każdej arkusz ma ten sam schemat danych), jak przefiltrować wszystkie arkusze i wydrukować wszystkie wiersze w których w kolumnie np E jest odpowiednia data.
Cześć, Potrzebuję rozwiązania, jak w temacie. Szukam w 1 kolumnie. Operacja powinna zakończyć się mrugającym kursorem w komórce, obok tej 1 konkretnej znalezionej z daną inf. Excel 2010. Jeśli coś potrzeba z mojej strony, proszę pisać.
excel wyszukiwanie excel wyszukiwanie wartości excel wyszukiwanie userform
mitsubishi carisma radio buderus pompa cyrkulacyjny odcięcie skoda
Saab 9-3 2.2 2004 – prawy przedni pas nie zwija się, czyszczenie i naprawa retraktora Renault Kangoo 1.2 16V D4F – lokalizacja cewki zapłonowej, coil-pack, przewody WN
