Jeżeli działasz na tym pliku, to zmień wszystkie wystąpienia Arkusz5 na Arkusz4. Po tak "wylewnym" opisie problemu ciężko coś więcej powiedzieć... :]
Wstawiam plik z rozwiązaniem problemu, tak jak ja go zrozumiałem. W kodzie makra nie wstawiałem objaśnień, bo zmienne nazwałem aż naddto opisowo. Jeśli czegoś nie rozumiesz z procedury, korzystaj z F1 ustawiając kursor na nieznanym Ci "słowie". Aha, nie zapomnij włączyć makr w Excelu, najlepiej na stale. Dostęp do edytora VBA to chyba wiesz: Alt + F11...
[syntax=vbscript]InStr() i CountIf()[/syntax]
Jeżeli znasz angielski, to nauka pójdzie dosyć łatwo.
Niestety nie działa :/ Oczywiście, że działa ;) Sprawdza wszystkie komórki w zakresie S340. Innego nie podałeś. Do sprawdzenia zakresu >1 komórka należy zastosować pętlę: [url=http://dzono4.w.interia.pl/kurs/for... Szukanie wolnej komórki: Włącz rejestrator makr i nagraj kilka kombinacji Ctrl+strzałka (w dół/górę). Najlepiej z wypełnionymi...
A zwykłe WYSZUKAJ.PIONOWO nie wystarczy?
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...
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)...
Tak na szybko masz tu makro, które chyba robi to co chciałeś. założenia - pliki są w katalogu C:\dane - pobierasz nazwę do szukania z komórki B3 - szukasz takiego produktu w kolumnie B - w obu plikach arkusze nazywają się Dane - zakres poszukiwania w kolumnie B jest ograniczony do 30 - wartość dotycząca szukanego produktu jest pobierana z komórki sąsiedniej...
W taki sposób tego nie zrobisz. Właściwości komórki można porównywać ze zmienną, ale każdą właściwość musisz porównywać osobno. Każda właściwość ma swoją wartość (liczbową, tekstową lub logiczną) i to można sprawdzić i uzyskać odpowiedni wynik, ale nie da się sprawdzić hurtem całego formatowania jednej komórki w stosunku do drugiej. Na przykład możesz...
Najpierw musisz utworzyć marko które będzie się uruchamiała po zmianie tekstu w komórce. Przykład Cells.Find . Na końcu wyrażenia dajesz .Activate i komórki w których znaleziono daną wartość robią się aktywne. Na końcu używasz czegoś [url=http://java2s.com/Code/VBA-Excel-Ac... żeby przejść do właściwej komórki.
W załączniku przykład listy z podpowiedzią zrobiony formułami. Dwie formułki w Menedżerze nazw. Możliwe są 2 warianty. Odpowiednie formuły są pokazane w Arkuszu2. Albo wyszukiwanie po dowolnym fragmencie albo po początku nazwy. Do komórki z listą wpisać hasło i wtedy rozwinąć listę (nie trzeba naciskać Enter).
Ten plik działa prawie poprawnie. Jedyne, co mi się rzuciło w oko to brak nazwy magazynu na arkuszu. Powód: Range("J1").Select ActiveCell.FormulaR1C1 = x Range("H1:M1").Sel... "x". Wyszukiwanie arkuszy OK.
Zupełnie mnie nie przekonuje to rozwiązanie, wpisywanie wartości w jednym arkuszu a potem wyszukiwanie wg kilku kryteriów, automatyczna zamiana lub dopisanie itp. Trochę za dużo kombinacji. Trzeba pamiętać, że działania makr są nieodwracalne, najmniejszy błąd i pozamiatane :( Oczywiście makro jw. da się napisać :) Proponuję inne, wg mnie prostsze rozwiązanie...
Dobry wieczór, Czy koniecznie musi być makro? Nie wystarczy filtr zaawansowany Excela? Moim zdaniem dobrze się do tego nadaje, chyba że fraz do wyszukania jest bardzo dużo. Procedura postępowania: 1. Nad kolumną z danymi umieścić nagłówek np. Lista. 2. Określić szukaną frazę i umieścić ją w wybranej komórce. 3. Utworzyć kryterium, które w przypadku...
Witaj Ponieważ wiemy tylko zakres wejściowy jest nieznany, gdzie wynik, Załóżmy, że R3. znaleźć komórki z największą wartość - colrez=Application.WorksheetFunction.Mat... i skopiuj format do klatki wyniku R3 - Range("S3:AD3").Cells(colrez).copy Range("R3").PasteSpecial xlFormats Application.CutCopyMode = False Oczywiście...
wrzucam teraz plik, w którym dokładnie widać co i gdzie ma być pobierane :cunning: :please: Masz kolego widać straszny problem z jasnym przedstawieniem swoich potrzeb :cry: Ostatnio załączony plik - jak widać na zrzucie 970561 wprowadza tylko jeszcze większe zamieszanie :crazyeyes: (na czerwono zaznaczyłem te komórki w których nie wiem - co to za wartości...
Dzień dobry, Chciałem się włączyć do dyskusji, chociaż trudno zaproponować szybkie rozwiązanie przy tak dużej liczbie danych. Nie chcę proponować VBA, są pewnie lepsi od tego specjaliści, natomiast formuły Excela można na pewno zoptymalizować. Ale najpierw pytanie, czy w przykładzie kolumna I w arkuszu "wynik" zawiera spodziewany wynik? Warunek jest...
Co robię nie tak? Próbujesz porównać wartość komórki z tablicą. Właściwe działanie to, jak wyżej opisano, wyszukanie wartości w tablicy. Tablicą w Twoim przypadku jest zakres B2:B27963. W zasadzie potrzebujesz formuły, która zwróci FAŁSZ lub "dubel" w zależności od tego czy wyszukiwanie zakończy się błędem, czy nie. Połączenie Twoich wysiłków z podpowiedzią...
Zaczne od tyłu: Wprowadziłem ci dwa "rozwiązania" active i inactive. Zwróć uwagę na różnice w formule (jaka wartość jest sprawdzana) i wybierz odpowiednią dla siebie. Dodałem wyszukiwanie nazwy z pierwszego arkusza za pomocą formuły "indeks" I najważniejsza rzecz: wstawiłem ci w formułę 1,03 (marża na sztywno a może uzależnić od innej komórki gdzie...
https://obrazki.elektroda.pl/3303074000_... Przedstawię tutaj projekt "smart" szufladek warsztatowych zintegrowanych z bazą danych części dostępną z poziomu komputera bądź telefonu. Szufladki te ułatwiają wyszukiwanie elementów - po wpisaniu nazwy części zawierające ją komórki są kolorowo podświetlane. Pozwala to szybko i sprawnie znaleźć...
Nie wiem, czy już ogarnąłeś - miałem podobny problem, podpowiem kilka kroków, które metodą prób i błędów pozwoliły mi dodać urządzenie. 1. Zresetuj zgodnie z wytycznymi producenta moduł WiFi. 2. Weź do ręki komórkę, włącz ją na wyszukiwanie sieci i podchodź tak blisko do jednostki wewnętrznej klimatyzatora, aż pojawi Ci się nowa sieć WiFi o dziwnej...
Cześć! Drodzy forumowicze! Mam przed sobą następujące zadanie. Piszę makro które ma za zdanie wysłać maila na wskazany adres pobierając dane (jako treśc maila ) z komórki A1 oraz A2 ale ma wysłać taką wiadomość dopiero kiedy w tym wierszu w którejkolwiek z kolejnych komórek A3-A10 pojawi się umowiony symbol np: 1. Makro powinno działać dla wszystkich...
VBA wyszukiwanie wartości komórek i ich zamiana
Tak dokładnie ma być przeszukiwanie wierszami. Może być jedna formuła, która wyszukuje w prawo i dodatkowo osobna formuła, która wyszukuje w lewo po przekątnej nie uwzględnia liczby, która znajduje się na końcu i następnie dwie wersje formuły, które zawracają do początku. Czyli w sumie 4 wersje. 1111 XXXX XXXX XXXX XXXX 3333 XXXX 1111 1111 XXXX XXXX...
jest potrzebna zmiana koloru komórki na OK i NIE (np. zielony/czerwony) Wprowadź swoją formułę do warunkowego formatowania całej kolumny na pożądany kolor wypełnienia :idea: skopiowanie samego wyniku reguły o komórkę dalej ale tylko samego teksu bez reguł. Formuła w wyniku daje tylko "OK i NIE" - jeśli potrzebujesz w wyniku fragment tekstu poczynając...
Witam! Potrzebuje stworzyć makro które umożliwiło by mi wyszukanie niepustych komórek z jednego wiersza pełnego różnych danych. Np Wiersze (między pełnymi komórkami jest różna ilość pustych komórek): 3 22 4 88 cw z zz eff d aa 7 31 2 75 ah b nh kk e bb Potrzebuje aby wyglądało to tak: 3 4 aa 7 2 bb Czyli chcę aby wstawiło mi wartość pierwszej niepustej...
wracając do powyższego, chciałbym zrobić tak że jak znajdzie się wpis np "KV" w kolumnie B:B to odwoła się do konkretnej komórki. Wstępna ocena dostępnych informacji Użytkownik pragnie rozszerzyć istniejącą formułę Excel, aby w przypadku znalezienia wpisu "KV" w kolumnie B:B , formuła odwoływała się do konkretnej komórki. Aktualnie korzysta...
Posiadam działającą wyszukiwarkę w Excelu, która działa tylko dla jednej kolumny [syntax=vbscript]Private Sub TextBox1_Change() ActiveSheet.ListObjects("Data1").RANGE.A... field:=2, Criteria1:="*" & [a2] & "*", Operator:=xlFilterValues End Sub[/syntax], jak zmodyfikować makro bądź utworzyć całkowicie nowe, aby działało dla wielu kolumn....
Dziękuję bardzo za pomoc. Kod działa, ale nie robi tego czego oczekiwałem. Zdecydowanie to moja wina, bo rzeczywiście za mocno uprościłem swój wcześniejszy opis. Może rozwinę swoją prośbę o pomoc. W Arkuszu2 w kolumnie B (od komórki B7 w dół) znajdują się wyniki aktywnego wyszukiwania "wyszukaj.pionowo" z tabeli z arkusza1. Wyszukiwanie jest aktywne,...
Owszem, jestem tego samego zdania, jednakże wolę zrozumieć kod pisząc go, a nie dostawać wszysko gotowe, stąd moje stopniowe rozwiązywanie problemu. Jeśli jednak plik jest niezbędny, utworzę taki (w tej chwili pracuję na danych, których nie mogę udostepnić). Powracając do tematu, jak wspomniałem wcześniej, wybrałem zapis "AcitiveCell.Value = " zamiast...
Witam serdecznie, potrzebuje pomocy w excelu. Mianowicie potrzebuję by funkcja dla danej komórki sprawdzała czy znajduje się w tej komórce tekst , który znajduje się w innej kolumnie komórce i funkcja ta zwracała wtedy określoną wartość. Niby proste, ale ja potrzebuje by wyszukiwanie odbywało się wśród wielu argumentów, a nie tylko jednego o czym dalej...
Witam. Jak stworzyć makro, które w Arkuszu1 we wszystkich wierszach w kolumnie A wyszuka komórki w których znajduje się wartość np "b2" (wartość b2 jest częścią ciągu jakiś znaków w danej komórce np. takb2abc) a następnie wklei wszystkie znalezione komórki ( z całą zawartością ) do kolumny B w Arkuszu3?
A możesz przedstawić swoje próby? I jeszcze jakbyś sprecyzował "rozlewało się". Wyszukiwanie ma być z jakiejś określonej komórki np jeżeli A2 zawiera wartość pomiędzy 0 i 100 to w B2 pojawia się wartość 1 itd czy może szukanie ma nastąpić w wybranym zakresie komórek?
W arkuszu w dalszym ciągu będą się pojawiały wiersze puste, ponieważ w "PRACE" umieszczone są tylko przykładowe działania, wiec w arkuszu będzie zmieniała się liczba wierszy. Doszły poniższe warunki: Z Arkusza 1 należy wyciągnąć komórki z kolumn A : B, K : O znajdujące się pod wierszami zawierającymi treść "PRACE", aż do wiersza, który w kolumnie A...
Rozwiązałem to w następujący sposób: Kolumny z arkuszy z numerami które chcę sprawdzić (porównać) skopiowałem do jednego arkusza. Zaznaczyłem obszar z numerami który chcę porównać. W zakładce "Narzędzia główne" wybrałem "Formatowanie warunkowe" a w nim "Reguły wyróżniania komórek" i "Duplikujące się wartości". Komórki w których znajdujące się wartości...
Cześć, Na razie udało mi się zliczyć ilość kropek i wyodrebnić z komórki pojedyńcze zdania. [syntax=vbscript]Sub Wypisz() Dim W As Variant, x As Integer Dim Kom As Range For Each Kom In Selection W = Split(Kom, ".") Kom.Offset(0, 1) = "Kropek jest " & UBound(W) For x = LBound(W) To UBound(W) Kom.Offset(0, x + 6) = W(x) Next Next End Sub[/syntax] Potrzebuję...
Dzień dobry, jeżeli jest taka możliwość, to proszę o pomoc w sformułowaniu niżej zdefiniowanych formuł, bo sam zapętliłem się. Formuły mają wyszukiwać ostatnie po lewej stronie, w stosunku do kolumn KW1 i KW2, komórki i zwracać ich zawartość. Występują dwa rodzaje zawartości: liczba i charakterystyczny tekst. Charakterystyczny tekst zawsze składa się...
Witam Mam do Was pytania Wpisuję wartość w wyznaczoną komórkę wciskam enter lub strzałkę następuje wyszukiwanie i obliczenia 1 - dlaczego szybciej otrzymuję wynik po wciśnięciu enter natomiast po wciśnięciu strzałki jest znaczące opóźnienie (nawet 1-2 sekund) ? 2 - kod wyszukujący kończy się ... ... ActiveCell.Offset(0, 3).Select End If End If End Sub...
Wystarczy użyć funkcji Wyszukaj(). https://obrazki.elektroda.pl/4530878600_... Oczywiście, jeże wyszukiwanie ma być w innym arkuszu to trzeba odpowiednio zmienić zakresy komórek (przed zakresami jest nazwa Arkusza np. =WYSZUKAJ(A1;Arkusz1!A1:A5;Arkusz1!B1:B5... ).
Podaj więcej szczegółów. Np. która wersja Excela? Czy masz funkcję X.WYSZUKAJ? Ona nie ma tego ograniczenia do 255 znaków. Poza tym ile znaków ma C1? To znaczy, czy limit 255 jest przekroczony w C1 czy tylko w A1:A6? Ponadto, czy chodzi o niewielkie przekroczenie (możliwość podziału tekstu na 2 fragmenty), czy o znaczne? Czy mają być rozróżniane małe/wielkie...
W komórce A6 są przypadkowo dwa kody. Dane były tworzone ręcznie, żeby nie podawać konkretnych. Natomiast muszę zwrócić uwagę na problem z komórki A13, taka sekwencja liter może wystąpić w opisie. Zastanawiałem się właśnie nad spacjami poprzedzającymi kod. Normalnie przed kodem powinna być spacja, jedynie przy "palcówkach" kod jest poprzedzony znakiem,...
otworzyć, czytać, interpretować i dopiero będzie lista w Excelu, a zdaje się że o to (między innymi) chodziło Szczerze "pisząc", to po przeczytaniu wstępniaka autora mam niejasne wrażenie, że pisał to w przypływie burzy myśli - tak w sumie, ja, nie za bardzo wiem o co autorowi " całościowo " chodzi ... mamy bowiem takie główne jego wątki: 1. Temat...
sprawdź załącznik
Witam. Dziś zrobiłem ten reset. Niestety lipka. Telefon bez zmian, w dalszym ciągu nie współpracuje ze słuchawkami bluetooth. Pozdrawiam Piko. No i jest! Eureka! Okazało się, że opcja logowania urządzeń w zakładce Menu/ komunikacja bluetooth/ wyszukiwanie urządzeń jest mylna, bo niepełna. Wyszukuje tylko inne komórki czyli urządzenia do transmisji dwukierunkowej....
Z góry dziękuję Z góry proszę o plik. Mamy sobie sami tworzyć formularz i wypełniać komórki danymi? No chyba, że chcesz odpowiedź w Paintcie.:)
Dokładnie tak, a warunek jest dlatego taki bo wyszukane wyniki podświetlam kolorkiem tzn jeśli chodziło mi o zmianę koloru to chodzi mi o kolor tła komórki a właściwie wierszy :) Chciałbym wykonywać to tak 1. w pierwszym arkuszu daję aby mi wyszukało i podświetliło na dany kolor // to mam już zrobione 2. jeśli arkusz jest pusty to kopiuje nagłówek tabeli...
Pokazywanie tylko użytych kolorów nasunęło mi pewien pomysł... W załączniku (jeszcze) inna wersja rozwiązania, oparta na zwykłym wyszukiwaniu komórek o zgodnym kolorze. Edit: Sprawdziłem (Timerem) szybkość działania. Przegrywam z rozwiązaniem kolegi marek003 w stosunku 0,25 do 0,87 sek. :)
Spróbuj takie coś: [syntax=vb] Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2012-12-16, autor Darek ' Dim maxIndex, x, y As Integer Range("B1").Select Selection.End(xlDown).Select maxIndex = ActiveCell.Row Dim tablica() As Single ReDim tablica(maxIndex) For x = 1 To maxIndex tablica(x) = Cells(x, 2).Value Next x For x = 1 To maxIndex For y =...
niestety nie wiem jakie adresowanie kompletnie się nie znam działam metodą prób i błędów no i podpieram się domysłami :) Owszem to co podałeś zaznacza komórkę ale nie zadziała przy tym co mam jak zmienić zapis aby pierwsze zaznaczenie trafiało 100% w odpowiednią komórkę ? tzn nie mają one stałych komórek w kolumnie Pozycje wierszy zmieniają się stąd...
makro wyszukiwanie komórki excel makro wyszukiwanie komórki outlook wyszukiwanie
oczyszczenie drutu miedzianego avrstudio timer wariować zegar
Telewizor Samsung LG Sony nie włącza się, brak diody, martwy – diagnoza zasilacza Samsung T220HD – obraz znika po włączeniu, podświetlenie działa, typowe usterki i naprawa
