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...
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 +...
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...
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....
...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...
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...
Witam! Dziś taki problem: Mam kilkaset plików wynikowych o jednakowej strukturze w których w kolumnie F znajduje się rachunek bankowy. Mam też plik nazwijmy go baza gdzie w kolumnie D znajduje się lista rachunków bądź ich części (tzn maska rachunku). Problem polega na tym jak w szybki sposób wyszukać w plikach wynikowych rachunków z listy z pliku baza....
napisane w excelu makro otwiera nowy plik jako "tylko do odczytu", aby następnie wyszukać w nim dane i skopiować je. Problem polega na tym, że Excel zmienia jednocześnie strukturę pliku, który otwiera. Ustaw na poziomie systemu atrybut "tylko do odczytu" by się zabezpieczyć przed zmianą pliku przy obróbce. Plik w formacie *.csv rozdziela kolumny, zmienia...
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...
Witam, Mam plik exel, w którym chciałabym żeby po wyborze danej pozycji z listy rozwijalnej "rodzaj nieruchomości" odkrywały się konkretne wiesze. po wyborze "grunt" - wiersze 33-43 po wyborze " dom" - wiersze 45-60 po wyborze "lokal mieszkalny" - wiersze 62-76 Bardzo proszę o pomoc ;)
Witam serdecznie. Mam wiersze z tekstem pogrubionym i normalnym(oba rodzaje tekstu występują w pojedynczej komórce) .Chciałbym aby w pętli makro wycięło pogrubiony tekst z komórki np A1 i wkleiło tylko (pogrubiony tekst) do odpowiedniej komórki C1 itd czyli A2 do C2 czy A3 do C3 itd.Może się tak zdarzyć że w którejś z komórek nie będzie pogrubionego...
Witam, Próbuję zrobić makro, które znajdzie wszystkie wskazane wyrazy, a kiedy znajdzie usunie wiersz tabeli. Wyszukiwanie to nie problem, ale jak wykonam wyszukiwanie to fokus nie przenosi się na wiersz tabeli, w którym jest dany wyraz, więc usuwa się wiersz, w którym byłem przed wyszukiwaniem. Czy może ktoś mi podpowiedzieć jak to zrobić.
Witam wszystkich, po raz kolejny wracam do vba w excelu i znowu ściana. Mam ciąg danych pomiarowych zawierających wartości w poszczególnych dniach roku dla kilku lat. Potrzebuję: - wyszukać ile jest wartości, które występowały przez określoną liczbę dni z rzędu np. 2, 3, 4 i tak do n dni, w danym roku, ale ich wartość jest większa równa 0,1 - a potem...
Witam, Potrzebuje pomocy przy stworzeniu makra które w 1 pętli rozdzieli kilka zdań (zakończonych kropką), następnie w 2 drugiej pętli wyciągnie zdanie po zdaniu i wyszuka tłumaczenia w bazie tłumaczeń. To co próbuje najpierw zrobić to najpierw rozdzielenie zdań poprzez liczenie kropek, następnie funkcja LEFT aby wyodrebnić zdanie do wyszkuwania poziomo?...
Hi Proboje stworzyc sobie taki skrypt w excellu - szukalby okreslonego tekstu w kolumnie b,a jesli by go znalaz,wklejal by inny tekst dwie komorki dalej (w trzecia) inny tekst - i tak przez wszystkie poziomy arkusza - i zakladek arkusza
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.
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...
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:
[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...
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.
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]...
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
[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...
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ę...
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...
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...
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....
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...
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ć ?
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...
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...
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 serdecznie. Mam spory problem, z którym nie mogę sobie poradzić. Posiadam makro, które rozbija mi dane z komórek na człony wg zadanego klucza do kolumn L, M, N. Potrzebowałbym w kolumnie O połączyć dane z kolumn L i N (póki co jest tam formuła). W kolejnym kroku chciałbym na podstawie danych z kolumn L,M,N,O wyszukać.pionowo w Arkusz2 i Arkusz3...
Witam, Potrzebuje Waszej pomocy. Potrzebuję formułę lub makro, które będzie wyszukiwać mi "wyrażenie" które znajduje się w jednej komórce w ciągu zdania. Dla przykładu i wyjaśnienia wklejam przykład: 1097 SPORT:1313 VER:31424441 MAZDA ORD:9470 - SERVIZI ROMA SPORT:3142 Takich linijek mam w arkuszu okolo 200 każda przeważnie jest inna. W ciągu tej linijki...
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
Prościej czyta się kod niż poezję.;) Koledze to na pewno. Dla mnie zrozumienie tego kodu to połączenie języka kipu z językiem chińskim i hieroglifami. Pewnie to samo czuł kolega jak czytał moje wyjaśnienia :?: . Odnośnie makra napisanego przez kolegę PRL . Tekst dla kolumny A działa prawidłowo. Gorszy problem jak ten kod rozwinąć na pozostałe kolumny?...
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
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...
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 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...
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....
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...
PAN/HDF AC4 1.99M2 FL.32.H2486 KASZTAN/8 - powinno skopiować 1.99 Makro musiało by skopiować znaki na lewo od znaku M2 aż do napotkania spacji." Może makro nie będzie konieczne. Wg warunków zadania: A. odciąć łańcuch tekstu od lewej strony do "M2" (ZNAJDŹ i LEWY) B. w tym krótszym łańcuchu odszukać spację i odciąć (PRAWY) fragment od spacji Ad. B....
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...
Witam Chciałbym stworzyć prostą aplikację do pisania kopert. Po prostu na jednym arkuszu tworzę wzór koperty z potwierdzeniem na drugiej lista adresatów ok 3000 pozycji. Cały problem polega na tym aby nie skakać po arkuszach i robić kopiuj wklej, tylko aby się dało dodać adresata przez przycisk Dodaj lub skrót uruchamiający makro z bazą adresatów z...
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.
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...
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, 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, Nie bardzo znam się na pisaniu makr w excelu. Szukałem podobnego rozwiązania ale niestety nic nie znalazłem. Mam plik excela a w nim w kolumnie A dane ok 500 np. australia01dom afryka01praca europa02dom afryka02praca australia01praca australia02dom europa01dom afryka02praca... Chciałbym aby z automatu wyszukać frazy "01dom", "europa", "02praca"...
Witam Proszę o pomoc w rozwiązaniu problemu przy użyciu VBA (Excel 2007) Mam pewien zakres w którym w niektórych komórkach są wpisywane pewne dane. Chciałbym aby makro wyszukało komórek których wartości zaczynają się "Z WYS" Np Z WYS 500 Z WYS 501 Z WYS 502 Z WYS 503 Załączone makro mi działa ale jeśli w pętli IF określę dokładną wartość komórki a nie...
Część. Jeżeli to zły dział proszę o przeniesienie. A teraz do rzeczy. Mam problem z napisaniem formuły nie Makra. Formuła działa, lecz nie tak jak powinna tzn: Ma ona wyszukać dany numer np jedną z liczb od jeden do stu, następnie ma podać ile razy występuję dany numer. Problem polega na tym, że gdy zlicza mi ilość to również podaje mi cyfrę 11,12,...itd....
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...
Mam problem i nawet nie wiem jak go nazwać(wyszukać). Mam dwie kolumny A i B. W kolumnie A mam przykładowo 1000 wierszy w kolumnie B mam 2000 wierszy i chciałbym aby mi się połączyły ale Łączenie tekstu jest zbyt karkołomne dla tej liczby. Chciałbym aby się łączyło A1 B1,A2 B1, A3 B1, A4 B1.....A1000 B1, A1 B2, A2 B2, A3 B2, A4 B2....A1000 B2...A1000...
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 Mam problem. Nie bardzo znam VBA, stąd zupełnie nie wiem jak napisać chyba proste makro. Proszę więc o pomoc kogoś, komu to nie sprawi większego problemu. Plik Excel ma 2 arkusze: Arkusz1 i Arkusz2. W obydwóch są takie same kolumny i podobne dane, które często porównuję. Arkusz1: - kolumna A - komórki A1:A500 zawierają ciągi 26 cyfr (komórka w...
wyszukać tekst makro wyszukać wyszukać makro
matryca poziome kreska regulator napięcia espace zaprogramować motorola gp300
gosund włącznik kaskadowe oświetlenie schodów
Trudny rozruch zimnego silnika Kia 1.4 diesel Przetwornik 1/2.7" vs 1/2.9" - który lepszy?