Witam. Chciałbym użyć formuły wyszukaj pionowo, ale ona działa tylko w momencie jeśli w komórce znajduje się dokładnie taki sam tekst jak w kolumnie gdzie szukam. W jaki sposób zrobić maskę (tak jak w filtrze używa się znaku *) żeby wuszykiwał dowolną cześć tekstu? Próbowałem w taki sposób =WYSZUKAJ.PIONOWO(("*"...
Witam Mam pewien problem, napisałem proste macro które kopiuje dane z komórki gdzie umieściłem funkcje wyszukaj pionowo. Kopiuje sam tekst do innej komórki jednak podpinając wyszukaj pionowo pod nową komórkę nie wczytuje danych, jeżeli napiszę racznie to samo wyświetli porządany wynik. Czy ktoś ma jakiś pomysł? Pozdrawiam
Cześć Proszę o pomoc bo mi już czacha dymi i w kozi róg sam się zapędziłem, a wydaje mi się że rozwiązanie jest proste jak dziadowski bicz , tylko ja sam niepotrzebnie sobie wszystko komplikuję. Mam tabelę1 w Arkuszu 1. Kolumna pierwsza "lp" zawiera rekordy z wartościami od 1 do 10.Mogą się powtarzać. W kolumnie drugiej "tekst" są wartości typu tekst...
Witam, Podpinam się do wątku, ponieważ potrzebuję pomocy do stworzenia kodu VBA działającego podobnie do kombinacji wyszukaj poziomo i połącz teksty, ale zwracającego komórki zawierające wybrany fragment tekstu. Makro ma robić pętlę po wszystkich kolumnach, aż do ostatniej wypełnionej i zwracać komórki zawierające np. nazwisko lub słowo np. raport oddzielając...
Nie wiem co to są tez dziwne teksty i dlaczego umieściłem je w tablicy. Czy nie powinienem ich brać z arkusza Baza? Temat dałam taki żeby nakierować osobę o co mi chodzi, mogłam też zmylić, za co przepraszam. Pozwoliłam sobie zmodyfikować kolegi PRL makro. :D Nie wiem co to są tez dziwne teksty i dlaczego umieściłem je w tablicy. Czy nie powinienem...
Po powrocie do domu zrobię taki testowy arkusz w którym będzie oznaczone o co mi chodzi. Dodano po 4 Także wygląda to tak. Arkusz1 Wiersz 1 - tak wygladaja moje dane wejsciowe do których bym chciał dodać znaczniki (;?) (;?;) itp. Dlaczego sredniki? A to glownie po makro jezeli mialoby ono być wykorzystane (w arkuszu drugim jest rozpisane to samo jak...
Witam, Z VBA dopiero raczkuję i nie wszystko jeszcze rozumiem. Mam pewien problem i nie wiem jak do niego podejść. Sądzę, że najrozsądniej byłoby wykorzystać makro. Oto mój problem: Mam w bazie pozakładane pozycje, które posiadają Indeks (wewnętrzy) oraz nazwa produktu zawierająca symbol producenta. Jeden z dostawców zmienił całkowicie swoją bazę min....
Witam, mam wielką prośbę o pomoc. Potrzebuję stworzyć makro, które będzie podmieniało wartości komórek w kolumnie w zależności jaka wartość tekstowa zostanie znaleziona. Przykład: Mam komórki które zawierają: Dobre_Kino Kina Super_kino_ Samochodu Jadę Samochodem KOTEK Dla_kota Makro powinno wyszukiwać ciągi tekstowe: "kin", "samoch", "kot" i tak gdzie...
Jeśli to wszystko jest w jednym skoroszycie, to możesz użyć też funkcji ADR.POŚR. Jej argument podaje się w formie tekstu, więc można go złożyć z kawałków. Ale użycie tego spowalnia trochę działanie funkcji, więc zależy ile masz tych danych do przeliczenia. Mogłoby to wyglądać np. tak: [syntax=text]=WYSZUKAJ.POZIOMO(D3;ADR.PO... " & A1 & "'!36:62");2;FAŁSZ)[/syntax]...
do tego celu lepiej jest wykorzystać jakaś baze danych stworzoną np w Akcesie w excelu będziesz musiał oddzielić ogladanie takie bazy od wpisywania danych Oglądanie za pomocą funkcji: wyszukaj.pionowo, wyszukaj poziomo lub index a do wprowadzania stworzysz albo jakiś formularz albo np w każdym arkuszu będziesz miał dane na dany miesiąc i tam bedziesz...
[syntax=vbscript]Sub Dzialaj() Application.ScreenUpdating = False Dim Tekst As String Sciezka = "C:\PlikiExcela\" Tekst = "mój tekst" Plik = Dir(Sciezka & "\*.xls*") While Plik <> "" Call Wyszukaj(Sciezka & Plik, Tekst) Plik = Dir() Wend Set fso = CreateObject("Scripting.FileSystemObject... Set s = fso.GetFolder(Sciezka) For Each p In s.SubFolders...
Potrzebuję makro do wyszukania tekstu w komórce dynamicznej i zaznaczenie całej kolumny do której należy ta komórka. Proszę o pomoc.
Spróbuj: [syntax=vbscript]Option Explicit Sub wyszukaj() Dim tablica() Dim ostwiersz, petla, szukajwiersz As Long Dim szukana As String ostwiersz = Sheets("9.18").Cells(Rows.Count, 3).End(xlUp).Row Sheets("9.18").Cells(1, "e") = "reverses" ReDim tablica(2, ostwiersz - 1) For petla = 1 To ostwiersz - 1 tablica(1, petla) = Sheets("9.18").Cells(petla +...
[syntax=vbscript]Sub Zawiera() Sheets("Arkusz1").Select a = InputBox("Podaj tekst do szukania: ", "Wyszukaj") ow = Cells(Rows.Count, "A").End(xlUp).Row y = 1 For x = 1 To ow If InStr(1, Cells(x, 2), a) > 0 Then Range(Cells(x, 1), Cells(x, 2)).Copy Sheets("Arkusz2").Range("A" & y) y = y + 1 End If Next End Sub [/syntax] Poniżej bez rozróżniania wielkości...
Bardzo proszę o pomoc. Oto moje makro sub makro1() Dim funkcja1 As String funkcja1 = Range("H17").FormulaR1C1 Range("H20").Formula = "=" & funkcja1 end sub Dla potrzeb tego postu uprościłem to zagadnienie do maksimum. W H17 jest tekst, który chciałbym zamienić na funkcję. Oto jakie mam efekty.... 1. jeżeli w h17 wpiszę: 2+2 makro działa ok 2. jeżeli...
Chcę zrobić makro które wyszuka dany fragment tekstu i zamieni go na podany w danej komórce. Nagraj sobie makro z przeprowadzania procedury systemowej "zamień (ctrl+H)" i w odpowiednie miejsca wprowadź swoje comboboxy :idea:
Jest. Tworzysz nowy "arkusz" - okno dialogowe. Na nim umieszczasz pole edycyjne. Do przycisku OK, który jest domyślny przypisujesz makro, które wyszuka teraz pole w arkuszu z danymi o tym samym tekście i zmieni jego format oraz w kolumnie kolejnej wpisze aktualny czas. Kod ogarniesz praktycznie rejestratorem makr.
Mam w tych plikach faktury w postaci tekstowej. Trochę to dziwne :D Faktury w postaci tekstowej :?: Z jakiego to programu wyeksportowane ? załącz przykładowy plik. Potrzebuję, aby makro Excela otwierało te pliki tekstowe jeden po drugim i wstawiało w określone miejsca pliku nowy tekst, by powstała korekta faktury Konieczny byłby szablon takiej faktury...
Witam, otóż tak: Chcę aby Makro: - Wyszukało frazę, powiedzmy "dane" - cały tekst po "dane" aż do ustalonego znaku pwoiedzmy ":" zostaje kopiowany - skopiowany tekst zostaje wklejony we wskazaną komórkę. Super by było gdyby ktoś to ogarnął :) dzięki z góry
No i będzie dyskutować... :] W załączniku masz przykład, kliknij sobie. W kolumnie C dopasuje pełne nazwy do skrótów w kolumnie B. Jak już to zrobi, to skopiuj gdzieś obok kolumny B i C, zamień je miejscami, a w (pustej) kolumnie B użyj funkcji WYSZUKAJ.PIONOWO, żeby wyszukać po pełnej nazwie skrót. Już Ci nawet do drugiego arkusza przykład wstawiłem...
Są różne sposoby na znajdowanie ostatniego pustego wiersza, mój ulubiony jest taki: widoczną komórkę w kolumnie B wypełnioną tekstem, idąc od ostatniego wiersza w górę. Liczba 1048576 to ostatni wiersz excela 2007, dla kompatybilności z 2003 należało by użyć 65536. Przed wykonaniem sprawdzania poleceniem ShowAllData próbuje się zdjąć kryteria autofiltra...
Nie krzycz tylko napisz powoli o co ci chodzi. Chodzi o wpisanie albo funkcji, albo makro... WŁĄSNIE POTRZEBUJE MAKRO Zdecyduj się. WYSZUKAC TO I JA UMIEM ALE TO NIE JEST TAKIE PROSTE Jeżeli umiesz to powinno być dla ciebie proste W ZAŁĄCZNIKU JEST NAPISANA FUNKCJA ALE COS NIE DZIAŁA Są cztery procedury w module makra. Procedura "Wyszukaj" przeciez...
Hej, Mam podobny problem ale niestety powyższe kody nie działają. Mam plik pdf , w którym mam około 1000 stron , przez wyszukiwanie zaawansowane wyszukałam strony ,których potrzebuję ale nie można ich zaznaczyć i wydrukować. W związku z tym czy to makro , o którym pisaliście mogłoby mi wyszukać numery stron w pliku pdf ,które zawierają szukany tekst...
Cześć, Jestem początkujący w VBA, chce napisać makro, które pozwoli Mi na używanie wyszukaj.pionowo co tydzień w nowym pliku na bazie jednej stałej bazy danych. Moja idea jest taka, że wybieram oryginalny plik, kopiuje się on z nową nazwą a następnie automatycznie kolumna "P" zapełnia sie tekstem z wyszukaj pionowo. Nie potrafie rozwiązać problemu z...
Nawet nie napisałeś jaka kolumna ma być przeszukiwana, może C - ma jakiś tekst "consumer". Można użyć wbudowanego przycisku Wyszukaj, podobnie przy sortowaniu. Jest też coś takiego jak nagrywanie makra, nagrywasz modyfikujesz i sprawdzasz jak działa. Może byś spróbował cokolwiek sam zrobić ?
Hej Chcę napisać proste makro lub funkcję która: z pliku A zawierającego dwie kolumny: imię_nazwisko numer_id będzie w pliku B wystąpienia imię_nazwisko zmieniać na numer_id Myślę że najwygodniej by było gdyby makro wywoływał skrót klawiszowy i podmienial zaznaczone imiona i nazwiska na numery ID. Na razie robię to naokoło, tj dostawiam kolumnę z wyszukaj...
Wielkie dzięki za to makro - jest świetne. Właśnie o to mi chodziło. A co należy dopisać aby makro kopiowało wiersze z formatowaniem. W niektórych komórkach mam też hiperłącza, a są kopiowane jako tekst. Jeszcze raz dziękuję za pomoc!
Witam, Mam problem z wyciąganiem danych wg powtarzającego się ID, wcześniej do takich rzeczy używałem =wyszukaj.pionowo, ale tutaj się nie sprawdza gdyż funkcja powinna zwracać więcej niż jeden wynik. Przykład tabeli: ID Dane 1 tekst1 2 tekst2 2 tekst3 2 tekst4 3 tekst5 3 tekst6 Po wyciągnięciu danych powinno to wyglądać następująco: ID Dane1 Dane2...
Witam Co dzień utwierdzam się w przekonaniu, że exel z vba to wspaniałe narzędzie. Myślałem, że będe z niego korzystać tylko w pracy ale po kilku już zrealizowanych pomysłach w domu wpadłem na kolejny. Ale pomysł nie zawsze idzie w parze z jego realizacją i dlatego zwracam się do was maniacy vba o pomoc w realizacji mojego pomysłu. Przejdę do rzeczy....
Wypróbuj poniższy kod. Założenia: - kolumna A - dane do wyszukania - kolumna B - szukane frazy - założyłem, że też tam będzie jakiś nagłówek, więc odpowiedni zakres jest deklarowany od wiersza 2, w kodzie jest odpowiedni komentarz - jako, że makro operuje na mechaniźmie filtra zaawansowanego to dane w kolumnie A muszą mieć nagłówek , który będzie użyty...
Można obyć się bez makr. W załączniku wykorzystanie funkcji WYSZUKAJ.PIONOWO z kolumną pomocniczą.
Niestety nie interesuje mnie wysyłanie do wszystkich tylko do pojedynczych osób.. Do korespondencji seryjnej możesz wykorzystać bazę z jakimś polem od którego będzie zależało czy adres się drukuje czy nie.(wstawiasz w to pole np. jakiś krzyżyk) Nie musisz drukować całej bazy za każdym razem. Tu na pewno coś znajdziesz Korespondencja seryjna jest mi...
Dziękuję, po lekkiej modyfikacji i dopasowaniu kodu wszystko działa tak jak powinno. Moje kolejne zmartwienie to przepisanie funkcji "wyszukaj.pionowo" na kod VBA: =WYSZUKAJ.PIONOWO('Arkusz2'!A43;'Arkusz2... Mam takie coś: [syntax=vbnet] Sub MEXDLIL() Range("H29").Select ActiveCell.Formula = Application.WorksheetFunction.VLookup("A...
poszukuje makra VBA które z wiersza wyszuka wartości z wpisanego warunku np P0 i jeszcze np 10 cyfr . lub 88 i jeszcze 6 różnych cyfr a wyszukane wartości skopiuje do sąsiedniej komórki PS . 9700 wierszów do ewentualneog ręcznego przejrzenia
https://obrazki.elektroda.pl/9396852000_... Wstępna ocena dostępnych informacji Na załączonym ekranie widoczne są dane zapisane w arkuszu kalkulacyjnym Excel. Arkusz zawiera trzy główne tabele: 1. Tabela 1 (kolumny A-D): zawiera dane liczbowe pod nagłówkami „LO”, „CW”, „ZW”, „CO”. 2. Tabela 2 (kolumny E-H): na razie wypełniona jedynie w...
Cześć, mam pytanie w jaki sposób za pomocą makra wyszukać wszystkie kropki w komórkach (niezależnie od ciągu znaków), a następnie pokolorować je na czarno. Funkcja ma działać tak jak Ctrl+f i wyszukanie: „*.” Jak to zapisać za pomocą makra? Moje makro wyszukuje i koloruje tylko samą kropkę, a jak zrobić to z dowolnym ciągiem znaków? Proszę...
Nagraj makro z Ctrl+F i zamiast .Select podstaw .Row. ten Select to na samym początku podstawić? jak podstawiłem to zatrzymuje makro, takie coś nagrało [syntax=vb]Sub wyszukaj() ' ' wyszukaj Makro ' ' Range("A1").Select Application.FindFormat.Clear Application.FindFormat.NumberFormat = "General" With Application.FindFormat .HorizontalAlignment = xlGeneral...
Witam Jestem początkujący w VBA i mam taki problem. Mianowicie potrzebuje kodu, który wyszukuje w zdaniu konkretnego wyrazu, kopiuje go do innej komórki plus 10 znaków do przodu. Taki przykład o co mi konkretnie chodzi. Jest zdanie "Ala ma kota kot jest zielony" Makro ma wyszukać słowo "kota" i skopiować go do innej komórki plus 10 znaków do przodu....
...Niestety jestem zielony w tworzeniu makr ... Nie chcę by to zabrzmiało jakbym chciał Cie urazić/obrazić ale ... nie masz pojęcia, ani o makrach, ani o tym jak "działa" excel, ani nawet o podstawach programowania, więc nie wiem dlaczego podjąłeś się pomagać innym w czymś o czym nie masz zielonego pojęcia. Excel nie jest aż tak rozbudowany jak mózg...
W tym przypadku to przejdzie, ale nie zawsze Jak nie będzie takiego przypadku szczególnego :D to proponuję Ci makro "wyszukajdaty", które uruchamiane skrótem ctrl+w wypisze w aktywnym arkuszu w jednej kolumnie pierwsze daty, a w drugiej - drugie daty :spoko: - tak jak na zrzucie i w załączonym pliku. 1054371 1054372
Jeżeli w A1 jest data to "rozbudowana" funkcja wyglądać może tak: =Tekst(A1;"mmmm") lub jak chcesz by nazwa zaczynała się z dużej litery to: =Z.WIELKIEJ.LITERY(TEKST(A1;"mmmm")) Dla informacji : Aby odczytać sam nr miesiąca jest funkcja Miesiąc() Można tez komórkę z datą sformatować jako niestandardową i wprowadzić by wyświetlał się sam miesiąc. Edit...
Dobrze jesli naspepnym razem sformatujesz swoj kod i uzyjesz znacznikow. Myslisz ze komus sie chce ogladac takie smieci? Sub kolor() Dim litera As Range Set litera = ActiveDocument.Range With litera.Find .ClearFormatting .Text = "A" .MatchCase = True .MatchWholeWord = False End With litera.Find.Execute Do While litera.Find.Found litera.Expand...
Witam ponownie mam problem z makro, stworzyłem poniższy kod i nie wiem dlaczego się nie wyszukuje tak jak bym chciał. [syntax=vb] Sub Data_usun() For Each wh In ThisWorkbook.Sheets For r = wh.Cells(65536, "A").End(xlUp).Row To 2 Step -1 If wh.Cells(r, "A").Value = InStr(1, wh.Cells(r, "A").Value, "Data:", vbTextCompare) Then wh.Rows(r).Delete Shift:=xlUp...
Bomba - działa super. Jest tylko jeszcze jeden drobny "mankament". Mam w kilku miejscach na mapie wpisane dodatkowe opisy - no i one kolorują się na zielono (nie było tego w przykładzie, więc jest to pominięte - wyszło dopiero w pracy). Kod działa prawidłowo, bo szuka "niepustej komórki", ale proszę Cię jeszcze o drobną modyfikację, że jeżeli kod nie...
Witam Problem jest następujący analizując zadania 20 brygadzistów (20 kolumn) każdy z nich wykonuje 30 zadań (30wierszy) z listy 50 zadań. Potrzebuje waszej pomocy w określeniu makra lub alternatywnego pomysłu na to aby wpisując w określoną komórkę lub przycisk dane zadanie, excel wyszuka i zaznaczy mi dane zadanie z zbioru zadań wszystkich brygadzistów....
Niestety rozwiązanie cbrman nie sprawdziło się na danych. Wracam do pierwotnej wersji... Chcę stworzyć makro, które ma wyszukać w opisie słowo "umorz", następnie zwrócić 11-cyfrowy tekst po pierwszym ":" ale musi być on datą. Dodatkowo sprawdza, czy w komórce nie ma innych słów "umorz" (na zasadzie pętli)- jeśli tak zrzuca ją w kolejnych kolumnach w...
Można też wziąć makro z mojego posta: http://www.elektroda.pl/rtvforum/viewtop... Zmienić linijkę: [syntax=vb]sRegExpPatt = "[A-Z0-9]{17}"[/syntax] na: [syntax=vb]sRegExpPatt = "\d{9}"[/syntax] przypisać zmiennej sCol odpowiednią kolumnę i uruchomić je.
Witam. Stworzyłam fajny plik do rejestracji faktur. Działałam na nim rok jednak problem pojawił się w momencie gdy dostałam bazy z nazwami materiałów ze sklepu i plik nie wyrabia. Z podpowiedzi wywnioskowałam, że funkcja jeżeli błąd spowalnia mi także plik więc ją usunęłam. Jak podpięłam plik z bazami na wyszukaj pionowo to działa bardzo wolno. Dodam,...
To by nawet fajnie działało, ale jest problem tego typu, że aby dane zostały wczytane, to pliki źródłowe muszą być otwarte. A chodzi o to, żeby dane były wczytywane bez ich otwierania. Zrobiłem tak jak napisałeś, otworzyłem obydwa pliki, dane zostały wczytane, zapisałem plik z nadanymi ścieżkami i po ponownym otwarciu pliku nie wczytuje danych wywalając...
Mam następujący problem: Stworzyłem makro jak było opisane powyżej, ale jest problem z rekordami pustymi. Wszystko jest ok jak tekst się zaczyna od początku komórki - jeśli nie trzeba wpisać w filtrze wyszukiwania "*". Chciałbym żeby wpisywać tekst w innej komórce i kopiować filtr wyszukujący do innej która dostawia "*" po obu stronach tekstu. Próbowałem...
Pomysł kolegi yogi009 jak najbardziej trafiony i możliwy do realizacji przy pomocy kombinacji funkcji: LEWY, PRAWY, FRAGMENT.TEKSTU, DŁ, ZNAJDŹ i PODSTAW http://obrazki.elektroda.net/42_12682388... Założenie: kod składa się z 4 członów, Jeśli kod jest zawsze w formacie 5-4-3-4 to jeszcze łatwiej. W dalszej kolejności należałoby utworzyć arkusz...
wyszukaj tekst makro wyszukaj wyszukaj makro
płyn chłodzenia dolać stoper elektroniczny ukryć kable
moduł światła dzienne jabel czestotliwosc
Czy można uruchomić quada 110 bez impulsatora? Regulacja mocy kotła Brotje PWHC 24 przez panel
