Tak się składa, że niedawno robiłem dla naszych finansów coś podobnego. Program, po uproszczeniu, w załączniku, może jakoś Cię natchnie. ;) Zamiast kopiować do innej zakładki - grupuje pasujące linie. Dla 5000 linii jak w przykładzie działa u mnie, po drobnej modyfikacji, ok. ~4s (przy ~260s dla poprzedniego makra). Być może zmiana Range() na Cells()...
Mogę zmienić, by wszystkie nazwy były takie same w obydwu plikach. Nie możesz, tylko musisz - jeżeli makro ma coś wyszukiwać i dopasowywać po nazwie, taka "radosna twórczość" jest niedopuszczalna. W Prod.xlsx - tabele w Sheet1, Sheet2 i Sheet3 najlepiej, żeby zaczynały się w tych samych komórkach (wiersz, kolumna). Liczba tabel (arkuszy) jest stała...
Witam, Ja znam i używam jednej z czterech metod wyszukiwania danych. 1. z wykorzystaniem funkcji FIND() 2. z wykorzystaniem pętli FOR 3. z wykorzystaniem pętli FOR EACH 4. (niezałączona) z wyszukiwaniem binarnym na posortowanych danych Trzy z nich załączam w pliku "testowym". Znajduje się w nim 10.000 losowych, nieposortowanych rekordów: firma, miasto,...
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)...
Z czasem przy większej ilości danych makro spowalnia. Może jest jakiś lepszy sposób. Tak. Uzyć bazy danych, którą Excel nigdy nie był, nie jest i nie będzie
Pytanie dot. [url=http://www.elektroda.pl/rtvforum/to... Mam problem z przerobieniem tego makra. Chodzi o to, że u mnie dane są przesunięte. Nie występują też przerwy w przeszukiwanych danych, ale to najmniejszy problem. W załączniku przestawiłem dane w Arkuszu 2 - chodzi o to, że nie wiem jak to makro przerobić, by baza była przeszukiwana...
problem zaczyna się jak mam w pliku bez nazwy stary, nowy No to jak jednak nie jest tak wszystko ładnie popisane w pliku źródłowym :cry: to możesz spróbować sformułować wzorzec wyrażeń regularnych i na tej podstawie wyszukiwać (wypisywać) interesujące Cię stringi - przykład takiego makro masz w linkowanym poście :ok:
Nagraj makro.
... jak masz zamiar je wybierać? ... z tym mam problem ... Nie masz żadnego - po prostu w dodatkowym arkuszu ("konfiguracyjnym") w pewnym zakresie komórek (np. kolumny "A") wpiszesz sobie jeden pod drugim owe nagłówki do wyszukiwania. Makro będzie pobierać nazwy nagłówków (z tego zakresu) i wyszukiwać je w pętli po pierwszym wierszu arkusza z tabelą...
Cześć, mam problem, którego nie potrafię rozwiązać. Mianowicie potrzebuje narzędzia, które będzie wyszukiwać zakładki w pliku excel po jego nazwie. Powinno być to w formie MsgBox. Np. mamy plik jak w załaczniku i chciałbym, żeby odrazu po uruchomieniu wyskoczył MsgBox, gdzie możemy wpisać interesujacy nas arkusz i otwiera się on po potwierdzeniu komunikatu....
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.
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...
To tylko makrem
Pierwsze makro - czy ma znajdować jedynkę w tekście, który może być dłuższy, czy też wyszukiwać komórki tylko z jedynką, a komórki gdzie jest coś więcej ignorować?
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....
Ponieważ zamknąłeś topik adamasa_nt i uważam że jest jak najbardziej trafione.
Jeśli znaki "<" oraz ">" występują tylko jako "nawiasy" znaczników i nigdzie więcej, to można w prosty sposób skorygować pętlę Do , umieszczając warunek i polecenie wyjścia z pętli wewnątrz niej. Rezygnujemy wtedy z tablicy i określamy początek i koniec fragmentu do pogrubienia wg wspomnianych znaków.
Ja widzę tutaj makro w roli głównej, ale będę w stanie dopiero późnym wieczorem jakoś pomóc - chyba że ktoś inny wyczaruje coś na formułach (ale biorąc pod uwagę, że z lewej tabeli trzeba wyszukiwać nie tylko datę, ale również kod produktu w tym samym czasie - ja sobie rozwiązanie z formułami odpuszczę i zobaczę makro).
ok a mogłbyś mi jeszcze zdradzić o co chodzi z tymi cyferkami w kolumnach E F? ;) Dodano po 1 A czy stworzenie makra do tego problemu byłoby jakieś skomplikowane?? Dodano po 8 Listę zrobiłem w Arkusz3... http://obrazki.elektroda.pl/8420184500_1... jak stosuję tę funkcję to nie zwraca mi numerów bo rozumiem że ma wyszukiwać numer i zwracać...
Witam, mam ogromna prosbe czy mógłby ktoś mi pomóc/podpowiedzieć w zmodyfikowaniu makr. 1. W załączonym skoroszycie jest jeden arkusz główny <BAZA> i kilka arkuszy pomocniczych np <SM_S_M>, (ich liczba lub nazwy moga się zmieniać). Do każdego z "Arkusza pomocniczego" podpiete są makra które mają za zadanie skopiować zawartość zamknietych...
Witam If Left(Cells(w2, k).Value,6) = lista(licznik_petli) Then
W takim razie to InStr zwróci Ci pozycję w ciągu i to należałoby wykorzystać...
Nie doczytałeś jak działa obiekt [url=http://msdn.microsoft.com/en-us/lib... - drugim parametrem w nawiasie nie jest pozycja ostatniego znaku, a ilość znaków które mają zostać wzięte (długość). W związku z powyższym, musisz to przerobić na: [syntax=vb]kom.Characters(i, j - i + 1)...[/syntax]
Co masz na myśli pisząc "karta"? Dla arkuszy skoroszytu można zagnieździć kod w kolejnej pętli For ark = 1 to thisworkbook.sheets.count ' lub liczbowo indeksy Np 2 To 4 sheets(ark).select 'kod Next
Cześć, nie jestem biegły w VBA i zwykle swoje makra tworzę przez nagrywanie. Potrzebuję makra, które będzie wyszukiwać pierwszy wolny wiersz, zaznaczy zakres kilku kolumn (np. od A do B) i będzie sumować wartości. Cały szkopuł jest w tym, że dane, które będą sumowane miewają różną liczbę wierszy. Dlatego nagranie sumy nie zdaje egzaminu, bo zawsze sumuje...
Każda para ma działać jak dwa wzorcowe przyciski: jeśli jeden jest aktywny to drugi nie. Oczywiście mogę utworzyć sześc kolejnych przycisków... a co jeśli tych par będę chciał mieć np 100? To trzeba przemysleć na etapie budowania arkusza. Jeśli miały być dwa przyciski, to są dwa przyciski. Wcale tak jednak być nie musi. Można osadzić w arkuszu JEDEN...
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...
Dzień dobry, Potrzebuję pomocy z Makro, które będzie mi sprawdzało czy w jakimkolwiek pliku .xls w katalogu np. "D:\testy" znajduje się wartość taka sama jak w głównym pliku. W załączniku umieszczam przykładową strukturę plików Głównym plikiem w którym makro chciałbym aby działało jest plik "raport.xls", który powinien sprawdzić we wszystkich plikach...
Wyobraź sobie, że lekarz, który bez wiedzy na temat choroby próbuje ktorze leki mogą pomóc Tylko ja moimi próbami nikogo nie zabije... ewentualnie sam się rzucę pod pociąg jeżeli mimo usilnych prób nadal nie będe mógł wymyślić co robię źle. Ja na to mówie reverse engineering. Wole odpalić skomplikowane makro i debugować je krok po kroku próbując zrozumieć....
Makro wykonujące obydwie czynności może wyglądać np. tak: Private Sub CommandButton1_Click() poprz_wartosc = Empty For Each c In ActiveSheet.Range("C1:C6553... 'tu można zawęzić przeszukiwany zakres If c = "dolek" Then ActiveSheet.Cells(c.Row, 4) = poprz_wartosc If Not IsEmpty(poprz_wartosc) And...
Witam, Nagrałem makro w którym wyszukiwane są dane z innego pliku za pomocy funkcji wyszukaj pionowo. Podczas nagrywania funkcja znalazła dane i wstawiła do innego pliku, po zapisania makra i ponownym uruchomieniu formuła zwraca zupełnie inne wartości. Może ktoś sprawdzić kod i powiedzieć co jest źle? Poniżej przesyłam kod: [syntax=vb]Windows("1.xls").Activate...
Witam serdecznie. Ogólnie :mam problem z napisaniem małego makra, które po wpisaniu szukanej wartości w jednej komórce, wyszukiwałoby daną wartość w innym arkuszu wraz z wartościami z nią powiązanymi (wszystko w tym samym wierszu) i wyświetlaniu tych wartości w pierwszym arkuszu. Troche to zamotane więc już wyjaśniam. Mam 2 arkusze: jeden to "wyszukiwarka"...
Witam Znowu potrzebuje pomocy :(. Musze napisać makro które będzie pobierało dane z arkusza o nazwie DATA do pierwszego arkusza w czasie rzeczywistym bez klikania ikon. Czyli jak w arkuszu pierwszym w pierwszej kolumnie ktoś wpisze "KOZA" to makro wyszuka liczbę kóz z arkusza DANE i wpisze ją w drugą kolumnę w pierwszym arkuszu. Jak wpisze DOM to wyszuka...
Witam Potrzebowałbym bym pomocy do tego co chciałbym zrobić, niestety nie posiadam jeszcze wystarczających umiejętności by zrobić to samemu. Zapewne potrzebuję funkcję połączoną z makrem, które zapętli ją, tak by wszystkie dane w całej kolumnie były przeszukane i wypełnione. Niestety zwykły VLOOKUP tutaj mi nie pomoże, a nie jestem w stanie sam dojść,...
Witam, mam makro sprawdzające wiersze w arkuszu Excel. Działa dobrze, jednak chciałbym aby jednym przyciskiem, który mam na Arkuszu1 program sprawdził wiersze w arkuszach w zakresie "Arkusz4:Arkusz36". Teraz muszę wklejać przycisk w każdym arkuszu, żeby zadziałało. Oto moje Makro: Sub przelicz() Const max As Integer = 36 Dim i As Integer i = 26 Rows("26:36").Select...
Cześć Od kilku dni rozkminiam makro, które pomoże mi zautomatyzować pracę. Co tydzień pobieram dane z różnych arkuszy kopiując do jednego arkusza. Żmudne i nudzące zajęcie. Nie jestem programistą, ale z pewnością da się to jakoś ogarnąć makrem. Dla zobrazowania pokazuję fragment pliku. To czego potrzebuję to: - w jednym arkuszu (w przykładzie jest to...
Witam proszę o poradę jak stworzyć makro, podam kolejność jak miało by funkcjonować: w exelu mam przycisk (Wyszukaj) pod który można przypisać makro i w arkuszu np. WPROWADZANIE mam zaznaczone jedno okienko np. B2 - tutaj mam wpisać jakieś nazwisko np. Kowalski, potem musiałoby przeszukać kolumnę np. B w nowym arkuszu pod nazwą EWIDENCJA i jeżeli by...
Cześć, Potrzebuje pomocy, a mianowicie czy da się napisać makro, które będzie szukać wartości funkcją vlookup z innego pliku, który chciałbym wybrać z folderu, a następnie dla N/A szukać wartości z innego, który też chciałbym wybrać. Dodatkowo, żeby dla wyszukanych wartości z pierwszego pliku zmieniało nazwę na "Tak", a z drugiego dla znalezionych wartości...
Witam, poszukuje makra które w przypadku gdy wartość w kolumnie e=0 usunie komorki z kolum a-e w danym wierszu i przesunie dane do góry byłabym wdzięczna za pomoc
Witam, Czy istnieje możliwość napisania w MS Excel makra, które będzie działało zgodnie z poniższym schematem: 1. W skoroszycie istnieje arkusz Jacek oraz Placek 2. W arkuszu Placek w zakresie A1:K500 występują wartości całkowite, które mogą się powtarzać 3. W arkuszu Jacek w kolumnie "W" istnieją wartości całkowite unikatowe - nie powtarzające się...
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
Witam ponownie. Jak przerobić makro by wyszukiwało wartości Z podanego Arkusza, ale tylko z jednej konkretnej kolumny np B
Hej, Potrzebuję zrobić makro, aby filtrowało mi dane po dacie z ostatnich 30dni. Szukałem podobnych tematów na forum, ale niestety nie znalazłem nic co by mi pomogło/zadziałało. Z góry dzieki za pomoc Pozdrawiam
Witam. Potrzebuję makra które pomoże mi w odświeżaniu plików. Mam następujące pliki: SUMA Tabela 1, Tabela 2, Tabela 3, i tak do Tabela 100 Zmienne 1, Zmienne 2, Zmienne 3, i tak do Zmienne 100 Potrzebuję makra które otworzy na stałe plik SUMA (w nim są dane wyjściowe i zbiera wyniki po obliczeniu w plikach Tabele i Zmienne) i następnie zestawy plików:...
Przez COVIDA znalazłem się na zastępstwie i muszę przygotować temat inwentury w firmie. Będą ją robić ludzie, którzy nie znają dobrze asortymentu i chcę im ułatwić i przyspieszyć pracę. Szukałem takiego tematu na forum, ale nie znalazłem, a sam nie ogarnę tego niestety... Niestety jestem zielony w tworzeniu makr, a pilnie potrzebuję makra, które pozwolą...
Z czym dokładnie masz problem? Nie napiszemy całego skryptu za Ciebie. Pokaz, co już masz, a wtedy doradzimy. Kolumnę zaznacza się tak: [syntax=vb]Columns(2).Select[/syntax]
Witam! Szukam już dłuższy czas i niestety nie potrafię znaleźć rozwiązania: Poszukuję sposobu, aby w momencie otworzenia skoroszytu pokazały się wszystkie zależności - chodzi mi dokładnie o "strzałki" łączące komórkę z komórką z której bierze dane. https://obrazki.elektroda.pl/2613292500_... Nie ważne czy formułami, makrem czy w jakikolwiek...
Witam wszystkich . Otóż mam problem następujący potrzebuje makro ,które sortowałoby wyszukane rekordy po nazwie i kopiowało do innego arkusza , najlepiej żeby było z oknem do wpisania tego co jest potrzebne. Nie zawracałbym tym głowy gdybym miał chociaż elementarną wiedzę. Niestety jestem totalnym laikiem w tej kwestii a znajomość excella mam podstawową....
Witam, Nie mogłem znaleźć nigdzie satysfakcjonującej odpowiedzi na dręczący mnie problem makra. Mianowicie, prowadzę magazyn za pomocą excel. Wprowadzamy dane skanerem, ale przy wydawaniu, wyszukujemy konkretny numer etykiety poprzez Ctrl + F a następnie zaznaczamy kolorem żeby potem zastosować filtrowanie przez kolor komórki. Teraz chciałbym zrobić...
W twoim makro podmień [syntax=vbscript]fndList = Array("*kin*", "*samoch*", "*kot*")[/syntax]
Tu masz poprawki :)
Wartości ujemne: Najlepiej skorygować przy imporcie, wystarczy kilka poprawek w istniejącym makro[syntax=vb]Sub kopiuj_z_pliku() Dim kom As Range Windows("plik importu.xlsm").Activate 'wskazane wybranie właściwego arkusza Range("A2:K1000").Select Selection.Copy Windows("rozliczanie palet.xlsm").Activate Sheets("Import").Activate 'dodałem Range("A3").Select...
Następnym razem jako przykład załącz skoroszyty Excela a nie zrzuty ekranu. Przetestuj kod: [syntax=vbscript]Option Base 1 Sub podziel_autorow() Dim tblTmp() As String Dim lLstRw& Dim i&: i = 1 Application.ScreenUpdating = False lLstRw = Cells(Rows.Count, 1).End(xlUp).Row Columns(3).EntireColumn.Insert Cells(1, 2).Value = "autorzy" Cells(1, 3).Value...
Dodałem opcję czyszczenia.
Niestety nie działa :/ Oczywiście, że działa ;) Sprawdza wszystkie komórki w zakresie S340. Innego nie podałeś. Do sprawdzenia zakresu >1 komórka należy zastosować pętlę: [url=http://dzono4.w.interia.pl/kurs/for... Szukanie wolnej komórki: Włącz rejestrator makr i nagraj kilka kombinacji Ctrl+strzałka (w dół/górę). Najlepiej z wypełnionymi...
Pobaw się tym.
Użyj VBA, zacznij od makr.
O! Ktoś mnie wyprzedził :) http://obrazki.elektroda.pl/7119706200_1...
Wszystkie te 3 punkty zrealizujesz nagrywając makro.
Czy na pewno potrzebujesz makra? W załączniku formuła i przykład makra (pod przyciskiem). "Współrzędne" pobierane z L1, L2.
Witam, przepraszam za przerwę ale inne obowiązki musiałem wpierw rozwiązać, wracając do tematu plik zawiera dane które spływają z innego pliku lecz czasem zdarza się że trafiają tam dane o takim samym numerze więc dla porządku i by nie trzeba było szukać dwóch o takim samym numerze dobrze by było by makro po wykryciu dwóch o takim samym numerze po prostu...
Panie Macieju, Bardzo dziękuję za wyjaśnienia. Pana post sprawił, że wzbogaciłm się o bardzo cenną wiedzę. Działa - Bardzo dziękuję za pomoc! Czy wyświetlanie kolumny od aktualnej daty (przy założeniu że w wierszach są daty DDMMRRRR) jest możliwe bez makro?
Taki zapis nie będzie działał, ponieważ suma ma dotyczyć tylko kolumny dane!E:E, nie można mnożyć wartości tekstowych (błąd LICZBA!).
Czy datę zawsze będziesz miał w formacie dd-mm-rrrr?
Próbuje napisać makro, ale z uwagi na brak wiedzy odnośnie najprostszych poleceń nie umiem sobie poradzić. Wydaje się, że makro jest dosyć proste. Mianowicie: 1.Istnieje ciąg wyrazów w arkuszu A (CEL) 2.Po tych wyrazach przeszukuje arkusz B (BAZA) 3.Gdy znajduje to kopiuje wartość stojącą przy wyrazie w arkuszu B. 4.Wstawia ten skopiowany wyraz w kolumnie...
Potrzebuję makro, które pomogło by Jeśli chcesz gotowy, staraj się nie powodować niepotrzebnych prac, temu kto by mogł pomoc. Które naprawdę powinny być format pole 'numer artykułu ' bo na jednej stronie to tekst(arkusz1) na inny numer(arkusz2)?
Moim zdaniem, tu tylko z pomocą makro.
Witam, Stworzyłem plik EXCEL z makro, który wyszukuje po kolumnie automatycznie filtrując - pokazując przefiltrowanine dane. Problem polega na tym że jak chce wpisać do textboxa z drugiej kolumny program zaczyna szukać po tej kolumnie pomijając filtr z pierwszego textboxa. http://obrazki.elektroda.pl/3810156800_1... Czy jest możliwość...
excel makro wyszukiwać excel makro wyszukiwać komórka makro wyszukiwać
attiny zablokowana wymiana kabel telefoniczny zwieranie przekaźnika pompy
schemat migajaca dioda p1445 citroen
Czy statecznik metahalogenowy działa z lampą rtęciową? Warystor 275V w zasilaczach: ochrona przed przepięciami