Bo przez makro to widzę że musi to przejść przez naciśnięcie CommandButton? Nie musi, pod jakie zdarzenie podepniesz, to pod nim zadziała... Na funkcjach jakby to wyglądało? Nie myślałem, pewnie jakoś się da przez bardziej skomplikowane, zagnieżdżone funkcje. Pisałeś, że może być makro, to jest makro.
[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...
Dzięki za odpowiedź, oczywiście troche szukam po elektrodowych postach związanych z podobnymi tematami, jednak każdy problem jest trochę inny. Opis funkcjonalności: Mamy przycisk, zaznaczamy interesujący nas folder, w którym są pliki excel. Makro przeszukuje te pliki, szukając np w kolumnie D liczby '1234', jeżeli w kolumnie D ta liczba jest wpisana...
Zmiennej 'lastRow' oraz 'lastColumn' przypisujesz wartość z ActiveSheet i wykorzystujesz jako liczniki pętli przeszukującej sht... Przypisanie powinno być wewnątrz pętli 'For Each sht In ThisWorkbook.Worksheets'.
Dzięki za tę funkcję, ale to raczej powinno być makro.
Musisz te dane ładować zawsze jak sie zmieni zawartość TextBoxa. Podepnij makro filtrujące i ładujące pod zdarzenie OnChange.
Dla szukania po fragmencie, w argumencie instrukcji Like wystarczy wstawić string pomiędzy gwiazdki (Shift_8). Range.Find znajdzie Ci tylko pierwsze wystąpienie. Maże zastosować jakieś filtrowanie. [url=http://www.elektroda.pl/rtvforum/vi... Najlepiej, gdybyś wrzucił jakiś przykład w załączniku (z tym makro...
Sprawdź makro, które podałem Ci ostatnio. W Twoim jest pewien błąd. Otóż, jeżeli komórka A6 zawiera produkt który był w drugim arkuszu na pozycji B4, to makro nie wejdzie do pętli i zmienna y nie zostanie zdefiniowana. Druga sprawa, to przeszukiwanie kolejnego produktu, B5, B6 itd. W Twoim makrze nie ma zmiennej, która decydowałaby kiedy zaprzestać...
Zakładając, że makro uruchamiasz przy aktywnym arkuszu wynikowym, konstrukcja powinna wyglądać mniej więcej tak ostWrs = tu szukamy ostatniej niepustej komórki w arkuszu wynikowym For Each sht In ThisWorkbook.Worksheets If sht.Name <> "tu nazwa arkusza wynikowego" Then ostWrsArk = tu szukamy ostatniej niepustej komórki w arkuszu źródłowym...
... chodzi o przeszukiwanie pola od początku , na pewno początek powiedzmy 7 znaków bedzie takie same , jeżeli coś sie może zmienić to tylko na końcu Można wykorzystać do tego funkcję arkusza ' Find ' w składni vba: 837983 Jednak, jak wszystko zresztą, ma ona pewne ograniczenia, z którymi trzeba się pogodzić, przykładowo: jeśli poszukiwany będzie ciąg...
Spoko, mogło by wyglądać tak: Sub Makro1() Dim temp As Variant Dim wiersz As Long wiersz = 1 Do While Cells(wiersz, 8) <> "" If Cells(wiersz, 8).Value = 0 Then Cells(wiersz, 10).Cut Destination:=Cells(wiersz, 15) wiersz = wiersz + 1 Loop End Sub Dodano po 2 jaszcze taka uwaga makro działa poprawnie do pierwszej pustej komórki w kolumnie przeszukiwanej
Makra VBA są wbudowane w outlook? Nie tylko w Excel'a :) Od tej strony będzie znacznie łatwiej moim zdaniem.
Zrobiłem to tak że program wybiera z tabelki po prawej inicjały (4 pierwsze znaki) czyli jak w tabelce jest J.K. to wybiera te inicjały. I przeszukuje kolumnę K w poszukiwaniu zgodnych inicjałów, (też 4 pierwsze znaki) czyli jak jest( J.K. data) to wybierze tylko "J.K." i dodaje do licznika pozycji zleconych. Dodatkowo jak kolor czcionki jest czerwony...
Wygląda na to, że słabo sprecyzowałem mój problem. Chodzi mi o to,że w momencie, gdy wyświetlona jest formatka z textbox'ami to nie mogę przesunąć arkusz, aby wyszukać dane do wpisania w te textbox'y. Podobnie mam w innym makro. Uruchamiam makro, pojawia się inputbox z poleceniem wpisania danych z arkusza. Jeśli akurat jestem w innej części arkusz,...
Witam, Mam zadanie aby z kodu źródłowego systemu, który mam zapisany w Wordzie usunąć formuły tak aby została sama definicja pola bez kodu. Nie chcę ingerować również w format tekstu. Dane są w dwóch kolumnach pierwsza przedstawia definicje a druga wartości jakie te pola przyjmują w tym formuły. Chciałbym, żeby makro przeszukiwało nazwy z pierwszej...
Witam Potrzeba mi zrobić makro w excelu które będzie przeszukiwać arkusz w poszukiwaniu komórek w których mam wstawione jakąś liczbę np 1 i zmieniać tą jedynkę na odpowiedni tekst Pozdrawiam Dodano po 18 dodatkowo potrzebuje podobną formułkę tylko że ma przeszukiwać kolumnę czyli Range B1 do B1000 i w komórkach w których jest coś wpisane wypisuje wartość...
Witam. Męczę się już od dłuższego czasu nad tym zagadnieniem w VBA. Jeśli chodzi o formuły excel itd. mam wszystko zrobione. (Wrzucam do wglądu) Ale wolałbym aby to było zrobione za pomocą makro ze względu na to że codziennie przy nowym gatunku muszę ręcznie zmieniać formułę grubości z 2 na 3 lub coś w tym stylu. Mimo że próbuję w żaden sposób nie umiem...
no jednak wciąż nie działa :/ Zobacz może jak spojrzysz na arkusz to to obczaisz. W kolumnie K znajduje cene katalogowa: Przeszukuje kazda komorke po kolei, nie działa z zakresem dlatego też wygląda to jak wygląda - obliczenia zamiast w jednej komórce rozkładają się na całą kolumne.
w testowym folderze mam trzy pliki docx, żadnego oczywiście nie otwieram, WOrd jest jest zamknięty. Po uruchomieniu Excela i makra w nim zawartego pojawia się ikona klepsydry i w arkuszu nic się nie dzieje. Kiedy podglądam Worda, jest komunikat, że pierwszy z trzech plików docx jest zablokowany do edycji przez użytkownika "inny użytkownik" i mam do...
Wyszukiwanie poprzez jakiekolwiek metody odnajdujące zadany ciąg znaków w pliku nie zda egzaminu gdyż excel nie zachowuje danych z arkusza w sposób "otwarty" w pliku - wystarczy prosty test: w czystym arkuszu wpisać znany ciąg znaków a następnie otworzyć ten plik xls w notatniku - nie znajdziemy w nim w jawnej postaci wprowadzonej tekstu / liczby. Pozostaje...
Można zrobić to stosując makro, które w pętli przeszuka kolumnę komórka po komórce i po napotkaniu szukanej wartości skopiuje cały wiersz do nowego arkusza. Następnie wznowi przeszukiwanie od miejsca zatrzymania i po napotkaniu szukanej wartości - kopia wiersza. I tak do ostatniej niepustej komórki. To co napisałem wygląda prawie jak przepisane od Ciebie,...
Szanowni koledzy mam makro które kopiuje mi całe wiersze wtedy gdy jest spełniony warunek ( makro nie jest napisane przeze mnie a jedynie dostosowane ) działa super ale warunek dotyczy tylko jednej komórki. dopisałem sobie kilka takich samych instrukcji w których tylko zmieniałem komórkę z warunkiem . Dopóki warunków miałem ze 20 to nie szukałem innego...
Witam, po kilku dniach przerwy, troszkę zmodyfikowałem kod. Problem był tego rodzaju, że makro nie widziało tej tabeli, którą miało przeszukiwać. Z poziomu SolidWorks otwieram jako obiekt arkusz Excel, mam dostęp do przeszukiwanego zakresu, ale źle ustalam jeszcze kolumnę, zainteresowane osoby w tym temacie pewnie znają odpowiedź. Makro na dziś dzień...
Witam serdecznie, Potrzebuje pomocy w napisaniu marka, poniewaz sam nie potrafię. Tabela: W kolumnie T w kolejnych wierszach są wpisane jako tekst ścieżki na dysku. Czasem jest to jedna ścieżka, a czasem dwie lub trzy oddzielone ";" (średnikiem). Czyli ścieżki to takie główne wartości oddzielone ";" średnikami. Makro: Makro ma przeszukiwać tekst (wartości)...
Mam problem dotyczący excela. Piszę makro, które ma usprawnić przeszukiwanie dokumentu. Każdy wiersz to jeden rekord. W kolumnie F mam różne wpisy: książka, film, muzyka itp. Jeśli znajdzie w tej kolumnie wpis film to ma zaznaczyć z tego wiersza komórki A,B, E, ,H, I, J oraz Z(nie wszystkie informacje są mi potrzebne i skopiować do innego dokumentu....
Wydzielono z Dzień dobry, Próbuję zrobić podobne makro z tym, że chciałbym, aby makro przeszukiwałoby mi maile i odpowiedziało/przesłało tylko ostatni mail chronologicznie. Czy jest jakaś komenda, która pozwoli na otwarcie tylko jednego maila, a nie wszystkich? Poza tym chciałbym się dowiedzieć, czy co oznaczają symbole "w" w formule if w = ... oraz...
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...
Formuła przeszukuje mi dane w dwóch plikach w każdym z arkusza z osobna. Jeśli nie znajdzie szuka w kolejnym arkuszu i tak do momentu znalezienia i podstawienia właściwych danych. Tutaj podaje link do pobrania pliku, niestety plik jest tak duży że nie mogę go wgrać przez portal. [url=https://turbo.to/2c4il4z9gp5r.html]... Ever.xlsb
o Ile dobrze zrozumiałem pytanie to tak, makro ma za zadanie sprawdzić poprawność mapingu na bazie zamówień już zrealizowanych, więc jest to czynność jednorazowa. W związku z powyższym dzielenie na klasy i kombinowanie z upraszczaniem definicji do jednego kryterium niestety odpada ponieważ makro ma sprawdzić konkretne mapowanie, a więc konkretne "kody"...
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?
Dzięki, makro jest bardzo dobre. Niestety przeszukuje tylko ten arkusz w którym je uruchomię. Bardzo proszę o jeszcze jedną modyfikację: Aby makro przeszukało arkusz pierwszy o nazwie 2010, później arkusz drugi o nazwie 2011 i arkusz trzeci o nazwie 2012. Po przeszukaniu każdego arkusza niech kopiuje wiersze jeden pod drugim do arkusza o nazwie RAZEM,...
Witam, mam problem z makrem. Potrzebuję aby makro wyszukiwało mi w kolumnie zmianę liczb. Np. mam w kolumnie F liczby: 1 1 1 2 2 2 3 4 5 5 5 6 chcę aby makro przeszukiwało mi kolumnę i jeżeli jest zmiana cyfr wstawiało wiersz prze liczbą i tak by to wyglądało: 1 1 1 2 2 2 3 4 5 5 5 6 czy da się coś takiego zrobić??
Przejrzyj dobrze kod. Ostatnią funkcję masz "zaremowaną". [syntax=vb]'Call GetOnlyGoodValues(x1, x2, x3, x4, x5, x6, x7, x8, x9)[/syntax] Wewnątrz GetOnlyGoodValues wykonywane jest przeszukiwanie. Działa to dobrze bo sprawdzałem, ale generowanie czegokolwiek trwa baaaardzo długo. Zapis do komórek Excela mija się z celem o czym już pisałem. Właśnie dodałem...
Nie napisałaś, która to jest kolumna i czy zawsze ta sama, więc makro działa tak, że najpierw ustawiasz się w kolumnie, która ma być brana pod uwagę i później uruchamiasz makro. [syntax=vb]Sub Usun_wiersze() Dim lLstRw& Application.ScreenUpdating = False lLstRw = Cells(Rows.Count, Selection.Column).End(xlUp).Row For i = lLstRw To 1 Step -1 If Cells(i,...
Dzięki za szybką odpowiedź pomogło ale jest jeszcze jeden problem. Opiszę to dokładniej. Makro szukaj uruchamiane jest z komórki "B12" i przez InpudBOXa szuka podanej wartości. UserForm szukaj ładowany z makro szukaj w którym jest ta pętla ma 5 przycisków CommandButton z czego: szukaj_dalej ma przeszukiwać pętlę a pozostałe zakończyć makro szukaj i...
Witam, Potrzebuję makra, które przeszukuje mi tablice/tabele i jeśli wystąpiła już dana dana to zwraca mi tą, która wystąpiła najpóźniej. Przykład dla objaśnienia. Posiadam ewidencję kontraktów i ilości pod dany kontrakt. Kontrakt 1 opiewa na 1000 sztuk. Sprzedałem 200 sztuk, więc ilość to 800. Sprzedałem kolejne 200, pozostało 600. Chcę, aby podczas...
Witam. Potrzebuję makro, które usunie mi cały wiersz z pliku na podstawie danych zawartych w innym pliku. Oto mały opis jak wygląda sytuacja: W pliku nr 1 mam trzy kolumny z danymi A, B, C. Potrzebuję, żeby makro na podstawie wartości z kolumny C przeszukiwało kolumnę C w pliku nr 2 i jeżeli danej wartości nie znajdzie, w pliku nr 2 kasowało wiersz...
Witam. Poszukuje informacji jak napisać makro lub przykładu takiego makro które przeszukiwałoby kolumnę A i jeżeli znajdzie dwie lub więcej komórek które mają ten sam numer (przykład numeru: 1.1.15.202) gdy znajdzie chciałbym by wówczas dodało do siebie wartości z tych wierszy (wiersz zawiera 12 komórek) gdzie są wartości liczbowe, dodam że nie wszystkie...
Obecnie przedstawię poczynione przeze mnie próby. Na marginesie - wydaje mi się , że marek033 oraz adams_nt są na urlopie (i to całkiem słusznie) W przedstawionej tabeli w komórkach znajdują się formuły (= = jeżeli( - co prawda komórki w tabeli mam puste (w których miesiącach nie wpłacono) - ale (uwaga), makro ich nie traktuje jako puste. Jedynie te...
Witam, przeszukiwałem tematy ale nie mogę nic znaleźć podobnego - więc sorki jeśli gdzieś coś było.... Problem: Tabela w arkuszu (rozmiaru od C3 do AE60) importuje dane z innego arkusza i przedstawia je w postaci cyfr i literek. Chciałbym aby za pomocą kodu VBA wyniki : np jeśli pojawi się zaimportowana w daną komórkę w podanym wyżej rozmiarze litera...
To ze zadanie nie jest proste, to ja doskonale wiem. W przeciwnym razie nie zadalbym go:) Liczba wierszy i kolumn, moze byc zadeklarowana ale nie musi - wtedy makro przeszukuje kazdy wiersz (65536) i porownuje ze soba cale wiersze (256 kolumn). Tak jak mowisz mozna to uproscic, podajac pewien zakres wierszy i kolumn jednak nie jest to konieczne. Generlne...
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...
Witam Jak napisać makro które będzie przeszukiwało kolumnę A i B http://obrazki.elektroda.pl/4124127900_1... Jeżeli w kolumnie B będzie więcej niż jeden ciąg znaków to dodaje wiersz i scala komórki jak na zdjęciu poniżej wartość z komórki A wkleja do scalonej komórki a wartości z kolumny B z danego wiersza wkleja do oddzielnych komórek...
Witam, preszukalem kilkanaście tematów dotyczących excela makr itp. i powoli uczę się krok po proku a moze mi pomożecie.Potrzebuje makra który będzie przeszukiwał arkusz1 wzgłedem danych zapisanych w np. pliku indexy1.txt lub jak trzeba bazie danych, przeszukuje w arkuszu1 kolumne C (ilość wierszy różna czyli przeszukuje aż do pustej lini) i jeśli w...
Musiałbyś zmienić licznik pętli zmiennej wiersza: For k = 1 To ostatnia komórka Range(wiele_kolumn).End przeszukuje tylko skrajną, lewą kolumnę. Wyszukuj od pojedynczej i najlepiej od dołu (jeśli zdarzają się "okienka"). Np ostWrs=Range("B65536")>End(xlup).row Inne sposoby ostW=ActiveSheet.UsedRange.Rows.Count ostW=Columns(2).Find("*", SearchOrder:=xlByRows,...
To akurat wiem. Ale działa :-) A że jest nieelastyczne i zbyt obciąża plik, to już druga sprawa, którą chętnie rozwiążę. Tyle że widzisz - ja z VBA dopiero zaczynam się bawić - takie rozwiązanie znalazłem w sieci i je zrozumiałem. Natomiast jak zapisać, żeby makro rozpoznało po znalezionej nazwie sprzedawcy, do której zakładki przenieść wiersz, jak...
Witam, Szukam makra, do excela, które będzie przeszukiwało daną kolumnę i usuwało podane frazy z komórek np. faktura vat. Znalazłem coś takiego: Proszę pamiętać o używaniu znaczników code . Proszę poprawić błędy w poście. - arnoldziq
Przepraszam za blędy: Było w arkuszach 1, 2 i 3 : 0123457 011-6500-011-00003/11 Franek Powinno być : 0123458 011-6500-011-00003/11 Franek Makro w arkuszu 1 w kolumnie A szuka np. takiej warości:"0123456" Jak znajdzie to przeszukuje arkusz 2 i 3 Jak znajdzie to wstawia dane do arkusza 4w następującej kolejności: Kolumna A 0123456 Kolumna B 011-6500-011-00001/11...
Witam Chcę makrem przeszukiwać komórki w bieżącej kolumnie idąc w górę arkusza. Makro zatrzyma się jeśli znajdzie określoną wartość. Jednak jest problem jeśli nie znajdzie tej wartości. Przesuwam się po komórkach poleceniem: ActiveCell.Offset(-1, 0).Range("A1").Sel... Nie wiem czemu jest w treści A1, ale działa. Teraz chciałbym...
Witam, mam do napisania makro w języku VBA w którym za pomocą formularza przeszukuje bazę danych(zakres komórek) a przede wszystkim wybraną kolumnę (w moim przypadku np:imie,nazwisko) i po wybraniu odpowiadającej mi wartości reszta pól w formularzu wypełniała się automatycznie ( w moim przypadku:ulica,kod pocztowy,uwagi). Nie mam pojęcia jak się do...
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,...
Witam. Szukam makra, do excela, które będzie przeszukiwało cały wiersz numer 1, w celu znalezienia wartości np.: MSISDN oraz KOD SPRZEDAWCY I kiedy znajdzie taki wpis - usunie całą kolumnę "MSISDN" oraz "KOD SPRZEDAWCY" wraz z wartościami i danymi, które znajdują się poniżej tej komórki. Dodam, że tych niepotrzebnych wartości jest około 11, a sama oryginalna...
Witam Mam pytanie odnośnie arkusza kalkulacyjnego czy jesteśmy w nim wstanie użyć jakiejś funkcji ? Jeżeli tak to jakiej ? Lub napisać makro, które po podaniu dwóch wartości przeszuka tabele która zawarta jest w osobnym arkuszu. Wyszukiwanie miałby odbywać się na zasadzie takiej że w pierwszej kolejności przeszukujemy kolumny i pierwsza z nich której...
Liczę na jakieś sugestię. Można napisać makro działające na wszystkich plikach (otwiera plik -> przeszukuje i kopiuje ->zamyka plik), ten temat przewijał się kilka razy przez to forum - poszukaj, jednak to rozwiązanie będzie mało wydajne dla większej ilości plików. Moja sugestia jest jednak taka, żeby te pliki wrzucić do tabeli w Accessie i tam je...
Separator jest ustawiony na przecinek. Doszedłem do wniosku, że forma w jakiej makro otwiera ten plik jest całkiem korzystna, jeżeli tylko udałoby mi się znaleźć sposób na wyszukiwanie przez .find wśród dat. Próbowałem podstawić zmienną definiowaną jako "date" i do końca nie wiem, czy to działa, czy nie. W komórce wyświetla mi się co prawda "rrrr-mm-dd...
No i nadszedł problem :/ Mam taki kod: [syntax=vb]Sub NO_1() wrsDst = 6 With ThisWorkbook.Sheets("Baza") For wrs = 1 To 2000 If .Cells(wrs, 7) = "1" Then .Cells(wrs, 7).Copy ThisWorkbook.Sheets("NO_1").Cells(wrsDst... 7) .Cells(wrs, 6).Copy ThisWorkbook.Sheets("NO_1").Cells(wrsDst... 6) .Cells(wrs, 5).Copy ThisWorkbook.Sheets("NO_1").Cells(wrsDst... 5) .Cells(wrs,...
Właśnie w Access'ie jestem już całkiem zielony, miałem z nim do czynienia chyba w liceum ostatnio, a później nie był mi potrzebny więc poszedł w odstawkę, wszystko starałem się ogarnąć w excel'u. A co do 'informatyki' to przy rejestracji wpisałem, bo studiowałem informatykę tyle że raczej w kierunku grafiki. Ale wracając do sedna sprawy. Przeszukiwałem,...
wow :!::!::!: :D Patrze mistrzowie tutaj normalnie, sprawdzę to dzisiaj popołudniu. Piękna robota. Dam znać jak to wygląda :D EDIT : Chociaż nie rozumiem o co tutaj chodzi z tym przyciskiem, ale jak sprawdzę to pewnie się zorientuję. EDIT 2 : Co do makro tworzącego funkcję "prostą" wiedziałem jak użyć, tak tutaj nie mam zielonego pojęcia z której strony...
Witaj. Rozumiem, że chodzi Ci o przeszukiwanie kolumn w określonym zakresie, ale co ma się dziać z wyszukanymi odpowiednikami? Podaj może przykład arkusza z dowolnymi danymi i określ co chciałbyś z niego w wyniku selekcji wyciągnąć. Pzdr.
... jak powinien wyglądać kod? 1. Deklaracje planowanych zmiennych/stałych pracujących w procedurze 2. Przypisania wstępne/wyjściowe do powyższych 3. Pobranie danych o nagłówkach - do tablicy lub bezpośrednio, w locie ... np.: PRL , do wyszukiwania w pierwszym, nagłówkowym wierszu arkusza z tabelą ... np.: [syntax=vbscript] With .Range(.Cells(1, 1),...
Może makro napisać co przeszukuje komórki.
nie wyskakuje żaden komunikat z błędem makra, pojawia sie komunikat że pojawił sie niespotykany błąd i excel zostanie zamknięty. Wiec to nie błąd vba Windows(p & ".xlsm").Close Samo użycie zamknięcia nie ma wpływu na plik Rejestr Kilka rzeczy jest nie potrzebnych [syntax=vbscript]Sub Zakończ_zlecenie_pozmianowe() Dim zlec As Worksheet Dim Rng As...
Witam. Pracuję nad pewnym trackerem w Excelu do zbierania wybranych danych z arkuszów zewnętrznych. Założenie jest takie, że wchodząc w tracker użytkownik jest w stanie zobaczyć dane od początku zbierania do dnia obecnego. Główny problem tkwi w tym, że rozpisywanie tego funkcją w komórce powoduje, że otwieranie pliku robi się coraz bardziej czasochłonne,...
Tak wszystkie ale tylko jeden raz czyli bez powtórzeń. Jeśli nie da rady formułą to przyjmę coś innego, ale fajnie było by formułą. Proponuje wykorzystanie formuły arkuszowej "RemoveDuplicates Columns" :idea: w małym makro - analogicznie jak w załączonym przykładzie :D 840585 Witam Kiedyś byłem w potrzebie i założyłem podobny temat, też chodziło o...
Cześć, Makro jest OK właśnie sprawdzam jego działanie ale nie jest to dokładnie to co potrzebuje bo zwraca całość, z stworzonych danych, a u mnie ma dopasować te dane . Myślałem nad czymś takim : Dodano po 1 Cześć, Chyba to mam, ale może jakaś optymalizacja kodu ? lub lepsze rozwiązanie tego problemu ? [syntax=vbscript]Sub Dopasuj_do_zawartosci() Columns("B").Select...
Witam, Posiadam taką tabelkę https://obrazki.elektroda.pl/7526061600_... W kolumnie C mam numer produktu a w Kolumnach D-I "cechy charakterystyczne" danego produktu Chciałbym w VBA napisać marko które przeszukuje tabelę z obrazka w taki sposób, że znajduje Produkt (numer wiersza) o cechach przez mnie zadanych np: Podaję że w kolumnach...
Cześć, sprawdziłem i działa. Jest jednak małe ale ... stosuję formułę =WYSZUKAJ.PIONOWO(C6;A6:B100;2;FAŁSZ) i przeciągam w dół tak jak sugerowaliście. Przy pierwszym wierszu jest ok kłopot jest w następnych bo wyglądają =WYSZUKAJ.PIONOWO( C7;A7 :B100;2;FAŁSZ) itd. Oznacza to że wiersz c6 nie jest już przeszukiwany co może spowodować pewne pominięcia....
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...
Jeszcze raz dzięki, co do nagłówka już sobie poradziłam (poniżej kod - dla zainteresowanych). Private Sub Dzielenie_Click() Dim wbBook As Workbook Dim wsSheet As Worksheet Dim rnStart As Range Dim rnData As Range Dim i As Long Application.ScreenUpdating = False On Error GoTo myErr Set wbBook = ThisWorkbook Set wsSheet = wbBook.Worksheets("Prowizja&quo...
może ktoś będzie w stanie pomóc Spróbuj "pomóc sobie sam" :D W Twoim pliku xlsm spróbuj nagrać dodatkowe makra, które będą rejestrować cały pełny cykl poszczególnych działań (szukanie, dodawanie itp). Jak zaczniesz je analizować to powinieneś dostrzec zasadniczą różnicę :idea: Makra będą cały czas przerzucały aktywność pomiędzy poszczególnymi plikami...
Wklej tę funkcję do modułu VBA. Jeszcze jedno. To makro pozwala mi znaleźć tylko jedno słowo "AAA". Co trzeba dopisać, żeby kod szukał słowa "AAA" lub "BBB" w komórce, w której znajduje się przeszukiwany tekst
Domyślnie wyszukuje tylko w tekście dokumentu, do nagłówka i stopki trzeba zmienić zakres przeszukiwania i powtórzyć wyszukiwanie. Zobacz ulepszoną wersję 2.0, jak to się robi...
Udało mi się napisać skrypt, który kopiuje wyniki do pliku txt i działa tak jak powinno. Polskie znaki wyświetla prawidłowo. Kluczem jest uruchomienie CMD z parametrem "/u". To jeżeli masz ok w txt to importuj do excela i usuń ten txt.
Witam. Szukam makra które działa jako "skaner" w wordzie. Każdy z nas dastało jakieś pismo z urzędu. W górynym lewym boku są znak sprawy, numer dokumentu, po środku tytuł pisma urzędowego. Interesowało by mnie takie makro w wordzie, które by szukał nastepujących słow: Znak sprawy(może być jeden numer sprawy lub więcej), numer dokumentu i tytuł dokumentu(np,...
nie da się ani jednego bitu odczytać nie otwierając pliku :cunning: :?: Istotne tu jest znaczenie pojęcia " otwierania pliku " :D Ja użyłem sformułowania "wyciąganie danych z zamkniętych plików" w znaczeniu "nie otwierania ich w aplikacji Excel" :!: :ok: tj. bez trwającej ileś milisekund operacji otwierania i zamykania pliku, bez przeliczania formuł...
Cześć Mam ogromną prośbę o pomoc w napisaniu Makra które wyszukiwałoby mi w kilkunastu pliakch xls dane z listy umieszczonej w pliku Excela. Lista zawiera listę z nagłówkami: numer(id) imię i nazwisko. Makro przeszukiwałoby mi pliki w których jest id oraz kwota, pliki znajdują się w folderze z listą, wyszukiwanie zwracałoby informację nazwa pliku w...
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, Jestem zupełnie nowa w temacie VBA i wrzucono mnie od razu na gęłboką wodę. Mam do napisania aplikację sortującą bazę danych. Ale po kolei: na chwilę obecną potrzebuję makro które będzie wyszukiwało wartość tekstowa w 1 wierszu i jeśli ją znajdzie ustawi tam aktywną komórkę po czym wstawi 4 puste kolumny na prawo od niej. pózniej muszę wypełnić...
Siema Mam problem i proszę o pomoc w jego rozwiązaniu a mianowicie... Posiadam stary wykaz towarów i cen (arkusz 1). Załózmy ze skałada sie z 1000 pozycji, nr towaru i cena (numery towarów nie powtarzają sie). Dostaje nowy wykaz i kopiuje go do 2 arkusza. Zawiera on jednak kilka pozycji mnie. Moje zadanie to do 1 arkusza dopoasowac w kolumnie C nową...
Witam, Mam pewien problem którego nie jestem w stanie prześledzić, mianowicie na FTP sieciowym (który jest beckupowany) mam zamieszczony arkusz Excel który jest bazą danych, dla innych arkuszy które za pomocą kwerendy łączą się z plikiem i siąpają z niego dane, oraz zawierają kody makra które dopisują bądź edytują poszczególne wpisy w pliku źródłowym...
Chodziło mi o nazwę typu: i , które pozostaje = 0. hmmm, zatem z 30 CheckBox'ow, trzy to jedn grupa, nastepne cztery to nastepna grupa a nastepne szesc to trzecia grupa itd. jesli wszystkie beda nosic ta sama nazwe to petla bedzie "przeszukiwac" wszystkie True. jak zatem przeszukiwac czesc/okreslona partie z nich? ciekawostka: gdy uzylem po raz pierwszy...
Witam serdecznie i przepraszam z góry jeśli to już było, ale przeszukuję fora od dwóch dni i nic dla siebie nie mogę znaleźć. Nadmieniam że moja znajomość Excela jest na poziomie podstawowym. Mam 2 tabele w 2 różnych arkuszach. Tabela 1 to 12 kolumn 10000 wierszy 1 cos 5900700 cos cos cos cos cos cos cos cos cos 2 cos 5900711 cos cos cos cos cos cos...
Coś takiego tylko żeby szukało wiersze z kolumny A wiersze z kolumny B, a nie z A i B. Sub Makro1() 'cała procedura liczy się hoho i jescze trochę (ale tak to jest z VBA) 'dane na Arkusz1, wyniki na Arkusz2 maxrow = 20 'przeszukiwany zakres maxcol = 20 Sheets("Arkusz2").Acti... Sheets("Arkusz2").Cell...
Witam, Mam pewien problem z napisaniem skryptu w VBA dla potrzeb excela. Już tłumaczę problem. Mam bazę produktów, które są zapisane w arkuszu w formie numerów (przykładowo: 4362712). Program miałby na celu zaznaczenie obszaru spośród bazy który chcę przeszukać (RefEdit). Następnie przyciskiem "Wczytaj" pobierałby do swojej pamięci plik txt, w którym...
makro excel przeszukiwanie komórek przeszukiwanie sieci makro excel petla
kontrolki mrugaj volvo prąd bramki tyrystora parametr maszynowy
stabilizator napięcia prądnicy wideodomofon zamel
Kod błędu 33 w konsoli EHR Fiatagri F140 DT Głośna praca szuflady CD - przyczyny i rozwiązania