Ponieważ zamknąłeś topik adamasa_nt i uważam że jest jak najbardziej trafione.
Dopisz przed tą linią: debug.print .Shapes(.Cells(w, 1).Text).name naciśnij Ctrl+g uruchom makro. I co tam wypisało?
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()...
Fakt. nie mogę nigdzie znaleźć "wytłumaczenia" czemu tak się nagrało. Nie wiem czy widać po kodzie co chcę osiągalność. Chodzi o to ze po przefiltrowaniu po nr 756902 kolumna x ( wynik około 10 wierszy) chcę wyszukać pionowo w kolumnie y wartości z innego pliku i zwrócić nr_indeksu_kolumny. Wyszukaj pionowo nie działa poprawnie pewnie dlatego że nie...
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...
Pobaw się tym.
Sprawa dość prosta. Procedura zdarzeniowa arkusza "przy zmianie" Range(zakres).Find i przypisywanie...
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,...
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...
Czy datę zawsze będziesz miał w formacie dd-mm-rrrr?
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)?
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...
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)...
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, 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...
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ść,...
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...
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ą...
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ę...
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
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...
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! 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ą....
Cześć, Chciałbym stworzyć makro, które pobiera pewien zakres danych i wkleja do jednego pliku. Chciałbym, żeby to odbywało się automatycznie, gdyż dziennie takich plików jest około 120. 1. Pliki mają zawsze datę na końcu, czyli z dzisiaj było by ...31.10.2011.xls 2. Pliki zawsze są umieszczane w jednym folderze - np. c:\dane\ Zrobienie makra, żeby otwierał...
Witam ponownie. Jak przerobić makro by wyszukiwało wartości Z podanego Arkusza, ale tylko z jednej konkretnej kolumny np B
Witam serdecznie, mam problem z napisaniem makra, które zaznaczy mi w wybranym zakresie wszystkie niepuste komórki.
Nagraj makro.
Excel to nie BAZA, to tak na marginesie Miłego kopania się z koniem
Witaj, Być może tylko makro
SUPER! bardzo dziękuję Makro działa, tabela niestety nie ma racji bytu, ponieważ w kolejnych wierszach tabeli będą się zmieniały wartości czy nie zawsze będzie szukać B, a makro wyszukuje z całości jedną daną. Mam natomiast inne pytanie, czy mogę przekopiować to makro do innego skoroszytu? Pytanie banalne, no ale coś mi to nie idzie, jak pisałem wcześniej...
Z takim wyszukiwaniem tak do końca nie da się nagrać. Ale cała reszta jak najbardziej. Co do przeszukiwania makro przeszukuje tylko kolumnę A. Bo jakby szukało również w B byłyby duble - a przyznam że na chwilę obecną nie mam koncepcji na prosty kod jakby się przed tym zabezpieczyć. edit ----------------------------------------... A jednak wpadłem na...
A możliwe jest wykonanie takiej czynności za pomocą przycisku? Wiem jak podpiąć ale nie mam pojęcia jak dopasować przygotowane makro przechodzące do aktualnej daty.
Mam problem z przygotowaniem makra, który będzie wyszukiwał dane. W załączeniu zamieściłem przygotowany plik excel. Mam tam makro wyszukujące natomiast problem mam następujący - wyszukuje mi dane tylko po wpisaniu pełnej nazwa natomiast potrzebuję po fragmencie tekstu bądź jednego wyrazu (nazwy będą dość długie stąd potrzebuję coś takiego). Nie mogę...
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
właśnie o makro mi chodziło. Wielkie dzięki. Udało się mi się pewnie bardziej "skomplikowaną i zagmatwaną" metodą w VBA ale działa :) :)
Dzięki wielkie. Makro działa. Nazwiska, tak jak pisałeś mogą się powtarzać, a nawet często są takie sytuacje gdzie nie tylko, że nazwisko jest takie samo, ale i imię oraz stanowisko. Natomiast nt kadrowy jest unikatowy, a więc wstawiłem wyszukiwanie pod względem kolumny z nr kadrowym. Dzięki jeszcze raz
Czy mógłbyś wyjaśnić co ta Pani Paula oznaczyła w tym "generatorze" poprzez l, p, g, o, c :?: Wpisz sobie na początku makra ustawienie z deklaracjami "Option Explicit" to zobaczysz dlaczego makro tak długo działa :D
A dlaczego warunkujesz działanie działanie Textboxów w Arkuszu1 od stanu filtrowania w Arkuszu2 (który jest całkowicie pusty) ? Popraw makro w zapisie "Arkusz1" zamiast "Arkusz2" i będzie działać :D
W arkuszu "raport" zaznaczam jako aktywną komórkę E5. Naciskam przycisk "pokaż szczegóły" do którego podpięte jest makro i otrzymuję to co znajduje się w arkuszu "wynik kliknięcia".
ten kod miel byc w koncu makro 'kokos', po [syntax=vb] .Borders(re).Weight = xlThin Next End With[/syntax]
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.
Popraw kolego tytuł wątku - winno być wg mnie "VBA Excel wyszukiwanie danych" :?: Żeby zamieścić tu na forum plik xlsm musisz go skompresować do formatu zip, rar lub 7z :!: Co do Twojego makra i arkuszy to musisz wyjaśnić co to za wielkości umieszczone są w arkuszu1 w kolumnach D, E i F :?: i po co komplikujesz wszystko ustawiając w arkuszu1 minimalne...
W twoim makro podmień [syntax=vbscript]fndList = Array("*kin*", "*samoch*", "*kot*")[/syntax]
Witam, Potrzebuję makro, które po wpisaniu wartości w kolumnie A, wstawi wartości w tym samym wierszu w kolumnach B, C, D, E w oparciu o bazę w innym pliku, nazwijmy go "głównym". Ma to działać analogicznie do wyszukaj pionowo, ale odwoływać się do tablicy w innym pliku (makro otwiera plik główny, zaciąga dane i zamyka plik główny). Nie ma działać w...
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....
Witam, Mam bazę zawierającą kilka tysięcy wierszy, gdzie w kolumnie B znajdują się różne opisy książek, wśród których są słowa kluczowe np. przygodowa, historyczna itd., po których ma być ustalana kategoria. Niestety słów jest kilka do każdej kategorii (np. thriller, kryminalna, sensacyjna, dreszczowiec itd mają być kategorią "książki akcji") i słowa...
skopiuj wartości z komórek od M do R i wklej do kolumny C :?: :cry: Jak to chcesz zrealizować ? Wklejanie pięciu wartości komórek do jednej :D i to do kolumny z loginami :?: Do czego Ci potrzebne wyszukiwanie pionowe ? Znasz ograniczenia tej funkcji ? W Twojej tabeli w kolumnie C na pewno nie powtarzają się loginy ? Zrób i pokaż przykładowy plik z...
Czasem pomaga skopiowanie całej zawartości arkuszy, elementów VBA do nowego pliku (Ctrl+c, Ctrl+v) Spotkałem się też z podobnym zjawiskiem przy makro kopiującym spory zakres, zdefiniowany "z górką" (dużo pustych wierszy/komórek). Gdy w v2003/2007 szło to bardzo sprawnie, v2013 "myśli" nad tym denerwująco długo. O dziwo: im więcej pustych, tym makro...
Witam, Twój przykład „trochę” minie zainteresował ;-) Jestem pewien, że czasem droga przez „formuły w arkuszu” jest nieco trudniejsza niż droga przez napisanie makra w MS Excel. Aby wszystko było jasne ;-) – jakiś 1- 1,5 roku temu też mi się wydawało, że najlepszym rozwiązaniem jest formuła warunkowa wpisana w komórkę arkusza...
Hey, Zauważ, że w pliku 'stany magazynowe' masz 'symbol elementu' i 'numer seryjny' przenoszone z konkretnej komórki z pliku 'komponenty', a wartości 'na stanie' i 'potrzeba' masz wpisane z palca w pliku 'stany magazynowe' co oznacza, że jeżeli zaczniesz segregować materiały w arkuszu 'komponenty' to w arkuszu 'stany magazynowe' wszystko Ci się rozjedzie...
Jest kilka kolumn z nazwą "cena" ( np. C,F,K,O) i są opisane w wierszu 1. Szukalem odpwiedniego makro i krok po kroku stworzylem takie cos. Jak masz jakies rady to chetnie wyslucham.
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
Jeżeli arkusz ma być eksportowany do nowego pliku, to lepiej zrezygnować z formuł (będą się łącza za nim ciągnąć) i zrealizować wyszukiwanie w makro (metoda Range.Find, lub w pętli). p.s. Jeśli umieściłeś makro w module, zastosuj precyzyjne odwołania (arkusze). Przycisk przyciskiem, ale łatwo "wdepnąć"...
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...
w zalaczeniu przesylam jeden z lzejszych plikow, dokleilem kolumne Prawy 9 znakow ale jest problem zeby prownywal z ta kolumna dolozylem tez warunek, ale wkleja mi zawartosc tylko 1 komorki jakby jeszcze sie dalo zamiast kopiowac funkcje do wszystkich komorek w kolumnie stworzyc jakies makro ktore by to robilo automatycznie az do znalezienia pustego...
Nie ma przykładowego pliku :cunning: , więc można Ci tylko udzielić ogólnikowych rad :D : 1. Przeszukaj zasoby Elektrody nt filtrowania danych :idea: ; 2. Rozważ czy konieczne jest filtrowanie - może wystarczy tylko wyszukiwanie potrzebnych wierszy ze wszystkich arkuszy do arkusza zbiorczego :?: np jak w poście https://www.elektroda.pl/rtvforum/viewto...
Proponuję wykorzystać rejestrator makr. Bez większej znajomości VBA można doskonale sobie poradzić. Przykład: 1. Nagrywam makra wstawiania i kopiowania wiersza. Wychodzi coś takiego nagrane 'Ctrl+strzałka w dół'[syntax=vb]Sub Makro3() ' ' Makro3 Makro ' ' Selection.Find(What:="Odżywianie", After:=ActiveCell, LookIn:=xlFormulas _ , LookAt:=xlWhole, SearchOrder:=xlByRows,...
Witam, moim problem jest wyszukiwanie za pomocą danych. Identyfikatora, nazwiska, imienia. Stworzone makro wyszukuje odpowiednie dane po czym one znikają i przeszukuje dalej.Mi zależy, aby można było wpisać tylko Identyfikator lub nazwisko lub imię. Czy ktoś naprawi mój błąd lub pokaże inne rozwiązanie?
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...
excel makro wyszukiwanie excel makro wyszukiwanie komórki makro wyszukiwanie
lexia sterowniki interfejsu historia wyszukiwać nokia 2700c
harman kardon hk3470 harman kardon hk3470
Kondensator Unitra WS 432: Czy większa pojemność oznacza uszkodzenie? Ekspres Nivona: Komunikat "Podłącz spieniacz" - przyczyny i rozwiązania
