Jeśli plik jest otwarty to makro pomija wykonanie otwarcia arkusza "baza". a jak jest otwarty to wykonuje dalsze instrukcje: kopiowanie potrzebnych wierszy. Pomija cała instrukcje czyli nic nie robi. czemu przed for each muszę dać otwarty=false a potem odnosić się do otwarty jako true Generalnie nie musisz dać na początku 'otwarty=false' bo zmienna...
Coś takiego: [syntax=vb] Sub szukajDanejWartosci() Dim danaWartosc As Variant Dim liczbaWierszy As Integer Dim liczbaKolumn As Integer Dim i As Integer Dim j As Integer liczbaWierszy = 20 liczbaKolumn = 4 danaWartosc = 0 '<-- TEJ wartości szukasz w arkuszu For i = 1 To liczbaWierszy For j = 1 To liczbaKolumn If (Cells(i, j) = danaWartosc) Then 'MsgBox...
Dodatkowe kolumny z Łączenie A & B & C Tam zastosować podaj pozycie
Jest wystarczająco fragment z zmodyfikowanymi danymi, nie należy wskazać prawdziwe i wszystko 7. Kopiuje zakres np. linii P P, P1 lub P2 - z którego to zależy?
Formułę można wpisać bezpośrednio do całego zakresu: [syntax=vb]Range("K342:O773").Formula = "=VLOOKUP(RC[8],'Próby'!C1:C8,2,0)"[/syn...
Nie daję już rady i proszę o pomoc. Wpisywanie nowych danych działa poprawnie, natomiast gdy dam Odśwież pokazuje mi błąd. Już siedzę nad tym z miesiąc i noga. Nie jestem mocny w te klocki i już myślę nad rezygnacją wpisywania nowych danych przez wywołanie UserForm, i wpisywaniu ręcznie kolejnych pozycji. Tylko że będzie ich docelowo ok 2000. Proszę...
Poczytaj w helpie excela o funkcji "wyszukaj pionowo" lub "vlookup"
Potrzebuję wiedzieć jak zrobić makro Napisać.;) Popatrz tutaj - [url=https://www.elektroda.pl/rtvforum/v... No chyba, że oczekujesz gotowca.
Lub naprosto bez makro
To co chcesz zrobić nie jest takie ciężkie A może zamiast makra wykorzystaj takie funkcie jak indeks(), wyszukaj. pionowo(), jeżeli() ewentualnie adres() i adr.pośr()
jest mozliwe działanie funkcji wyszukaj.pionowo tak jak bym chciała? Jeżeli chcesz to "składać" z komórek to musisz użyć 'adr.pośr' . ale tu pojawi problem bo plik musi być otwarty, więc zostaje makro.
Dobry wieczór, Nie wiem, ile jest tych wzorów i czy będą w nich w danej chwili identyczne ścieżki czy różne. Ale można spróbować tak. W edytorze Visual Basica wpisać sobie proste makro wstawiające do aktywnej komórki albo do komórki o określonym adresie formułę z funkcją WYSZUKAJ.PIONOWO. [syntax=vb]Sub WstawWzor() ActiveCell.FormulaLocal = _ "=WYSZUKAJ.PIONOWO(J6;'C:\Users\user\Des...
To było mówić że makro ma być w innym pliku. Kłopotem było to że makro pobierało nazwę pliku z pliku w którym nastąpiło wywołanie procedury. Poniżej poprawka. [syntax=vb]Sub OrderBuilder() ' ' OrderBuilder Makro ' Order building ' ' Klawisz skrótu: Ctrl+q ' Dim i As Long, ostWrs As Long 'otwarcie plików Workbooks.Open Filename:="D:\Desktop\NotWMS\Działa\expo...
Czy mógłbyś załączyć to makro, które masz?
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]...
Dalej jest źle bo nie to spakowałeś ale już stworzyłem sam. Na razie bez makro ale dodałem kolumnę pomocnicza D (Jak masz dane to prawy klawisz myszy na literę kolumny D i "Wstaw"
pokazyje błąd. Nie powinno tak być, albo nie rozumiem. WYSZUKAJ.PIONOWO(A1;Y!A:B;2;0) tylko wtedy, jeśli LICZ.JEŻELI(Y!A:A;A1)>0 Innymi słowy jeśli w Y jest, w przeciwnym razie zapisz ""(empty string) Czy możliwe by nie zmieniał komórki Arkusza X. jesli nie wyszuka w Arkuszu Y odpowienika ? Nie, bo jesteśmy wszystkie formuły przepisze w klatki kolumny...
Hmm, chcesz rozdzielić wynik formuły na liczbę całkowitą i ułamkową a następnie znaleźć Nr wierszy i kolumn składników w tabeli? Jeśli tak, to formułami chyba nie bardzo. Każda potrzebuje wskazania kolumny, wiersza lub wektora wynikowego. Pozostaje makro...
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...
Dzień dobry. Bardzo proszę o pomoc w rozwiązaniu pewnego problemu z funkcją WYSZUKAJ.PIONOWO, z którym niestety nie poradziłem sobie jak również nie znalazłem odpowiedzi na forum. Napisałem makro, które w kolumnie AV ma podać wyszukaną wartość z zakresu kolumn AC:AD, która odpowiada szukanej wartości (wartość "A" - znajdująca się w kolumnie AC) a z...
Kopiuj całe wiersze. Odpowiednia linia jest w makro w załączniku. Usuń apostrof opisanej linii, wyrzuć/zaapostrofuj trzy następne (od For do Next).
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...
Po wpisaniu dostaję ścieżkę do pliku Gdzie to wpisujesz? W komórkę w arkuszu. Obok mam formułę wyszukaj pionowo, po wpisaniu numeru dostaje ścieżkę do pliku.
Jest jeszcze jedno małe ale przy wyszukaj(). Znajduje zawsze pierwszą wartość z listy.
marcinj12 dziękuję Ci bardzo za te cenne wskazówki rozbudowałem swoje makro o nie i teraz wszystko śmiga tak jak chciałem.
w trzeciej sama trasa wypisana w formacie: sklep_xxx-sklep_yyy-sklep_zzz Jeśli dobrze zrozumiałem, to myślnik jest znakiem rozdzielającym nazwy sklepów, których trzeba wyszukać? Jeśli tak, to najprościej rozbić ciąg funkcją Split i zapisać w tablicy. Następnie wyszukać kolejne wartości w pętli For, gdzie licznikiem będzie rozmiar tablicy. Wynik można...
Mam problem z dokończeniem makra w vba, mianowicie chce wyszukać wyrazy (znaczniki html) wpisane do komórek w excel-u, w całym arkuszu. Arkusz posiada 5 kolumn i około 6000 wierszy. Po wyszukaniu wyborderować i zmienić kolor ich czcionki na czerwony. Zdaje się, że źle się do tego zabierasz. Na razie pętla mieli A1 i na oko będzie mielić bez końca (pętla...
Jaki numer wpisujesz? Pełny '2014NB 03501000-1-00', czy jakąś jego cześć? Makro sprawdza 15 znaków od lewej, czyli '2014NB 03501000'.
ja bym zrobił tak, ze zrobiłbym rzeczywiście pomocnicza kolumnę C, gdzie łączyły by się zawartości obu kolumn np =A2&B2. Wtedy wkepujemy funkcję wyszukaj pionowo w kolumnie D gdzie będziemy wyszukować wartości z kolumny C ( z arkusza docelowego) i porównywać je z tabelą z arkusza roboczego odnoszącej się do kolumny nr 3 (jeżeli zaznaczasz jako tabelę...
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.
Witam wszystkich, Potrzebuję pilnie informacji jak zapisać makro działające jak WYSZUKAJ.PIONOWO z odwołaniem do arkusza2 czyli mojej tabeli danych. Temat pewnie nie byłby jakoś strasznie skomplikowany gdyby nie fakt powtórzenia obliczeń do końca aktywnych kolumn ale również na zasadzie powtórzeń w wierszach ze stałą równicą 7wierszy - powtórzenia oczywiście...
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...
Obecnie mam jedynie takie okienko do wyszukiwania, wyszukiwanie działa ale jak do tego okienka dodać jeszcze zdjęcie wyszukanej pozycji żeby było wyświetlane wraz z wyszukanymi danymi? Proszę o pomocccccc
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. 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(("*"...
Wyszukaj.pionowo sprawdza się bardzo dobrze jeżeli dane nie powtarzają się (nr telefonu) Jeżeli może być parę wierszy z danym nr telefonu wtedy pozostaje do zastosowania autofiltr ... lub odpowiednio sporządzone makro (kopiujące autofiltr lub oparte na własnym "wybiórczym" kodzie).
Jeżeli nr klienta jest unikalny, to można skorzystać z funkcji "wyszukaj pionowo", ewentualnie napisać makro, ale funkcja będzie prostsza.
Na podstawie pliku czas_pracy.xls przygotowałem przykładowe makro. W skoroszycie czas dodałem w komórce A2 ilość pracowników wyszukaną funkcją =ILE.NIEPUSTYCH(A3:A5000). Dodałem nowy skoroszyt "Warunek" w którym znajdują się komórki z funkcjami wyszukującymi interesujące nas godziny : =BD.MIN(dane!$A:$D;C$1;$A$1:$B$2) i =BD.MAX(dane!$A:$D;D$1;$A$1:$B$2)...
A więc to co sobie wymyśliłeś jest dosyć mocno skomplikowane. Można by próbować napisać makro, ale trzeba by przemyśleć algorytm i trochę nad nim posiedzieć... Można też próbować w następujący sposób: Każdą z baz - A - B - wrzucić do oddzielnych zakładek. Doprowadzić bazy do takiej postaci, jak na rysunku 1. Posortować pary indeks-zamiennik (najpierw...
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...
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ć....
Zapomnialem zaznaczyc ze jestem troche zielony.. Dodano po 24 Ohm, juz zamkniete, zrobilem, dziekuje. Wszedlem po prostu w makra, nagralem makro - edytowalem je w visual basicu i wkleilem kod do przycisku :)) wyglada on tak: ActiveCell.FormulaR1C1 = "=VLOOKUP(R23C12,Podsumowania!R3C1:R32C5... Range("I27").Select Pozdrawiam. Dodano po 19 Niestety...
Użyj mkdir <pełna nazwa kalatogu> To ryba, a teraz wędka: Google i wyszukanie np. "vba excel create folder", i masz wiele artykułów. Najbardziej lubię czytać te związane z M$, ale i inne też.
[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...
w pliku z Programem zamówień jest tysiące detali Jeśli tylko zachowasz porządek w tabeli Plan produkcji (bez dubletów i posortowane kody :!: ) to możesz i w takim przypadku wykorzystać formułę :D [syntax=vbscript]=JEŻELI.BŁĄD(JEŻELI(WYS... Produkcji (1).xlsx]Arkusz1'!$A$2:$F$100;3;FAŁSZ)>0... "&JEŻELI(WYSZUKAJ.PIONOWO(G3;'[Plan...
A to musi być makro? Nie może być funkcja wyszukaj.pionowo. W arkuszu 2 w komórce B8 wpisujesz: WYSZUKAJ.PIONOWO(A8;Arkusz1!$C$1:... i przeciągasz w dół a w C8 wpisujesz: WYSZUKAJ.PIONOWO(A8;Arkusz1!$C$1:... i przeciągasz w dół A aby to ładniej wyglądało lepiej wpisz tak w komórki: B8 =JEŻELI(CZY.BŁĄD(WYSZUKAJ.PIONOW...
Obawiam się, że bez VBA ani rusz... Umieściłem sobie katalog na pulpicie, w D1 wpisałem adres mojego pulpitu, napisałem makro uzupełniające kolumnę C, nacisnąłem przycisk i... u mnie zadziałało.
[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...
No to tylko makro. To teraz pytanie: kiedy mają się uaktualniać dane w poszczególnych arkuszach? np. po wciśnięciu klawisza zatwierdź jak wprowadzisz nową umowę? Czy jakimś innym "automatem", ale automat też musi wiedzieć po jakiej twojej reakcji się włączyć?
I tak to robimy do tej pory. Tylko porblem polega na tym ze wybieranie odpowiednich danych do drugiego pliku zabiera za kazdym razem 3 godziny. Szkoda czasu. A po za tym bardzo latwo o pomylke, bo tych danych jest dla ponad 100 maszyn. Wiec jakies makro bylo by tutaj wskazane. Probowalem sklecic jakies formuly ktore by to za mnie zrobily ale nie moge...
z automatu wszystkie zmieniało mi na właściwe nazwy w której kolumnie? Jeśli zamiast jednej z nich, to tylko makro Jeśli w trzeciej, wtedy funkcja WYSZUKAJ.PIONOWO powinieneś mieć słownik ID i nazw w każdym przypadku
Jeżeli będziesz pisał makro, możesz mu zadać rozmaite czynności do wykonania, jak zaplanujesz, tak ono powinno zadziałać.
A już myślałem, że jakiś ciemny jestem :) A gdyby tak zastosować (tablicowo) naszą ulubioną w ostatnim czasie MAX? Próba na pierwszym pliku kolegi marek003 : http://obrazki.elektroda.pl/9077995900_1... Gdzie w S1 wpisujemy po prostu A i dalej (przez Ctrl+Shift+Enter) =JEŻELI(CZY.BŁĄD(WYSZUKAJ.PIONOW...
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...
Chce zautomatyzować raportowanie bo raport źródłowy ma masę pozycji i mnóstwo zakładek, a zestawienie końcowe jest ubogie w stosunku do źródłowego. Samo przenoszenie do innego pliku ogarnąłem. Największy problem mam z wyszukaniem konkretnej wartości w źródle i wyeksportowaniu wartości z pozycji niżej/wyzej. Dodano po 27 Poniżej prosty Excel który zrobiłem...
Czy to koniecznie musi być makro? Bo to co chcesz zrobić można załatwić funkcją WYSZUKAJ.PIONOWO, dla przykładu z załącznika w komórce D2: [syntax=vb]=JEŻELI(CZY.BŁĄD(WYSZUKAJ.PIO... przeciągnąć w dół...
Poczytaj o WYSZUKAJ.PIONOWO, a jeżeli makro to o VLOOKUP.
W komórce b1 wpisz =wyszukaj.pionowo(a1;... dalej nich zaciąga z innego arkusza). Zapytanie wpisujesz w a1 i w b1 pojawia się Tobie wynik.
Hmm... Trochę więcej tych danych, niż się spodziewałem. Najprościej byłoby dodawać[syntax=text]WYSZUKAJ.PIONOWO(RAN... MIN w kolumnie C, to 2, MAX - 32, suma kolumny 80326 (losowań) w 5000 wierszach :( Nie mam tyle cierpliwości. No i będzie się działo gdy zmienią się dane w kolumnie C. LOS, MAX.K, INDEX(... w...
1. Porównywać daty w instrukcji warunkowej. 2. Wyszukać ostatni niepusty wiersz i podstawić: Range("A" & ostNiepusty).Select
No dobra ;) Generalnie każdą formułę można wstawić makrem, wystarczy ją nagrać macro recorderem i troszkę zmodyfikować. Dla WYSZUKAJ.PIONOWO jest to coś takiego: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Application.Calculation = xlCalculationManual With Sheets("Arkusz1") ost_wiersz = .Range("A"...
To całkiem inne zagadnienie, wogóle nie związane z tematem i bardzo prościutkie [np. za pomocą wyszukaj.pionowo()] ale załóż własny temat. (bo jak między innymi podziękujesz za pomoc???)
Witam serdecznie. Potrzebuję stworzyć makro które pozwoli mi seryjnie szukać wyniku za pomocą goal.seek kodem VBA Wiec Tak mam arkusz o nazwie "Brudnopis" zakres komórek od A5 do AT 330 Wynik które chcę zmienić jest w kolumnie K (wynik formuł) (niebieski) Parametr zmieniany - Kolumna J (żółty) Wynik który chcę uzyskać - Kolumna L (szary) Problemem jest...
Wyszukaj.pionowo() w tym przypadku raczej nic nie da. Najprościej to wykonać za pomocą autofiltra i kopiowania, kilka minut roboty. Można też napisać krótkie makro, ale to nie jest moja mocna strona :( Załączam pliczek po kopiowaniu autofiltra.
Piszę w Excelu pewne makro i utknąłem :( Nie wiem, jak odczytać numer kolumny, w której znajduje się wyszukana komórka, czyli w krokach: 1. Wyszukuje na arkuszu komórkę, która ma określoną treść. 2. Ustalam numer kolumny 3. Tą wartość zapisuję do jakiejś zmiennej. Jak to sensownie zrobić w VBA? Z jakich funkcji skorzystać?
Ale wiesz że mówimy tutaj o VBA ? Pozatym nie chodzi żeby dopisać te osoby z prawej strony w lewej tylko żeby wyszukał osoby z lewej ( miejsza ilośc osób ) w prawej ( większa ilośc osób ) i zaktualizował te liczby z prawej w lewej.
Tak z ciekawości postanowiłem sprawdzić czy da się prostymi formułami. Dla ułatwienia przyjąłem, że maksymalnie może być 5 powtórzeń. Jeśli ma być więcej, trzeba dołożyć warunki w kolumnie H oraz poszerzyć "grupy" w kolumnie N - Arkusz2. Wysokość tabeli wynikowej wg rozmiaru w Arusz1 4x3=12 komórek Trochę prymitywnie, ale działa :) Edit: wyszukaj.pionowo...
Chciałbym utworzyć funkcję wyszukaj pionowo z parametrami w VBA Mam 2 arkusze. Baza -zawiera numery kont przypisane do numerów oddziałów Arkusz -zawiera numery kont oraz kwoty ale, brakuje numeru oddziału. Samo wstawienie funkcji wyszukaj pionowo mi nic nie daje. Potrzebuję to samo ale w języku VBA. Próbowałem tworzyć makro ale w marko jest kod VLOOKUP...
Witam, jestem zielona w tworzeniu kodów VBA. Mam dużą liczbę klientów, z których każdy ma pewną gamę produktów i plików do tych produktów przypisanych. Wszystkie te dokumenty zapisane są na serwerze. Utworzyłam w excelu listy dla każdego klienta na osobnych zakładkach z hiperłączami odnoszącymi się do tych dokumentów. Na pierwszej zakładce zrobiłam...
Witam, Uprzejmie proszę o pomoc. Jak zapisać numery wyszukanych kolumn do zdefiniowania zmiennej / obszaru Array ? Mam taki kod wyszukiwania (prościutki i działa): For Each Kolumna In Szukane_kolumny ' szukanie kolumny w zdefiniowanym zakresie Set Znaleziony_Kolumna = Zakres_kolumn_zrodlowy.Find(What:=Kolumn... LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns,...
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...
Chciałbym mieć formułę lub makro, które pozwoliłoby mi wyszukać w kolumnie A prawidłową nazwę przedmiotu na podstawie czterech pierwszych znaków w innym arkuszu
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
Tego się nie da tak po prostu wkleić do nagranego makra. To trzeba połączyć logicznie, to znaczy trzeba rozumieć, jak działa makro, przetestować je, a potem modyfikować jeśli trzeba. Jest potrzebne jakieś minimum wiedzy na temat makr. Poza tym nie każde nagrane makro działa tak jak byśmy chcieli. Niektórych rzeczy nie da się nagrać, a niektóre są źle...
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...
o ile samo makro po wprowadzeniu w zmiany udaje mi się uruchomić to nie potrafię wykombinować jak wyszukać nazwę(kolumna A) z arkusza nr 1 w arkuszu nr 3 i wrzucić w odpowiednie miejsce skopiowaną wartość komórki "Data"
Odpuszczam z tymi stronami, stworzyłem sobie szblon i makro które bedzie samo nadawało numer. Żeby nie zaczynać nowego tematu, mam jeszcze jedno pytanie. Czy można stworzyć przycisk makro, z funkcją wyszukaj. Tak, żeby można było wpisać szukane hasło i wyszukać je w arkuszu jak to się robi przy pomocy ctrl+f
Witam serdecznie! Mam problem z makrem. Chcę w makrze wskazać plik xls* i zamienić go na txt, w którym zamiast Tab jako separator byłby ";". Napisałem na razie takie makro, ale niestety nie jest to pełne. Przepraszam ale jest to moje pierwsze podejście do VBA, dlatego może być to bardzo złej jakości i jest na 100% niekompletne. [syntax=vbscript]Option...
Zainteresuj się instrukcjami obsługi plików. Np Instrukcja używana do zmiany nazwy pliku dyskowego lub folderu (katalogu). Składnia rozkazu Name: Name StaraNazwa As NowaNazwa Sprawdzaj w pętli cztery (trzy w drugim przypadku) znaki od lewej każdego jpg, wyszukaj w kol.B, podstaw z kol.A i zmień nazwę
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, 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,...
Zacznij od nagrania makra, w którym edytujesz komórkę i wciskasz enter. Rejestrator przetłumaczy funkcje na ich zapis w VBA. Potem ubierz to w funkcję użytkownika (user function) - materiały do wyszukania na google, np.: [url=https://www.hintmine.com/jak-napisa...
Witam To jest makro wyszukane w jakiejś książce nie pamiętam. Tworzy nowe skoroszyty dla filtra z tabeli przestawnej. Zmień fragment aby tworzyło nowe arkusze Dodano po 6 Proponuję stronę helion.pl Tam do książek są przykłady na FTP. Skarbnica przykładów ;-)
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...
Udało mi się dopasować pliki i przetestować. Za każdym razem pojawia mi się komunikat - w schowku jest duża ilość informacji, czy chcesz później wklejać je do innego programu. Może źle dopasowałem? nie mam wprawy w excel. Czy można wprost przenosić dane bez np formuł. Tzn w każdym pliku jest lista rozwijana z RM (wybór z kilkunastu opcji), czy też wyszukaj...
zwróci datę jeżeli suma w kolumnie D przekroczy zadaną wartość. Jest niemozliwe wpisac date przy pomocy funlcji np.Dzis(), poniewaz jutro formula zwraca juz inna date. Dodano po 2 Nie może być użyte VB ani macro Już może ? Nie mogę mieć pliku z makrem. (Zabezpieczenia serwera pocztowego :) ). Makro które przesłałem służy do zobrazowania jaki cel chciał...
...Próbuję rozwiązać problem - w jaki sposób podając NIP , ewentualnie nazwisko w arkuszu z WZOREM FAKTURY, można z arkusza z listą danych osobowych klientów, przenieść wszystkie dane tego klienta do wzoru faktury? Jeżeli NIP (nazwisko) jest w tym samym wierszu co reszta danych to możesz to zrobić za pomocą funkcji wyszukaj.pionowo() indeks() w powiązaniu...
Witam, posiadam plik w którym mam zapisane w dwóch arkuszach dane , gdzie należy wyszukać z arkusza dane po zmiennej czas w kolumnie =suma.jeżeli(A2=czas!A:A;wyszukaj.pionow... ale niestety nie działa :( Czy ktoś może mi pomóc w napisaniu makra, lub modyfikacji formuły aby zadziałała poprawnie?
Popełniłeś dwa błędy w jednym wierszu... Do wyboru If IsNumeric((Cells(i, "I").Value)) = True Then If IsNumeric((Cells(i, 9).Value)) = True Then Natomiast wyszukanie ostatniego wiersza z nazwiskiem możesz zrobić w pętli przez porównanie. Np (dla wierszy od D2 w dół) taką Sub petla() For...
Można to rozwiązać "Wyszukaj pionowo", tylko on nie zostawi starych nr (bo nie bedzie takich nazwisk w arkuszu 2), a wstawi "no data" badz cos podobnego. Można to zrealizować przy pomocy WYSZUKAJ.PIONOWO i wraz z JEŻELI(CZY.BŁĄD i zostanie nam stary numer. W komórce C2 pierwszego arkusza wpisz: =JEŻELI(CZY.BŁĄD(WYSZUKAJ.PIONOW...
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.
Z treści Twoich opisów wnoszę, że zależy Ci na skopiowaniu z bazy wybranych rekordów, które mają w kolumnie "potwierdzenie" wpis OK. Jeśli nie ma jakiś przeciwwskazań - to proponuję zmienić trochę koncepcję rozwiązywania tego zadania :D : - oba zestawienia umiejscowione są w jednym pliku baza.xlsm ; po jakiejkolwiek zmianie w arkuszu "lista", możesz...
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ć...
Jak w jednej komorce jeden produkt, naprosto formatowaniem warunkowym bez makra
Funkcja LOS() przeliczna jest przy każdej zmianie w arkuszu. Jeśli wpiszesz odpowiedź, to po zatwierdzeniu enterem wartość a jednocześnie szukana fraza zmienią się... Trzeba podeprzeć się VBA, chociażby dla wyłączenia przeliczania. Moim zdaniem wygodniej będzie umieścić makro losowania pod przyciskiem. Poczytaj o: Randomize i funkcji Rnd . Jeśli jednak...
Cześć Mam makro które otwiera exela z zasobu kopiuje z niego dane do drugiego potem robi wyszukaj pionowo itp. Mam jednak problem tego typu że plik z którego pobierane są dane jest czesto zablokowany do edycij i trzeba go odblokować. Próbowałem formuł jak poniżej: Windows("20230725_INT.xls"... Application.WindowState = xlNormal...
Tu do formatowania bym się nie czepiał. Jest powiedzmy ok (choć można było prościej) Ewentualnie zmienił bym warunek pojawiania się napisu "Blokada otwarta"/"Blokada zamknięta" co by z jednej strony "ustawiało" kolorki ale ... niestety nie zmieniała by się literka w kolumnie G I tu by mógł powstać kolejny wyjątek bo rozumiem że np. nagle znów byś chciał...
1-Zadaniem makra jest wyszukanie wszystkich takich samych nazwisk i wyświetlenie ich . 100 Kowalskich ma się wyświetlić w MsgBox? Jeżeli nie jest to zadanie ze szkoły, to proponuję umieścić w arkuszu wynikowym powtarzające się nazwiska oraz ilość ich powtórzeń.
Do skopiowania wyników filtrowania w inne miejsce aktywnego arkusza. Można to obejść w VBA. Wiec nie rozumiem w czym problem? W arkusz1 masz bazę. W arkusz2(aktywny) kryteria filtrowania i określenie miejsce w które chcesz odfiltrowane dane umieścić. Jeżeli operacja ma być jednorazowa, robisz to "z ręki". Jeżeli robisz to często, lub potrzebujesz odfiltrowania...
Witam! Od czasu do czasu korzystam z VBA lub po prostu rejestruję proste makro, żeby ułatwić sobie pracę. Ostatnio natrafiłem na problem. Zarejestrowałem proste makro ułatwiające dodawanie kolejnych odczytów do tabeli w arkuszu, który jest częścią większego skoroszytu, ale innych makro w nim nie ma. Ku mojemu zdziwieniu okazało się, że makro czasem...
makro excel wyszuka pionowy wyszuka wszystek excel makro wyszuka pionowy
gniazdo przelotowe końcowe potencjometr reloop whirlpool czyszczenie filtra
elektrolux ewf10479w pralka electrolux inwerter
Wymiana łożyska kulkowego w szlifierce kątowej MAC Allister Obliczanie transformatora spawarki - krok po kroku