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)...
Nagraj makro.
sprawdź załącznik
Ponieważ zamknąłeś topik adamasa_nt i uważam że jest jak najbardziej trafione.
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...
[syntax=vbscript]Sub Dopisz() nw = Cells(Rows.Count, "C").End(xlUp).Row + 1 For x = 5 To nw If Cells(x, "C") = "" Then Range("C" & x) = "Szukaj pierwszej wolne i wpisz, za każdym kliknięciem" Range("D" & x) = "1" Range("F" & x) = "Przykład" Range("C" & x).Interior.ColorIndex = 37 Range("E" & x) = Application.UserName Range("C" & nw + 1).Activate Exit...
Co masz na myśli pisząc "karta"? Dla arkuszy skoroszytu można zagnieździć kod w kolejnej pętli For ark = 1 to thisworkbook.sheets.count ' lub liczbowo indeksy Np 2 To 4 sheets(ark).select 'kod Next
Witam Panowie potrzebuję pomocy przy stworzeniu makra które: Będzie wyszukiwało Komórkę w drugim arkuszu o takiej samej nazwie jak w komórce B18 w pierwszym arkuszu i dodawało do komórki przesuniętej o dwie kolumny w drugim arkuszu wartość komórki K18. Ktoś pomoże? Pozdrawiam
Następnym razem jako przykład załącz skoroszyty Excela a nie zrzuty ekranu. Przetestuj kod: [syntax=vbscript]Option Base 1 Sub podziel_autorow() Dim tblTmp() As String Dim lLstRw& Dim i&: i = 1 Application.ScreenUpdating = False lLstRw = Cells(Rows.Count, 1).End(xlUp).Row Columns(3).EntireColumn.Insert Cells(1, 2).Value = "autorzy" Cells(1, 3).Value...
Przecież już tą kwestię Ci rozwiązałem w makrze kilka pozycji do góry. Chodzi o to makro pracujące w pętli for. Należy tylko podać w pętli for argument jak wiele artykułów ma sprawdzać. Można też to makro rozbudować aby samo sprawdzało ile jest rekordów i zapisywało do zmiennej.
Potrzebuję makro wyszukujące zadaną wartość w nieokreślonym zakresie arkusza. Nie mogę określić konkretnego zakresu ponieważ zakresy są różne. Wyszukiwanie zawsze zaczyna się od A1. Makro zawierające: "For Each komórka In ActiveSheet.Cells" wyszukuje zadaną wartość przeszukując arkusz w poziomie tzn. komórka A1, B1, C1 ..., następnie A2, B2, C2 itd....
Cześć Jestem początkujący w VBA. Próbuję stworzyć makro które będzie na podstawie porównania wiersza i kolumny wstawiało znak " "X" w komórce która jest ich wynikową ( komórka która jest wynikową przeciecia się wiersza z kolumną). Poglądowe zdjęcie w załaczniku tzn. Jeżeli ćwiczyłem 04.04 martwy ciąg to X powinien zostać wpisany automatycznie w komórkę...
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)...
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.
Makro to wyszukuje komórki z tłem i je sumuje Trzeba było napisać ;) : "Makro ma sumować wartości komórek z określonym kolorem tła". Ale to nie powinien być problemem, żeby zmodyfikować podany przeze mnie kod? No dobra ;) Sub sumowanie_w_zaznaczeniu() '(c) "fascynat" 'Sumuje wartości komórek o określonym kolorze tła w zaznaczeniu...
zwróci tą wartość do komórki A2 w innym arkuszu "Arkusz 1", następnie znajdzie następną niepustą i zwróci ją w A3, kolejną w A4 itp Proponuję jednak zrobić przykładowy plik z ewentualnym opisem co ? i kiedy ? ma robić to makro ? - np jeśli zmieni się "wypełnienie" kolumny D niepustymi komórkami to przy kolejnym przebiegu makra - mają być kopiowane...
Moje makro wyszukuje i koloruje tylko samą kropkę :?: :not: Jeśli chcesz zmienić kolor czcionki w całej komórce zawierającej "." to zastosuj kod :spoko: [syntax=vbscript]Sub Koloruj() Dim zakres As Range Dim kom As Range Set zakres = Selection For Each kom In zakres.Cells If InStr(1, kom.Value, ".", 1) > 0 Then kom.Font.ColorIndex = 1 End If Next End...
Zdecydowanie łatwiej się porozumieć na bazie załączonego pliku . Widać wtedy różne niuanse, które mogą wydawać się z pozoru nieistotne, a poza tym można przetestować proponowany kod. Powinien działać kod: [syntax=vbnet]ActiveCell.Value = Application.WorksheetFunction.VLookup("s... Worksheets(Range("B6").Value).Range("A:E... 5, False)[/syntax]Zakładam,...
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.
Pierwsze makro - czy ma znajdować jedynkę w tekście, który może być dłuższy, czy też wyszukiwać komórki tylko z jedynką, a komórki gdzie jest coś więcej ignorować?
Proponuję makro zdarzeniowe przy założeniu, że adresy komórek z listami wyboru będą stałe. Można byłoby też wyszukiwać listy rozwijane gdyby ich adresy miały być ruchome. [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target = "TAK" Then Select Case Target.Address Case "$G$2": Range("G8").Select Case "$G$8": Range("G12").Select...
Bardzo dziękuje, Własnie o to mi chodziło teraz staram sie wyszukiwać te "check boxy" :)
W arkuszu "raport" zaznaczam jako aktywną komórkę E5. Naciskam przycisk "pokaż szczegóły" do którego podpięte jest makro i otrzymuję to co znajduje się w arkuszu "wynik kliknięcia".
Witam, Nie mogłem znaleźć nigdzie satysfakcjonującej odpowiedzi na dręczący mnie problem makra. Mianowicie, prowadzę magazyn za pomocą excel. Wprowadzamy dane skanerem, ale przy wydawaniu, wyszukujemy konkretny numer etykiety poprzez Ctrl + F a następnie zaznaczamy kolorem żeby potem zastosować filtrowanie przez kolor komórki. Teraz chciałbym zrobić...
Można przypisać dowolną kombinację klawiszy do makro wyszukiwania (żeby łatwo było je uruchomić) np. takiego: Cells.Find(What:=Cells(1, 1), After:=ActiveCell, SearchOrder:=xlByColumns).Select Jeszcze lepiej zastosować przypisanie opisane w moim poprzednim poście (...)What:=strSzukana(...). Do szukania tylko w 1 kolumnie można...
Witam Po raz kolejny zwracam się z prośbą. Potrzebuje zrobić makro które będzie mi kopiowało wartość komórki A35 z pierwszego arkusza o nazwie "Pierw" do pierwszego wolnego wiersza w arkuszu o nazwie "Po za" Jednocześnie potrzebuje też makro które będzie wyszukiwało komórkę w arkuszu "Po za"( i kasowało ją) o takiej samej zawartości jak komórka A35...
Wprowadziłem formuły i formatowania warunkowe do komórek arkusza BAZA i po wpisaniu nowego kodu, istniejącego w BAZA_ETYKIET, wyszukuje ilość z BAZA_ETYKIET i odpowiednio kolorują komórki arkusza BAZA.
przykro mi ale widzę że niedokładnie przeczytałeś mój opis potrzebuje żeby przy każdym kolejnym dołku wartość wstawiana była z komórki obok poprzedniego dołka.
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ć...
Plik ustawiam jako tylko do odczytu, bo o to mi chodzi i jest to intencjonalne. Sam plik .csv otwieram bez pomocy makra w excelu i widzę określoną strukturę. Niestety, kiedy plik jest otwierany przez makro, struktura się zmienia. Może by mi to nie przeszkadzało tak bardzo, gdyby nie zmieniał jednocześnie w konkretnej kolumnie formatowania komórki z...
Witam Potrzebuje pomocy z napisaniem makra ale nie za bardzo wiem jak się za to zabrać. Jeśli ktoś mógłby pomóc byłbym wdzięczny. Mianowicie chodzi mi o makro , które wyszukuje w wierszu komórki o wartości np: 100, 200 i 300, jeśli znajdzie w wierszu wartość 100 przechodzi do pierwszej kolumny tego samego wiersza i wpisuje np "aaa", jeśli znajdzie 200...
Witam, Posiadam makro wyszukujące w kolumnie A1 komórki zawierające określoną wartość, wynikiem tego wyszukiwania jest zakres komórek zawarty w zmiennej typu Range. Chciałbym następnie ten zakres rozszerzyć o kilka kolejnych kolumn np. B,C,D (ilość wierszy oraz ich adresy zostają takie same jak na początku, dochodzą tylko kolejne kolumny). Jak coś takiego...
Faktycznie strasznie zawile to tłumaczysz. Chyba się domyślam scenariusza, pewnie zmieniono indeksy magazynowe, a tym masz zrobić zestawienie z poprzedniego roku kiedy były jeszcze stare, tak aby można było porównać dane z tymi z roku bieżącego. Masz dwie operacje. 1.Zamiana indeksów 2.Sumowanie Uważam, że makro zbędne. No chyba, że będziesz to robił...
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....
Metoda ogólna: zarejestruj makro w którym zrobisz tylko wyszukiwanie. Następnie wejdź w to zarejestrowane makro i już masz co poprawiać. Podczas poprawiania powinna (u mnie nie zawsze jest) uruchomić się podpowiedź.
Bo jesli dodasz dwie kolumny do każdego działu, to w makrze Kopiuj() musisz poprawić krok wyszukiwania z 4 na 6: [syntax=vb]For kol = 1 To 255 Step 6[/syntax] i, ewentualnie, tam gdzie teraz kopiujesz komórki od C do E zwiększyć od C do G i kol+5: [syntax=vb]Worksheets("Arkusz1").Range("... & Selection.Row & ":G" & Selection.Row).Copy .Range(.Cells(wiersz,...
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.
Tak się zastanawiam patrząc na ten kod... Co będzie, gdy w jednej komórce znajdzie "koty w kinie samochodowym"? Podmieni 3 słowa w jednej komórce ("KOT w KINO SAMOCHÓD") ? Przy rozwiązaniu (at)clubs powinno zamienić całą zawartość komórki na "KOT", czy się mylę?
Witam:) Nie wiem czy to dobre miejsce na ten temat ale jakoś nie mogę połapać się na tym forum a tym bardziej założyć nowy temat Bardzo proszę o pomoc, mam zadanie tego typu chciałbym aby makro wyszukiwało mi zakres aktywnych komórek np (A1:A2) z przykładowymi wartości np 1,2,3,4,5...20 i chciałbym aby pętla kopiowała mi te wartości określoną ilość...
Nie da się tego przedstawić w formule, ponieważ chodzi o to żeby makro WKLEJAŁO nowe komórki gdy znajdzie więcej niż jeden odpowiednik. Tak samo, żeby makro zliczało wszystkie powtarzające się wartości i do nich odpowiednio przypasowywało dane.
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...
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
Ja bym zrobił makro, które w pętli będzie wyszukiwało pierwsze wolne pole w kolumnie B i tam wstawiało wartość z A1
Hej, szukam pomocy, ponieważ poszukuję makra, aby excel aktywną komórkę wpisał w polu wyszukiwania w outlooku. Jedynie co znalazłem to niestety pobieranie wszystkich maili, bądź otwarcie ostatniego maila, a mi zależy jedynie na powyższym. Wiem, że to wydaję się proste, ale chyba tak proste to nie jest :( Błagam o pomoc. Z góry dziękuję za pomoc.
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...
... jak masz zamiar je wybierać? ... z tym mam problem ... Nie masz żadnego - po prostu w dodatkowym arkuszu ("konfiguracyjnym") w pewnym zakresie komórek (np. kolumny "A") wpiszesz sobie jeden pod drugim owe nagłówki do wyszukiwania. Makro będzie pobierać nazwy nagłówków (z tego zakresu) i wyszukiwać je w pętli po pierwszym wierszu arkusza z tabelą...
Witam, Chciałbym poprosić o pomoc w związku z makrem które, muszę zbudować. Mianowicie chodzi mi o to że mam tysiąc komórek które wyglądają mniej więcej tak: dzbanek_02-01-2008_K20 oczywiście słowo dzbanek się zmienia i jest jego 100 rodzajów i to samo z datą itd. I muszę zrobić tak żeby każda z tych danych znalazła się w różnych komórkach, tzn dzbanek...
Ale dla którego wiersza tabeli 1 ma szukać? Dla jednego czy wszystkich? Jak go chcesz wskazać jeżeli jednego? W najprostszym przypadku uruchamiasz makro stojąc w jakimś wierszu Tabeli 1. Makro znajduje numer wiersza i zapamiętuje klucz wyszukiwania łącząc zawartości komórek z jakimś separatorem, np : Kolumna 1 & "|" & Kolumna 2 & "|" &...
Witam, Mam uprzejmą prośbę o pomoc. Potrzebuje napisać makro w MS Excel, które będzie zaznaczać „ustaloną” liczbę takich samych (następujący po sobie znaków, w komórkach arkusza MS Excel). Potrafię napisać makro które będzie wyszukiwać i wyróżniać (np. innym kolorem tłą) takie same ”stringi”. Działający przykład w załączeniu....
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...
Trochę przerobiłem. Działa pod warunkami: 1) lista firm pobierana jest z arkusza "Sty". Jeśli w innych arkuszach (miesiącach) będą różnice należy do tworzenia listy użyć makr. 2) Arkusze muszą mieć taki sam układ (wspólne makro) 3) Indeks (łącze komórki pola kombi) jest wspólny dla wszystkich arkuszy.
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...
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ć?
Widocznie "stop" nie jest ostatnią pustą... Spróbuj z wyszukiwaniem [syntax=vbscript]Sub Makro() Dim target As Range Dim wrs1 As Integer Dim ostWrs As Long Dim i As Long Set target = ActiveCell wrs1 = target.End(xlUp).Row On Error Resume Next ostWrs = Columns(target.Column).Find(what:="stop"... lookat:=xlWhole).Row If Err > 0 Then MsgBox "brakuje znacznika...
Witam Mam problem a mianowicie mam folder, który zawiera około 2000 plików excel, które różnią się od siebie tylko końcówką nazwy (przykład - dok_1, dok_2, dok_3 itp.) mam też nowy arkusz excela o nazwie "wyszukiwanie" w którym chciałbym aby po wpisaniu danej części nazwy (1, 2 lub 3) wyszukał mi dany plik i z tego wyszukanego pliku skopiował mi do...
Jeżeli arkusz ma być eksportowany do nowego pliku, to lepiej zrezygnować z formuł (będą się łącza za nim ciągnąć) i zrealizować wyszukiwanie w makro (metoda Range.Find, lub w pętli). p.s. Jeśli umieściłeś makro w module, zastosuj precyzyjne odwołania (arkusze). Przycisk przyciskiem, ale łatwo "wdepnąć"...
"wobec zrewidować pod kątem niekompletne nazwiska" chodzi o to aby nie było pustych pul w nazwiskach i imieniach ?? dzięki za wskazówki, muszę się podszkolić w makrach znalazłem pewien półśrodek dodałem kolumnę z funkcją złącz tekst nazwisko imię i teraz wyszukuje się o wiele sprawniej analogicznie z miejscami :] właśnie dostałem przebłysk tematu :]...
W linii 21 Set kom = wksN.Columns(2).Find(What... LookAt:=xlWhole) Jeśli prawdziwe jest If kom Is Nothing wychodzisz z procedury bez zerowania zmiennych obiektowych (które sobie będą siedzieć w pamięci). Unikniesz tego stosując Else... If kom Is Nothing Then MsgBox "Nie ma podanej komórki." Else On Error GoTo 0 wksR.Range("C1:D1")...
Witam wszystkich!Problem jest następującej treści. Potrzebuje aby makro wyszukiwało, zliczało ilość komórek i kopiowało do konkretnej tabeli. Niby nic ale... no właśnie podczas wyszukiwania jest sytuacja,ze dwie wyszukiwane wartości należy zsumować i skopiować. Czyli liczba komórek "brak zapinki" plus "brak woreczka". Próbowałem to nawet zrobić suma...
Proszę krok po kroczku 1. "Baza danych" musi mieć identyczną budowę (jeśli chodzi o kolumny) jak arkusz spisowy (zwłaszcza pod względem komórek scalonych :!: ) :arrow: najlepiej zrobić do wydruku kopię arkusza "Arkusz danych (2)"; 2. Ze wzoru arkusza spisowego robisz zrzut stopki wydruku 932190 3. W "Arkuszu danych (2)" wyfiltrowujesz tylko dane z...
Nie jestem pewien, czy nie mylisz nazewnictwa. Pole to komórka, formularz to arkusz? Ale pomijając to, nie potrzebujesz pętli tylko funkcji wyszukującej ostatniej, niepustej komórki i wpisaniu tekstu do następnej. Być może w kodzie arkusza w zdarzeniu "Przy zmianie", ale to zależy od odpowiedzi na pytanie i działaniu (tajemniczego) pola wyboru. Zarejestruj...
...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...
Ale po co ci makro. Kopiujesz tekst z pliku txt. Zaznaczasz w excelu komórkę a1 i wklejasz. Zaznaczasz całą kolumnę A. W menu "Dane" wyszukujesz "Tekst jako kolumny..." . (excel 2003, XP i starsze - w 2007 też to jest tylko ja nie trafiam gdzie to teraz pochowali) Wciskasz "stała szerokość" i bez żadnych ustawień wciskasz zakończ. Lub dla pewności zamiast...
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?
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 =...
Część mojego makra wygląda j.n. Co należy zmienić w tym makrze, aby wyszukiwało ono nie komórki zawierające 1, ale wszystkie komórki większe od 0 lub ewentualnie komórki zawierające "1", "2" lub "3" [syntax=vbscript]Dim rng, cl, MyRng As Range, szukana As String 'ustalenie zakresu komorek zrodlowych Set rng = Range("O3:O1190") szukana = "1" 'dla kazdej...
Cześć, potrzebuje pomocy z napisaniem procedury wyszukaj pionowo jako makro. Poniżej wysyłam to co mam. Wpisując wartość w jednej z komórek, makro musi wyszukać dla niej odpowiedni wynik w innym pliku. Jako, że ten plik będzie codziennie inny to makro będzie otwierać najnowszy plik z danej lokalizacji "Baza". Uruchamiając makro otwiera mi się okno w...
cześć, poszukuję rozwiązania, które pozwoli na kopiowanie danych z jednego arkusza do drugiego. Opis zadania. W Arkuszu1 znajdują wszystkie wprowadzone przez użytkownika ( kolumny C:G ) oraz miejsce w którym, użytkownik wpisuje interesujący go zakres dat ( komórka B2 - data od, komórka B3 - data do ). Na podstawie tych danych ( B2 i B3) makro wyszukuje...
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...
Cześć, może spróbuj napisać taką pętlę: [syntax=vbscript]Sub test() Dim a As Short Dim i As Short Dim y As Short Worksheets("Sheet1").Activate a = InputBox("wpisz liczbę", "szukana pozycja", 1) For i = 1 To 3000 If Cells(i, 1).Value = a Then If Not Cells(i,2).Value = "" Then Cells(y, 3).Value = Cells(i, 2).Value y += 1 End If End If Next i End Sub [/syntax]...
Witam, Poszukuje rozwiązania problemu. Potrzebuję macro, ktore wyszuka wartości z kolumny B Arkusz1 i wstawi odpowiednią wartość z Arkusza2 z kolumny B odpowiednio co do liczby w Arkuszu1(kolumna B). Następnie macro powinno wklejać wartości(Arkusz1 kolumna B) dla danego numeru (Arkusz1 kolumna A), po przecinku w jednej komórce w Arkuszu3 w zależności...
Przeanalizuj kod i powiedz, co jest źle. jestem nowy w programowaniu i tak jakbym potrafił napisać na kopiowanie komórek Operacje na plikach masz w tym przykładzie. Do wyszukiwania miasta w pliku 'test' użyj Application.CountIf. Trochę googlowania i własnej pracy, kolego programisto.
Hej, Planuję do jednego z logów wstawić takie coś: Do jednej z komórek wpisujemy konkretną wartość, w tym przypadku datę, następnie klikamy stworzony przez nas guzik aktywujący makro wyszukujące w tym konkretnym sheecie. Czy jesteście w stanie pomóc mi coś takiego napisać? Można by było po prostu użyć ctrl+f, ale ten plik ma "ładnie" wyglądać, dlatego...
Witam, Proszę o pomoc przy kodzie VBA którym chcę usuwać wiersze, gdzie w kolumnie np. "B" znajduje się "1". Niestety przy wyszukiwaniu przy pomocy formuły "znajdź" pojawiają się błędy w komórkach - #ARG!. Niestety poniższe makro nie radzi sobie z tym i wyrzuca błąd w drugiej linii. Proszę o pomoc w obejściu tego. Wrzucam makro oraz plik z przykładem....
Dzięki wielkie! Rewelacja. Mam jeszcze pytanie, w sumie dwa. Pyt.1 Chciałbym makro które dla każdej litery pobierało by dane i zapisywało w nowym pliku (w nazwie litera, np. A.xls, B.xls itd.) Pyt. 2 Próbowałem wyszukiwanie za pomocą makra i kopiowanie całego wiersza. Do tej pory udało mi się to zrobić tylko z wyszukiwaniem z jednego pola, więc jeżeli...
Witam, Mam bazę zawierającą kilka tysięcy wierszy, gdzie w kolumnie B znajdują się różne opisy książek, wśród których są słowa kluczowe np. przygodowa, historyczna itd., po których ma być ustalana kategoria. Niestety słów jest kilka do każdej kategorii (np. thriller, kryminalna, sensacyjna, dreszczowiec itd mają być kategorią "książki akcji") i słowa...
Czasem pomaga skopiowanie całej zawartości arkuszy, elementów VBA do nowego pliku (Ctrl+c, Ctrl+v) Spotkałem się też z podobnym zjawiskiem przy makro kopiującym spory zakres, zdefiniowany "z górką" (dużo pustych wierszy/komórek). Gdy w v2003/2007 szło to bardzo sprawnie, v2013 "myśli" nad tym denerwująco długo. O dziwo: im więcej pustych, tym makro...
zauważyłem tylko, że nadpisała się jedna komórka więcej z pustym ciągiem i kropką. To miałem na myśli pisząc wcześniej: Przy tym rozwiązaniu trzeba też pominąć ostatni element w tablicy (pusty ciąg). Możesz dodać w pętli warunek [syntax=vbnet]if W(x) <> "" Then[/syntax]
W tym skoroszycie już tak masz namieszane z tym Twoim ukrywaniem arkuszy i zakresów komórek, że do momentu uzyskania stabilnego działania makr powinieneś odpuścić wszystkie komplikacje. Pamiętaj o czyszczeniu całego zakresu "wynikowego" przed nowym wyszukiwaniem np po wydruku lub przed wejściem do nowego wyszukiwania. Dla drugiego wyszukiwania powinieneś...
z tego co rozumiem - chcesz mieć rodzaj wyszukiwarki... To tutaj najlepiej użyć VBA. Dodać pole formularza, pobrać z niego wartość, a w VBA na podstawie pobranej wartość - sprawdzić pętlą komórki, które nie pasują i ukryć je (Selection.EntireRow.Hidden = True). Do tego jednak potrzebna jest znajomość VBA choć w niewielkim stopniu. W związku z tym możesz...
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...
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 Panowie, podbijam temat. Na bloga o tematyce muzycznej tworze sobie arkusz, który za pomocą kwerend ma zbierać dane ze stron z listami przebojów. To w połączeniu z formułami mocno ułatwia sprawę, ale potrzebuję jeszcze jednej rzeczy, z którą nie mogę sobie poradzić... Mianowicie chodzi o to, by stworzyć makro, które z arkusza z kwerendą (w tym...
Witam, potrzebuję pomocy z napisaniem kodu, który będzie w stanie wyszukać we wskazanym zakresie komórki, które mają obramowanie w kolorze czerwonym. Jeśli komórka ma czerwone obramowanie, to dana kolumna w której jest komórka powinna zostać ukryta. Napisałem prosty kod, który to robi i wrzucenie tego w pętle to też nie problem, ale jest pewien szkopuł,...
Witam, poszukuję makra, które uruchamiało by się automatycznie po wykryciu zmiany wartości w kolumnie "Data" w arkuszach 1,2. Miało by ono działać następująco: gdy w kolumnie "Data" zostaje wprowadzona zmiana, makro sprawdza nazwę z kolumny A oraz zapamiętuje starą wartość komórki "Data", przechodzi do arkusza 3 i wyszukuje w kolumnie A nazwę z arkusza...
Witajcie, wiem że taki temat już była ale kompletnie nie znam się na makrach i nie potrafie gotowego rozwiązania podstawić pod swój plik ze względu na to iż nie wiem gdzie dokładnie określa się kolumny w makrze ktore chciałabym przenosić. Poszukuję rozwiązania, które pozwoli mi na kopiowanie danych z jednego arkusza do skoroszytu. Opis zadania. W Arkuszu...
Witam serdecznie. Ogólnie :mam problem z napisaniem małego makra, które po wpisaniu szukanej wartości w jednej komórce, wyszukiwałoby daną wartość w innym arkuszu wraz z wartościami z nią powiązanymi (wszystko w tym samym wierszu) i wyświetlaniu tych wartości w pierwszym arkuszu. Troche to zamotane więc już wyjaśniam. Mam 2 arkusze: jeden to "wyszukiwarka"...
Witam wszystkich, chciałabym dowiedzieć się jak zrobić (i czy w ogóle mozna) żeby Excel na podstawie zawartości komórki wyszukal plik z danego folderu i go wydrukował w ilości podanej w innej komórce? Np komórki a1: abc B2: 2 Excel wyszukuje że wskazanego folderu plik abc.jpg i drukuje go 2 razy. Czy znajdzie się ktoś miły i poratuje? :) z góry ślicznie...
Witam, Twój przykład „trochę” minie zainteresował ;-) Jestem pewien, że czasem droga przez „formuły w arkuszu” jest nieco trudniejsza niż droga przez napisanie makra w MS Excel. Aby wszystko było jasne ;-) – jakiś 1- 1,5 roku temu też mi się wydawało, że najlepszym rozwiązaniem jest formuła warunkowa wpisana w komórkę arkusza...
To nie było gotowe rozwiązanie, ale schemat podzielenia nazwy pliku, oczywiście w ten sposób możesz też podzielić nazwę pliku. Tak, potrzebna jest pętla. Mniej więcej taki algorytm musisz pomyśleć gdzie to wkleić, bo część już masz zrobione 1. Wyszukujesz plik są różne sposoby wyszukania i w związku z tym różne konstrukcje pętli. 2. Jeżeli jest plik...
Witam Szukam wszędzie i nie mogę znaleźć rozwiązania prostego problemu... Mianowicie za pomocą InputBox wpisuje jakiś numer i chciał bym wyszukać go w pierwszym skoroszycie (111) w kolumnie A Jeżeli znajdzie: to zwróci wartość tego samego wiersza z kolumny B przejdzie do skoroszytu o tej odczytanej nazwie i wydrukuje zakres komórek np. (A1:E20) jeżeli...
Tak szczerze, zaraz wytłumaczę dlaczego "gotowiec" by mi się przydał: znam się tak "trochę" na excelu, ale na podstawowych funkcjach itp, nic nie wiem na temat makr, vba itp i moje rozumowanie w przypadku twojej odpowiedzi wygląda tak: " ustalasz ilość wierszy do wyszukiwania na podstawie ostatniej nie pustej komórki w kolumnie E" - GDZIE USTALAM TZN...
Witam Jak można makrem zaznaczyć komórki w kolumnie A, w których wartość jest "aa". Chodzi mi o pojedyncze zaznaczenie komórek w kolumnie, a nie zakresu Dodano po 15 W sieci znalazłem takie makro, które zaznacza pierwszą komórkę spełniającą warunek, ale nie wiem jak przerobić, aby zaznaczało mi wszystkie komórki spełniające warunek [syntax=vbscript]Sub...
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,...
Niestety przed tym był zwykły kod zaznaczania. Nie wiem niestety jak napisać kod który np wyszukiwałby pierwszą nieukrytą komórkę - nie wiem nawet czy jest taka możliwość. [syntax=jezyk_programowania]Range("E2").... Range(Selection, Selection.End(xlDown)).Select[/syntax] Dlatego zacząłem próbować coś z 2 kodem, o którym wspomniałem wcześniej - żeby...
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...
Cześć, nie jestem biegły w VBA i zwykle swoje makra tworzę przez nagrywanie. Potrzebuję makra, które będzie wyszukiwać pierwszy wolny wiersz, zaznaczy zakres kilku kolumn (np. od A do B) i będzie sumować wartości. Cały szkopuł jest w tym, że dane, które będą sumowane miewają różną liczbę wierszy. Dlatego nagranie sumy nie zdaje egzaminu, bo zawsze sumuje...
skopiuj wartości z komórek od M do R i wklej do kolumny C :?: :cry: Jak to chcesz zrealizować ? Wklejanie pięciu wartości komórek do jednej :D i to do kolumny z loginami :?: Do czego Ci potrzebne wyszukiwanie pionowe ? Znasz ograniczenia tej funkcji ? W Twojej tabeli w kolumnie C na pewno nie powtarzają się loginy ? Zrób i pokaż przykładowy plik z...
Witam. Proszę o pomoc w jednym temacie, mianowicie poszukuje rozwiązania problemu wyszukania zadanej frazy w tekście komórki Excela przez vba. Chodzi mi o algorytm, który sprawdzi tekst w komórce i na tej podstawie wpisze dane wyjściowe. Dla rozjaśnienia przykład. - użytkownicy przy wykonaniu danej czynności wpisują jej kod, np. "kod 8 obniżka ceny"....
Witam, plik w którym używam makro składa się z wierszy, w których znajdują się kolejno (data, imię i nazwisko, temperatura, ciśnienie, wartość pomiaru). Napisałem makro, które działa w następujący sposób: - w komórce A1 wpisuję interesującą mnie datę, - następuje wyszukiwanie podanej daty w zadanym zakresie w odpowiedniej kolumnie, - następnie pętla...
excel makro wyszukiwać komórka makro komórka excel makro wyszukiwać
wskazać amperomierz czujnik zalania telefonu wymiana kostka stacyjki
pilot uniwersalny manta pilot uniwersalny manta
Głowice magnetofonowe: uniwersalne, zapisujące, odczytujące – zamienność, parametry, skutki Winkler – brak parkowania w piecu piekarniczym, diagnostyka czujnika i napędu