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, Poszukuję makra, które w przypadku gdy w arkuszu z tabelą natrafi na kolumnę oznaczoną 1 i 2, to te kolumny usunie i pozostawi wszystkie inne. Kolumn w arkuszu może być bardzo wiele. W załączeniu dodaję przykład pliku. Będę wdzięczny za pomoc.
Witam, Mam makro do usuwania wierszy, które zawierają w kolumnie A "0". Proszę pamiętać o używaniu znaczników syntax . Opcja Listing kodu . - arnoldziq
Witam, Próbuję napisać makro do poniższej tabeli (numerom porządkowym przypisane są dwa wiersze), takie aby w momencie kiedy data wpisana przy danym numerze porządkowym jest o 30 dni starsza od daty aktualnej, automatycznie usuwało zawartość dwóch ostatnich komórek z danego rzędu (zaznaczone na zielono), niestety moje umiejętności pozwalają tylko na...
Kolumny "M, N" obsluguja pierwsze makro cmb1 ktore sluzy do znalezienia osob ktore nie wykonaly zadnej tranzakcji w ciagu roku (na podstawie numeru karty klienta I daty z arkusza "Klient", a nastepnie usuwa te konta po czym wszystkie dane z kolumn "M,N" sa usuwane rowniez) Kolumny "P,Q,R" obsluguja drugie makro cmb2 ktore sluzy do utworzenia archiwum...
jeżeli chcesz ukryć zawsze te same kolumny, to włączasz "zarejestruj makro" i w czasie nagrywania zaznaczasz kolumne --> prawym --> ukryj, wyłączasz nagrywanie i masz makro, powinno wygladać tak dla kolumny F: Columns("F:F").Sel... Selection.EntireColumn.Hidden = True jeżeli maja to być wskazane przez ciebie kolumny to robisz jak...
Witam Czy ktoś miałby chwilkę i mógłby mi pomóc? (może być makro lub jeśli się da to funkcje z arkuszem pomocniczym). Mam problem z kopiowaniem wierszy i ich dublowaniem do gotowego arkusza. Mam skoroszyt, który zawiera 3 arkusze robocze: "Re_1", "Re_2" , "Re_3" oraz arkusz wynikowy "Wynik". Do "Re_1", "Re_2" , "Re_3" dopisywane są nowe wartości. Potrzebuje...
Dzień dobry. Starałem się napisać makro, które porównuje zawartość komórek C1:C100 arkusza Arkusz1 z zawartością komórek A1:A120 arkusza Arkusz2. W przypadku, gdy nie znajdzie danej wartości, nastąpi usunięcie bieżącego wiersza z arkusza Arkusz1. Tak więc efektem działania ma być pozostanie w arkuszu Arkusz1 wierszy, w których w kolumnie C znajdują...
Witam Potrzebuje pomocy przy napisaniu makra excel W kolumnie M mam 10 typów wartości liczbowych powtarzających się, pomieszanych. Chciał bym aby makro znalozło wiersze w kolumnie M zaierające wartości 1224, 1228 i 1232 Po czym usunęło całe wiersze, czyli wszystkie dane we wszystkich kolumnach w tym wierszu który zawiera te liczby. Ale tak było nie...
Witam serdecznie, Poszukuje rozwiązania problemu mianowicie: NIe jestem w stanie poradzić sobie z kodem, który sprawi, że: Mam zaznaczoną komórkę f6 (przykładowo). Używam makro i zależy mi aby po skończeniu (działania robione na różnych wierszach w 3 kolumnach) wracało mi dokładnie do komórki, która była aktualnie zaznaczona przed włączeniem makro tj...
Witam, Mam problem który może mi rozwiązać tylko makro, otrzymałem excel z danymi w którym mam w jednej kolumnie nazwy odbiorców w kolejnych dane sprzedażowe. Problem polega na tym że zawsze pierwszy wiersz dla danego odbiorcy jest sumą wszystkich pozostałych (taki wiersz sumujący sprzedaż dla danego klienta). Potrzebuje makro które automatycznie usunie...
Czy da się to zrobić bez zamieniania obszaru na tabelę Excela? Da się, ale jest z tym więcej zachodu, a za chwilę będziesz znowu coś zmieniać i znowu będziesz pytać. Jaki masz problem z tabelą Excela? Ona jest bardzo elastyczna, jak dopisujesz wiersze, to formuły się automatycznie kopiują, można ją dowolnie formatować, nawet tak, że prawie jej nie...
Jak wcześniej pisał kolega walek33 zawsze jest jakaś możliwość. W przypadku gdy zakładam wstawianie/usuwanie kolumn szukam w arkuszu jakiegoś punktu odniesienia. Może to być Np nagłówek. kol = Rows(1).Find(what:="... Lookat:=xlWhole).Column ' jestem już zorientowany i wtedy cells(1,kol+1) = "Nagłówek2"...
Rozumiem że na google masz bana? ad 1. usuwa zbędne spacje ad 2. usuwa " OR " po ostatniej wartości.
Witam, poszukuje makra które w przypadku gdy wartość w kolumnie e=0 usunie komorki z kolum a-e w danym wierszu i przesunie dane do góry byłabym wdzięczna za pomoc
Witam, Proszę o pomoc w napisaniu makra, które będzie usuwało całe wiersze, w których data będzie starsza niż 2016-05-02 (kolumna z datą to kolumna B) we wszystkich arkuszach. Znalazłam na jakiejś stronie kod z pętlą, która przechodzi przez wszystkie arkusze, ale nie potrafię napisać kodu odpowiadającego za usuwanie wierszy. Proszę o pomoc :) Dodano...
Wersja mieszana, tj. i z hiperłączami "na funkcjach" i z hiperłączami "na makrach". 866050 Ścieżkę dostępu możesz określić dla każdego projektu oddzielną, to tylko niewielkie zmiany w makrze "Workbook_Open", które w ogóle możesz wyłączyć/skasować i ścieżki wpisać ręcznie - mnie się nie chciało tworzyć różnych ścieżek dla poszczególnych projektów. Ilość...
Cześć, poszukuję makra, które sprawdzi kolejne komórki w wierszu 2 (od B2 do MZ2) i po porównaniu z datą z komórki A1 usunie te kolumny, w których data jest starsza, Mam nadzieję, że jasno opisałem :)
Potrzebuję czegoś cgyba podobnego, ale jednak nie mogę dopasować... Potrzebuję makro, które usunie mi wszystkie wiersze nie zawierające w kolumnie K słowa "bio" ... Pomożecie? W tej kolumnie są ciągi znaków i super jakby makro szukało tylko słowa "bio", a nie np. " bio grafia" czy "przedsię bio rstwo" Wydzieliłem jako nowy temat z Nie podpinaj się pod...
niech kopiuje tylko kolumnę D i E. bo to co jest w kolumnie D i E bedzie usuwane :) Z lewej będę usuwał wartości w D i E bo muszę, z prawej muszą zostać , rozumiesz ? Ma dopasować login i typ 1:1 jak znajdzie to skopiuj D i E jak nie szukaj dalej. Dasz radę pomóc jednak ?
Witam, Prosiłbym o pomoc - potrzebuję makra usuwającego daną kolumnę w arkuszu jeśli posiada określony nagłówek. Nagłówek zawsze znajduje się w wierszu 1. Z góry dziękuję Pozdrawiam
Witam Wszystkich Serdecznie, Jest to mój pierwszy post na elektroda więc proszę o wyrozumiałość. Opis sytuacji: 1. Pracuje na excelu i tworzę DashBoarda związnego z urlopami. 2. W danym excelu jest wyświetlana lista osób oraz kto ile ma urlopów; 3. Wyświetlany excel zaciąga dane z innego pliku za pomocą Query; 4. Tabela Query wyświetla wszystkie daty...
Propozycja makro łączącego komórki tak jak chciałaś. Makro wykorzystuje dane z kolumn H i I, zastępuje formuły w komórkach scalanych. Usuwa formuły w kolumnie J (aby umożliwić modyfikację danych w razie potrzeby). Nie ingeruje w formatowanie warunkowe, które było już ustawione w arkuszu. Makro jest zapisane w module uniwersalnym. Działa w arkuszu aktywnym....
Dzień dobry, Szukam sposobu na to żeby zmienić strukturę kolumn w arkuszu. Niestety problem jest dość złożony. Ogólnie pracuje nad plikiem txt i importem do excela do czytelnej formy z możliwością filtrowania. Po imporcie do excela wyczyściłem makrami z niepotrzebnych wierszy i usuwam niepotrzebne dane. W efekcie uzyskuje plik kilka tysięcy wierszy...
Dzień dobry, Mam problem z odfiltrowaniem z lewej i prawej strony niepotrzebnych znaków Przykład: W jednej kolumnie występują między innymi następujące wiersze: 1. 547849, Nr faktury: 547849, Kwota VAT: 1.001,14, Identyfikator: 77922????? 5. 2425719 WE1Y572 Nr faktury: 45991, Kwota VAT: 114,47, Identyfikator: 77922????? 9 . Nr faktury: 46125 , 46153,...
Zapewne to przykład jakiegoś większego projektu i widzę że masz trochę pojęcia o makrach (co prawda jak okroiłeś przykład to nie działa ono prawidłowo ... ale to juz o czymś świadczy) Więc np stwórz makro które przy dodawaniu kolumny w nazwą "Wynik" będzie zmieniać zdefiniowany obecnie zakres =SPT!$G$4:$G$1000 o nazwie "Wynik" na nowy zakres. Analogicznie...
Jesli dane jest w kolumnie 1, wtedy [syntax=vb]For r = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1 If (r Mod 3) <> 0 Then Rows(r).Delete Next [/syntax]
Moderowany przez Marek_Skalski: Kolego, Twoje pytanie nie jest bezpośrednio związane z pytanie Autora tematu. Z tego powodu sugeruję wydzielenie tematu do nowego wątku. 3.1.19. Nie wysyłaj wiadomości w tematach archiwalnych, jeśli jest to kolejne pytanie, w szczególności inne niż osoby pytającej. Z racji szacunku do pytającego załóż własny temat. Możesz...
Cześć Potrzebuje pomocy przy zrobieniu makra, nie wiem jaki zrobić warunek przy usuwaniu filtrowania. Powiedzmy, że w jednym szablonie mam kilka kolumn do których mam już zrobione marka z moimi przeliczeniami i dodanym filtrem. Chciałbym, aby przed zrobieniem mojego makra był coś w stylu: Jeżeli jest zafiltrowana kolumna, to usuwa zafiltrowane kolumny...
Dziękuję za zainteresowanie. Odpowiadam na zapytanie w kolejności. 1. Plik Excela z rozszerzeniem .xls 2. Tak arkusz ma nagłówki, które ręcznie usuwam wraz z niepotrzebnymi mi kolumnami. 3. Skrót "scr" pochodzi od słowa screen oznaczające rzut ekranu. Dodano po 6 Do zamknięcia. Znalazłem rozwiązanie na YouTube. Film pod tytułem "excel-208 - Kopiowanie...
W momencie wpisywania danych od góry kolumny funkcja ukrywa kolumnę za każdym wpisanym znakiem :cunning: :?: Testowałem wpisywanie od góry i od dołu po jednej komórce - kod działa zgodnie z założeniami :ok: - podejrzewam, że takie nieprzewidziane działanie wynika z niedokładnego dostosowania do potrzeb :cry: - trzeba dostosować kontrolowany zakres...
Zamiast klikania w Ukryj użyłbym onEdit. Z jakiegoś powodu hideRow nie działa zgodnie ze specyfikacją, ale hideRows już działa. [syntax=javascript]function onEdit(e) { const range = e.range; if (range.getColumn() == 14) { // 14 - kolumna N if (range.getValue() == true) { e.source.getActiveSheet().hideRows(range... } } }[/syntax]
no nie właśnie musi być to zrobione makrem i usuwanie błędów i porównanie cen tak w excelu to ja też umiem
Witam wszystkich, potrzebuję pomocy w dorobieniu jednej funkcji w kodzie VBA. W załączonym pliku jest tabela, w której znajdują się produkty, ale są one zduplikowane. Za pomocą makro usuwam zduplikowane pozycje, zapisując je w tabeli obok. Potrzebuję pomocy, aby dołożyć tam opcję sumowania pozycji zduplikowanych w kolumnie ENABLED. Poniżej przykład:...
Witam Tabela z uprawami - po wprowadzeniu działek do arkusza (kolumna C i D) okazuje się ze na niektórych polach jest więcej niż jedna uprawa. Wtedy wstawiam wiersz poniżej danej działki i wpisuję kolejne uprawy na danej działce (tylko kolumna E, G, F, natomiast C i D zostają puste w tym wypadku). Podobnie z usuwaniem zbędnych wierszy w danej działce....
W samym excelu masz taka funkcję. (bez makra) Jeżeli masz jakieś dane w kolumnach po prawej stronie "kolumny do zmiany" to do kolumny z twoimi danymi dodaj po prawej stronie jedną pustą kolumnę. Teraz: Zaznacz kolumnę z danymi. Menu Dane - Tekst jako kolumny... i tam dajesz jako separator "_" I ok Wynikiem będzie jedna kolumna z danymi z przed podkreślnika...
No nie wiem. Mi to kasowanie działa. Do "grubszego" usuwania możesz zaznaczyć zakres składający się z obu kolumn i nie przejmować się tym w makro... Co do drugiej sprawy: dołóż jeszcze jedną gałąź If Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count = 1 And Target.Column = 3 Then If Not IsEmpty(Target) Then If IsEmpty(Target.Offset(0,...
Witam forumowiczów, pozwolę się podpiąć pod ten temat, żeby nie zakładać nowego a jest powiązany z obecnym. Proszę o pomoc/wskazówki w stworzeniu makra, które będzie usuwało określoną ilość wierszy zawierającą konkretne dane. Mianowicie : - w kolumnie C mam kody produktu - w kolumnie J, datę produkcji - w kolumnie K, godzinę produkcji W innej tabeli...
Witam Mam takie makro. W kolumnie A w arkuszu są wpisane nazwiska . 1-Zadaniem makra jest wyszukanie wszystkich takich samych nazwisk i wyświetlenie ich . 2-jeśli jest pusty wiersz w kolumnie ; to ma przejść do następnego z nazwiskiem 3- jeśli są trzy kolejne puste komórki to makro ma się zakończyć Teraz makro szuka, ale zatrzymuje się jak jest puste...
Witam Mamy pytanie odnoście usuwania makra przez inne makro. Od początku. Mam poniższy kod który oczywiście działa popranie i robi dokładnie to co ma robić, czyli: kod na początku filtruje i tworzy pewną ankietę w arkuszu. Następnie arkusz z ankietą zostaje skopiowany i wklejona do nowego pliku Excel, następnie zapisany pod konkretną nazwą we wskazanym...
Nie bardzo rozumiem, po co ta cała zabawa z zerami, zamianą na puste, usuwaniem komentarzy. Po co wyświetlać zera gdy brak danych? Po co w ogóle tworzyć te komentarze z zerami? Poza tym ostatnia część kodu (usuwanie komentarzy) w ogóle by nie zadziałała, bo komórki z komentarzami były puste, a funkcja End uwzględnia zawartość komórki, a nie komentarze....
To od tego zacznij - główną "bolączką" tego makra jest to, że wstawiasz kilkanaście kolumn formuł na 600.000 wierszy - to się musi długo liczyć... Na początku skróć zakres do niezbędnego minimum: poleceniem [syntax=vb]ost_w = Cells(Rows.Count, 1).End(xlUp).Row[/syntax]ustalisz sobie w aktywnym arkuszu ostatni numer wiersza (ważne, żeby przedtem zdjąć...
W załączeniu Twój plik przerobiony. Jak chcesz go użyć jak jest to wklej twoje dane do arkusza dane i syntetyka. Odpalenie makra Ctrl + Shift + t. Albo wejdź do VBA (lewy Alt + F11) i Pierwsze makro. Kod powinien się wykonać szybko. Można z powodzeniem użyć do naprawdę dużych ilości wierszy w tabelach źródłowych. Kod: (nazwy modułów kodu arkuszy zmienione...
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....
W zasadzie można to załatwić też formuła, nie musi być makro. Dla kolumny zmiana taka funkcja: =JEŻELI(CZY.BŁĄD(PODAJ.POZYCJĘ... No, chyba, że w Arkusz1 jest lista usuwająca wcześniejsze wartości, a nie tylko dopisująca.
Mógłbyś jeszcze mi podpowiedzieć jak zrobić makro na wszystkich plikach w folderze ? W poprzednim moim temacie napisałeś kod: [syntax=vbscript] Sub DzialajNaPlikach() With Application.FileDialog(msoFileDialogFold... .Title = "Wybierz folder" .InitialFileName = Environ("USERPROFILE") & "\Documents\" If .Show = -1 Then Sciezka = .SelectedItems(1)...
W załączniku są pliki końcowe, które bedą używane i teraz fajnie by było, gdyby znalazły się jeszcze następujące rozwiązania: 1. W pliku czerwony1 , jeśli dodatkowo wartości w kolumnach M i U zostaną zmienione na kolor czerwony , to nie zważając na to, czy w kolumach odpowiednio AM i AQ są wpisane godziny , kopiowałoby te wartości razem z wartością...
Szanowni Panowie, miałbym jednak jeszcze prośbę. Opisany przeze mnie sposób z usunięciem makra nie sprawdza się w pełni. Przy importowaniu danych z katalogu X przy użyciu makra cbrman'a i przy usuwaniu duplikatu przy użyciu mojego makra wszystko działa (dodam, że stworzyłem kolejne marko, które numeruje od nowa poszczególne wiersze). Gdy do tego samego...
Notepad++ Makra > Rozpocznij nagrywanie > (tu wykonujesz sekwencje operacji na jednej linii z przejściem do następnej) > Zakończ nagrywanie Makra > Uruchom Makro wielokrotnie Zaznaczasz "Wykonaj do końca pliku" i klikasz "Uruchom"
Mam problem z usuwaniem duplikatów. W całej tabeli znajduje się wiele zdublowanych danych. Można usunąć duplikaty na podstawie kolumny A, która niestety zawiera czasem ok 70 tys. wierszy. Gdy uruchamiam makro, to się zacina. Czy ktoś mógłby coś poradzić? Dziękuję [syntax=vb] For i = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1 If Cells(i, "A").Value...
Witam, proszę o pomoc w temacie jak wyżej. Mam plik, w którym kolumny od A do Z (takie same w każdym arkuszu, a mam ich 5+ zbiorczy) zawierają różne dane tekstowe, jak w załączniku. Skopiowałem je do jednego arkusza i tu zaczyna się problem. Czasami niektóre dane powtarzają się - te same tytuły + nazwisko i imię autora w kilku arkuszach. W takim przypadku...
Sprawdź takie rozwiązanie. W momencie dowolnej zmiany w arkuszu uruchamiane jest makro updateOne z adresem komórki, która jest do pokolorowania. Jeśli masz czysty arkusz i chcesz wszystkie istniejące komórki pokolorować, uruchamiasz makro updateAll, które przespaceruje się po całym arkuszu. W momencie, gdy usuwasz zawartość komórki albo wprowadzisz...
Witam! Mam w pliku Excel arkusz dla każdego tygodnia roku kalendarzowego o nazwach T-01, T-33, T-43 itd. W arkuszu posiadam makro do szybkiego tworzenia nowego arkusza przenoszące układ i formatowanie obecnego arkusza i dodatkowo przenoszące do nowo tworzonego arkusza wiersze dla których wartość w kolumnie J jest większa od zera. Plik służy mi do cotygodniowego...
Cześć, Proszę o pomoc w napisaniu makra, które jeśli w arkuszu1 w kolumnie A, w jakimś wierszu będzie znajdować się literka "W" to wtedy skopiuje komórkę znajdującą się w tym samym wierszu w kolumnie B, wklei ją do arkusza2 w ostatnim wolnym wierszu w kolumnie A i usunie cały wiersz skąd została skopiowana. Bardzo proszę o pomoc!!!! Z góry dziękuję!!!
Hej muszę napisać dwa makra Pierwsze, które: - usunie komórki zawierające informacje o katalogach, zawierającej słowo „Directory”; - usunie komórki zawierające minimum jeden, a maksimum trzy znaki; - usunie komórki zawierające informacje rozpoczynające się od cyfry. Drugie, które: - zliczy liczbę plików z rozszerzeniem .dll i wypisze ją...
Hej, bardzo dziękuję za pomoc. Dodałam również kilka wierszy , które usuwają "/" z kolumny D :) . Mam jednak pewien problem z uruchomieniem tego makra. Po pierwsze zauważyłam, że duże znaczenie ma kolejność uruchamiania plików. Jeśli plik, z którego mają być usuwane duplikaty zostanie otwarty jako pierwszy, to wówczas po uruchomieniu makra z jakiegoś...
Witam, potrzebuje napisać makro, które przeniesie wszystkie dane z wyjątkiem pierwszego wiersza do pliku CSV w tym samym katalogu. Kłopot w tym, że w niektórych komórkach mogą znajdować się średniki (;) co sprawia że obecne makro którego używam wydziela mi z takich komórek nową kolumnę w pliku CSV. Czy jest sposób by komórka zawierająca średnik nie...
Jeżeli jest to normalne na tym forum to naturalnie za finalną pomoc chcę podarować punkty. To jest Twoja indywidualna sprawa. Darowanie punktów nie jest naturalne na tym forum :) Wskazane jest natomiast kliknięcie przycisku Sortowanie kodów: Żeby później nie zgubić grupowania, należałoby (makro) rozpocząć od posortowania.
Hej porztrzebuje stworzyc dwa makra pierwsze zaznaczające wszystkie pola wyboru w kolumnie A (w każdym polu żeby był ptaszek) a drugie usuwające wszystkie zaznaczenia z pól wyboru - prosiłbym o pomoc :)
Przepraszam, przez roztargnienie trochę namieszałem. Wartości muszą być takie same w kolumnach od "B" do "F" oraz "H" oraz "K". W kolumnie "A" jest liczba porządkowa (czyli nieważna w tym przypadku), a w kolumnie "G" - liczba sztuk na komplet, co w liście produkcyjnej jest również mało znaczące. Czy scalanie dotyczy tylko jednej tabeli, czy wszystkich?...
W dwóch zdaniach: chodzi o to by z arkusza baza pobrać pierwszy indeks "z" a do obliczeń w arkuszach 1-4 stosować indeks "na" wszędzie tam gdzie pojawi się ten oryginalny "z". Arkusz mam za zadanie dodawanie stanów, sprzedaży, itd. do indeksów w arkuszach 1-4 stosując zamienniki ("na") ale jednocześnie nie usuwając oryginalnych indeksów jakie tam są....
Witam, Mam problem z makrem, które znalazłem na forum i które staram się przerobić pod moje potrzeby. Docelowo, makro ma sprawdzać czy w komórce w kolumnie F arkusza 1 jest wyraz "tak" i jeżeli to się potwierdzi to kopiować w pierwsze wolne miejsce w kolumnie D akrusza 2 zawartość komórki B arkusza 1. I jednocześnie usuwać ten wiersz z arkusza 1. Poniżej...
trafiłeś idealnie dzięki a ja jeszcze gafę strzeliłem bo na samym początku żeby usuwało duplikaty z kolumny A, ale żeby i usunęło również te dane z kolumny B (usuwamy duplikaty np. A2 zostanie usunięte i B2) a potem dopiero to co napisałeś
Witam, Wyjaśniam co robię z taką ilością danych - po skopiowaniu do już istniejącego arkusza są obrabiane przez formuły excela mające na celu powiązanie ich z innymi danymi (praca na słownikach w kilku innych arkuszach+2,3 duże tabele przestawne zawierające pozostałe dane). Zawsze robiłem wklejanie ręczne ale przy kilkunastu tysiącach wierszy jest to...
Cześć, potrzebuje napisać makro VBA w Excelu które: - będzie otwierać wszystkie pliki *.xlsx w katalogu w którym znajduje się uruchamiany plik skoroszytu (ew. będzie można wskazać kilkanaście plików w oknie wyboru) - z każdego pliku zostanie skopiowany zakres $$ i doklejony do arkusza "zaimportowane" w pliku w którym jest makro - po zaimportowaniu wszystkich...
Witam. Potrzebna pomoc w kodzie. Myślę że temat jest prosty ale nie wiem jak to zrobić. Potrzebuję makro które będzie sprawdzać czy jest założony filtr i jak jest to ma go zwolnić poleceniem ActiveSheet.ShowAllData a jak nie ma filtra to nic nie robi. Dodam że autofiltr może być założony na jakiejkolwiek kolumnie a jest ich dużo. Z góry dziękuję za...
Witam, czy ktoś byłby w stanie pomóc napisać makro, które wyszuka w kolumnie wszystkie komórki o określonej wartości z komórki B2 i usunie wiersze z tymi wartościami?
Dzień dobry, proszę o wsparcie w rozwiązaniu poniższego problemu. Makro działa następująco: 1. Do istniejącej tabeli dodaje kolumnę z lewej strony. 2. W nowo dodanej kolumnie wykorzystuje funkcję np. Jeżeli. 3. Następnie całą tabelę do nowego arkusza jako wartości i tworze tabelę. 4. Usuwam kolumnę, która z której były pobierane wartości dla funkcji....
Zastosowałem tą formułe do kolumny L, ale niestety z marnym skutkiem ;/ :?: Co to niby znaczy ? Formuła zmieniła sposób działania arkusza :D :?: Czy makro w ogóle nie ruszyło, czy tylko nie spełnia Twoich oczekiwań :?: Hej, przepraszam nie doprecyzowałem. Otóż w tej chwili poniższe makro wkleja wszystko tak jak oczekuję w pozostałe akrusze natomiast...
Witam, Zaczynam przygodę z VBA w Excel i potrzebuję Waszej pomocy, bo utknęłam. Cel makra- uporządkować dane w raporcie wg wymagań: 1.zmiana nazwy nagłówków wg schematu, 2.usunięcie zbędnych kolumn, 3.zmiana kolejności kolumn po nazwie nagłówka, 4.formatowanie i zapisanie pliku na odpowiednim zasobie. Poradziłam sobie prawie ze wszystkim. Pozostał pkt.3....
Dzięki Witam, czy mógłbyś pomóc jeszcze w jednej kwestii? Chodzi o to aby w weekend lub święto dane w kolumnie załóżmy H nie zerowały się ale zwiększały swoją wartość. Do tej kolumny ściągają się dane z innego arkusza. Codziennie ( w dzień roboczy )operator zeruje zawartość arkusza z którego dane się pobierają. W weekend również zeruje ale w kolumnie...
Cześć Potrzebuje mieć zrobione makro które z folderu w którym są pliki csv. Jak w zakładce BUF_1111F01111_.... pobierze je po kolei wczyta, zrobi tabele przestawną jak w zakładce pivot table a następnie wklei w odpowiednie pola w zakładce customer report z zachowaniem formuły jeżeli w kolumnie M. Następnie zapisze się jako plik .xlsx usuwając formuły...
W kolumnie D nie widzę w ogóle Z. Po analizie jak to działa stwierdzam, że: 1) Chciałem usuwać te pliki hurtem, żeby było szybciej, ale okazuje się, że to za dużo i jednym poleceniem odwołującym się do tablicy z nazwami tego się nie da zrobić. Widocznie jest jakieś ograniczenie, którego nie znam. Wobec tego trzeba usuwać pojedynczo. Dopisałem nową procedurę...
Cześć, potrzebuję pomocy. W załączonym pliku znajdziecie arkusze: - weryfikacja - firma 1 - firma 2 - kodowanie firma 1 - kodowanie firma 2 Przystępując do pracy: 1. Do arkusza "Firma 1" wklejam dane z innego pliku od kolumny E do AB 2. Uzupełniam formułę w kolumnie A 3. W kolumnę B wpisuje "F1" 4. Kopiuję kolumnę A i wklejam do arkusza "Kodowanie Firma...
Niżej masz przykład zastosowania formuły o której pisałem. W kolumnie czwartej skopiowałem kolumnę trzecią ale poprzez (prawy klawisz myszy) "wklej specjalnie" - wartości. Nie sortowałem jeszcze danych ale w "moim" przypadku powinienem zaznaczyć wszystkie dane i wybrać z menu "Dane" - Sortuj... ustawić wg czwartej kolumny czyli "D". Po czymś takim ustawią...
Chyba jakoś tak: Private Sub CommandButton1_Click() x = 3 While Worksheets("Przyrządy pomiarowe").Cells(x, 1).Value <> "" If Worksheets("Przyrządy pomiarowe").Cells(x, 1).Value = Worksheets("Kalibracja-Naprawy&... Then Worksheets("Przyrządy...
Niekoniecznie :) Zaznacz kolumnę (kolumny) które chcesz ukryć, prawym->Ukryj (nie musisz nic blokować). Następnie nałóż ochronę, nie zaznaczając opcji FORMATOWANIE KOLUMN. Wtedy nie będzie można jej odkryć. możesz też pobawić się z ochroną skoroszytu (Narzędzia->Ochrona->Skoroszyt). jak zablokujesz strukturę i okna, to np. nie będzie można zmieniać...
Udało mi się napisać taki kod, działa aż napotka komórkę z 'False' usuwa dwa pola w po lewej, kopiuje formułę w kolumnie z porównaniem i opuszcza pętlę. Jak sprawić by działało aż skończą sie dane w kolumnie(nie więcej niż 250 wierszy)? Sub EX_LP() Dim x, y As String Range("G2").Select Selection.AutoFill Destination:=Range("G2:...
Mam problem z usunięciem danych z całego wiersza wskazując treść tylko jednej komórki z tego wiersza Np: w kolumnie "A" zaczynając od 3 wiersza są kolejno liczby od 1 do 1000 w "B" są numery (lecz nie kolejno) pięcio cyfrowe i w D jakieś informacje tekstowe. Chciałbym aby po wpisaniu numeru pięcio cyfrowego do komórki "D1" makro przeszukało Range ("B3:B1000")...
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
A takie coś nie wystarczy? Po wykonaniu skryptu kopiujesz 2 kolumny wynikowe na nowy arkusz i wklejasz specjalnie tylko zawartość.
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...
Dziękuję za zainteresowanie, sprawa nie jest tak prosta jak się wydaję. Spieszę wyjaśnić do czego jest mi to potrzebne. Generalnie potrzebuję to do stworzenia słownika wyłącznie słów, których używam sam w swoich tekstach. Niektóre teksty (artykuły) są wręcz olbrzymie. Lista słów musi być w ten sposób ułożona (jedno po drugim) w pliku tekstowym i zaimportowana...
Potrafisz zbudować "formuliska" długie na pół metra, a z "makierkiem" sobie nie poradzisz? Trochę wiary w siebie! W skrócie. Nagrywasz rejestratorem czynności, usuwasz nadmiar kodu, zaglądasz do pętli "konkurencji", tworzysz makro, cieszysz się działaniem. Prawym p.m. w zakładkę arkusza '2014' (u dołu ekranu), wybierz "Wyświetl kod" i wklej taką procedurę...
Witam. Dziękuje za informacje które są pomocne i powoli zaczynam ich używać. Jednakże postanowiłem troszeczkę pokombinować i pododawać troszkę rzeczy ale nie wszystko mi wychodzi. W załączniku załączam plik na którym pracuje. Stworzyłem łącznie 4 procedury podpięte pod odpowiednie przycisk,i, ale są problemy których na chwile obecna nie potrafię rozwiązać....
Macieju , dokładnie oto mi chodziło. Pomogłeś mi, masz ode mnie punkty. Wiedział byś może jak poprawić kod żeby zakres komórek, które mają zostać aktywne, działał automatycznie w dół oraz w bok? Chodzi mi oto że gdy wstawię lub usunę nowy wiersz lub kolumnę do tabeli, nowe komórki będą od razu aktywne, czyli wyróżniane kolorem. Obecnie, gdy dodam nowe...
Witam, mam następujący problem. Potrzebuję makro, które ukryje wszystkie wiersze w aktywnym arkuszu dla których w kolumnach D:AD wartości równe są zero. Przy czym nie chce żeby usuwało wiersze z pustymi komórkami. Będe wdzięczna za pomoc. Markiza
Witam. Proszę o poprawę stworzonego przeze mnie makra. [syntax=vb]Sub Macro1() ' usunięcie kolumn Columns("F:H").Select Selection.Delete Shift:=xlToLeft Columns("G:L").Select Selection.Delete Shift:=xlToLeft Sheets(1).Select Sheets(1).Name = "owssvr" ' zaznaczenie obszaru ActiveSheet.Range("A1").Select Range(Selection, Selection.End(xlToRight)).Select...
Makro super tylko w tym przypadku zostawiło mi tylko kwoty z "5.00". Usuwa tylko w przypadku, gdy: 2. W kolumnie A nie ma kwoty "5.00" Jeśli w kolumnie A jest kwota 5.00 to pozostawi nietknięty wiersz niezależnie od całej reszty. Jeśli ma być inaczej to musisz lekko przeredagować warunki. Załóżmy, że sa możliwe 4 sytuacje. 1) kwota inna niż 5.00 oraz...
Witam. Jak poniższe makro rozszerzyć na działanie całej kolumny bądź też ograniczonej do pewnego zakresu? Chciałbym z całej kolumny 'AI' bądź określonego zakresu w kolumnie 'AI' nazwanego 'TerminyGORMIK' usunąć wszystkie daty które są już nieważne łącznie z dniem teraźniejszym? [syntax=vb]If Range("AI2") <= Date Then Range("AI2") = ""[/syntax]
Moje skrypty są troche słabe, coś tam znalazłem w necie, troche poprzerabiałem i nawet działa, nie działa natomiast usuwanie wiersza jeżeli w kolumnie A mam coś takiego: "05-lut-2016 17:23 Start Template Page 3" z tego wszystkiego zawsze w zawartości stałe są Start, Template i Page, reszta oczywiście zmienia się według daty i numeru strony, sam wiersz...
Witam serdecznie wszystkich, Chciałbym was uprzejmie prosić o pomoc w stworzeniu następującego makra. Jeżeli scalona komórka (składająca się z kolumn D:I) zawiera tekst "brak" to Macro usuwa ten wiersz oraz 2 wiersze powyżej i 11 wierszy poniżej. Z tym, że: - słowo "brak" jest wynikiem wpisanej formuły (nie wiem czy to ma znaczenie). W załączniku przykładowy...
Dzień Dobry Zwracam się do wszystkich uprzejmych i chcących pomóc osobie która zaczyna przygodę z makrami, ale zapotrzebowanie na dobre makro jest większe niżwiedza moja w obecnym czasie. Nie proszę o zrobienie gotowca tylko wskazanie błędów, lub o podpowiedź co mam zmienić w pliku którym się posiłkuję by : ad.1 W arkuszu Dane na zielono ( brane pod...
zależy mi żeby makro zawierało listę funduszy (kodów), które można powiększać o kolejne nowe lub odejmować niepotrzebne. Makro będzie miało za zadanie usuwać wszystkie fundusze/kody inne niż na liście. Czy ja dobrze rozumiem kolego "m4xon", że oczekujesz żeby na forum ktoś sporządził Ci listę funduszy unijnych ? :D A na poważnie to gdybyś zamiast pustego...
Arkusz z danymi, ponad 100tys. wierszy, ponad 50 kolumn. Chodzi o pozbycie się duplikatów z zachowaniem unikatowych danych. Np. Robię dodatkową kolumnę poprzez połączenie imię, nazwisko, firma, szereguję A-Z następnie zaznaczam formatowanie warunkowe i oznaczam duplikaty, następnie filtruję po kolorze (co przy tej ilości danych pewnie potrwa którąś...
Witam serdecznie Na początku zaznaczam, że jestem na początku swojej drogi z makrami w Ecxcel'u. Potrzebuje napisać makro, które które automatycznie usunie z całego arkusza rekordy z opisem kolumn w środku pliku, tzn pozostawi nagłówek na początku, ale tylko jeden. Załóżmy dla bezpieczeństwa, że liczba rekordów pomiędzy nagłówkami nie jest stała. Dlatego...
No teraz jest trochę za późna pora, żeby analizować i modyfikować ten kod :crazyeyes: Podtrzymując "moją" metodykę uzyskania tych zestawień "zasobów" proponuje wypróbować sobie doraźnie następujący kod makra: [syntax=vbscript]Sub zestProt() Application.ScreenUpdating = False w = 2: k = 13 While Cells(w, 1) = "Month" 'kopiowanie tabelki szczegółowej...
Wariant z blokowaniem zakresu komórek przy otwieraniu i zamykaniu zeszytu. 1. Na wszelki wypadek w procedurze 'Private Sub WorkSheet_Change(ByVal Target As Range)', w danym arkuszu, zmienić deklarację zmiennej z 'Dim i As Integer ' na 'Dim i As Long ' 2. W module 'ThisWorkbook' wkleić kod: 885619
W nowym pliku bez makr działa mi dynamicznie jak chce. Tutaj w tym pliku "zeszyt1poprawki1" jakas blokada wynikająca z makr? W tym pliku masz włączone ręczne przeliczanie funkcji. W zakładce Formuły, w Opcje Przeliczania zmień "ręczne" na "automatyczne" - czy gdzie to tam masz w swoim excelu. Ta funkcja ma po prostu przepisywać wartości z kolumny F...
To jeszcze wymaga doprecyzowania. Co jeżeli w kolumnie F jest pusto a w E coś jest, albo odwrotnie? Może chodzi ci o usuwanie całych wierszy? Niezależnie od odpowiedzi użyj metody Delete. W pierwszym przypadku z obiektu Range z odpowiednią do potrzeb wartością Shift, w drugim Rows. Obiekt powinien wskazywać właściwy element do usunięcia. Zalecane jest...