... :-) ... Piszesz o jednej tabeli, albo o jakiejś pojedynczo-domyślnej, a w dokumencie procedury, który podsyłasz jest tych tabel aż 58, co łatwo sprawdzić, wpisując w oknie Immediate edytora vba: 903088
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...
Rzeczywiście na bieżącą chwilę w kodzie "czysc" jest parę błędów i niepotrzebnych rozwiązań. (może coś się zmieniło w stosunku do pierwszych rozwiązań np. 13 arkuszów lub nie zablokowany arkusz DANE) Wejdź w edytor VBA w Module1 kod makra czyść powinien być taki: nie zamknąłem w okienku kodu by zaznaczyć co należy zmienić lub dodać. ---------------------------...
Makro które usunie wiersz pod warunkiem z innej zakładki
Problem rozwiązany, proszę o usunięcie tematu. Dodano po 37 makro
Rzeczywiście, do końca to "w = w+2" nie działa, Sprawdza się gdy pierwszy wiersz to liczba nieparzysta a następny parzysta, Jak odwrotnie to już nie. Ale gdyby wstawić na górze arkusza jeden wiersz to pary parzysta, nieparzysta zamienią się i makro zadziała a potem 1 wiersz usunąć Wiem, że jest to nieeleganckie rozwiązanie, ale na ten moment nie widzę...
Dziękuję. Niestety nie działa jeszcze tak jak potrzebuję ;/ Pozmieniałem trochę zakresy danych, ale jest kilka rzeczy do zrobienia. 1. Podczas kopiowania z "Spis końcówek lotów" do "Złomowanie" makro wkleja dane tak jak leci, a powinno wpisywać w pierwszy wolny wiersz od B3 do nieskończoności tak na prawdę tylko ZŁOM. W tej chwili usuwa mi również dane,...
jak to jest technicznie zrobione? Do arkusza1 przypisane jest makro reagujące na zdarzenia zmiany :idea: (wprowadzenie nowej wartości) komórki I4. Jeśli takie zdarzenie wystąpi w pierwszym wolnym wierszu kolumny A wprowadzana jest aktualna data, a w kolumnie B nowa wprowadzona do I4 wartość. Na koniec czyszczona jest zawartość komórki I4 :spoko: w...
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....
Czy można jakoś usunac te ograniczenie??? Ograniczeń nie można usunąć (tylko 1048576wierszy) można dodać żeby to makro wykorzystywało kolumny Tak wielkie txt czy to są jakieś "słowniki" :) [syntax=vbscript]Application.ScreenUpdat... = False Set wks = ThisWorkbook.Worksheets("Arkusz1") sciezka = "C:\dane" Set fs = CreateObject("Scripting.FileSystemObject...
Witam, Uprzejmie proszę o pomoc / podpowiedź. W załączonym przykładzie jest makro, które tworzy dziewięć wykresów w oparciu o dostępne dane. Mam cztery pytania i prośby o pomoc: 1.Potrafię napisać makro które usunie wszystkie wykresy (i takie jest w przykładzie - i działa) – ale nie wiem jak napisać makro które usunie wybranie wykresy: np.: jak...
Witam Szanowni forumowicze, mam pewien problem z pętlami którego nie mogę rozwiązać. Mam listę ( kilka tysięcy pozycji) dotyczącej rezerwacji miejsc noclegowych. Arkusz w załączniku. Gdy klient dokonuje rezerwacji powstaje jeden wiersz ze statusem zatwierdzona w kolumnie rezerwacja, jeśli rezerwacja zostanie anulowana pojawia się identyczny wiersz z...
Witam wszystkich forumowiczów! Jestem absolutnie początkujący jeśli chodzi o programowanie w VBA w Excelu, a potrzebne mi jest makro, które (po jego aktywowaniu np. kombinacją klawiszy) wytnie jeden wiersz z jednego arkusza i wstawi go do drugiego, w pierwsze wolne miejsce. Skoroszyt będzie się składać z 3 Arkuszy. Chciałbym, aby była możliwość przenoszenia...
W dużym skrócie ... 1. ... dwa zakresy danych ... 2. ... na podstawie wartości z jednego zakresu ... wyszukać wartość w drugim zakresie ... 3. ... jeżeli makro znajdzie ... wartość to zostawia ją bez zmian ... 4. ... jeżeli natomiast wartości w zakresie jest brak to usuwa cały wiersz zakresu 1, 2 i 3 - raczej jasne ... ale 4 ... ? Który wiersz zakresu...
Dziękuję Panowie. Szczegółowe opisanie tego co chcę osiągnąć było by dość długie. W arkuszu pierwszym mam zaimportowane pewne dane z pliku csv. Dane te dotyczą różnych osób i tu nie ma reguły. Np dla Jana Kowalskiego mamy 3 wiersze danych, dla Marii Kowalskiej mamy 4 wiersze. Natomiast dla Stanisława Nowaka mamy też jakiś tam wiersz z informacją że...
Chciałbym aby po wpisaniu numeru pięcio cyfrowego do komórki "D1" makro przeszukało Range ("B3:B1000") Nie, żeby wszystko źle :) ale gdzie to przeszukanie? Poczytaj o metodzie Range.Find , wpisz w wyszukiwarkę elektrody ".Find" (bez cudzysłowów) lub zastosuj wyszukiwanie w pętli For.
Mam w Excel tabelę: ID CENA SUMA 1212 7311 114 1217 918 1111 7310 Chciałbym, aby makro vba znajdowało wszystkie wartości, które mają takie same ID (duplikaty), sumowało ich cenę, usuwało jeden zduplikowany wiersz i zostawiało w tabeli wynikowej tylko jeden z sumą. Czyli manualnie w przypadku tego pliku wynik byłby taki: ID SUMA 12 29 73 21 Jak można...
Następnie chciałem usunąć pierwszy wiersz w pierwszym arkuszu żeby powstał kolejny wydruk z danymi z drugiego wiersza.niestety w tym momencie rozsypują się odwołania. Najprostszym rozwiązaniem Twojego problemu jest: 1. zaznaczyć wszystkie komórki powyżej tej którą chcesz wykasować 2. użyć kombinacji klawiszy Ctrl+C 3. ustawić się w pierwszej komórce...
można na przykład tak: Arkusz 1 komórka a1 z formułą np =DZIŚ() komórka b1 to cena komórka c1 to ilość komórka d1 formuła =b1*c1 komórka e1 wstawiamy button (makro do buttona poniżej opiszę) Arkusz 2 wiersz 1 kolumny A,B,C,D opisane jak w arkuszu 1 komórka e1 formuła =ile.niepustych(a:a)+1 Teraz będzie makro do butona: [syntax=vb] sub arhiwum() Range("A1:D1").Select...
Dzień dobry, Operacja konsolidacji jest z założenia operacją statyczną. Jeżeli włączy Pan opcję tworzenia łączy, to utworzy się tzw. konspekt, który też zawiera łącza statyczne. Będzie to działać poprawnie tylko wtedy, gdy będzie Pan zmieniał długości kabli, ale każda zmiana nazwy pozycji wymaga skasowania starej konsolidacji i utworzenia wszystkiego...
.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", ""False"")" Przecież wiersz z tą funkcją znajduje się w procedurze którą zamieściłem w moim poście. Napisałem też, że makro ukrywa to co ma ukryć, natomiast szukam rozwiązania problemu powstającego wtedy, kiedy użytkownik podwójnie kliknie na pasek tytułu Excela - wtedy się wstążka "odkrywa", mimo iż programowo...
Pytanie zrozumiałe. To zwykła suma liczb, więc w czym problem? Osobiście nie bawiłbym się w składanie formuły. Wystarczy zostawić jeden wiersz, pozostałe usunąć i wpisać sumę... Jeśli jednak składniki ulegają zmianie. Zamiast "+" użyj ActiveCell.Formula = "=SUM(arg1,arg2,...)" Gdzie prawa strona równania jest typu string, więc łatwo poskładać.
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...
niestety nie udało mi się znaleźć nic co mógłbym wykorzystać w moim pliku. umiem napisać makro, które usunie mi cały wiersz ale pod warunkiem że, podam wartość, która ma być szukana. ale nie umiem napisać takiego makro, które usunie mi wiersz w na podstawie danych z innego pliku. pozdrawiam
Witam, poszukuję makra, które usunie wiersz jak znajdzie w nim w kolumnie P słowo "DELETE". Takich wierszy jest kilka. Z góry dzięki za pomoc. Wydzieliłem jako nowy temat. Nie podpinaj się pod cudze wątki (w dodatku archiwalne). RADU23
Proszę. :) W poprzednim makro usuń wiersz [syntax=vb]Range("c2:c" & p) = "1" 'dopisanie 1 jako sztuka pierwsza w obliczeniach[/syntax] Natomiast w wierszach: [syntax=vb]Range("a2:b" & p).Select ' tu zaznacza wszystkie pozycje bez nagłówka Range("a2:b" & p).Copy 'kopiowanie[/syntax] zamień literkę b na c [syntax=vb]Range("a2:c" & p).Select ' tu zaznacza...
Witam Proszę o poprawienie makra, ponieważ nie chce działać. Nie potrafię znaleźć gdzie jest błąd. Z góry dzięki za pomoc. Działanie makra: jeżeli w kolumnie A jest "X" usuń wiersz i przesuń komórki w wierszu w lewo. jeżeli w kolumnie A jest "SumaInne" lub "SumaLinia" usuń wiersz jeżeli w kolumnie B jest "Inne" usuń wiersz jeżeli w kolumnie C wartość...
Witam, Proszę o pomoc, Potrzebuję makro w Arkuszu Google które usuwa lub ukrywa wiersz, w którym pole wyboru jest zaznaczone. W wierszach mam pole wyboru, zaznaczam niektóre z nich i wciskam button, który ukrywa lub usuwa zaznaczone wiersze. Fajnie jakby wyskoczył komunikat "czy na pewno chcesz ukryć/usunąć zaznaczone wiersze" Tabela jest w załaczonym...
To informacja o czasach wykonania makra. Trzeba wejść do edytora vba (Alt + F11), a potem Ctrl + G i można zobaczyć wyjściowe komunikaty o czasie wykonania dla poszczególnych arkuszy i całościowo. To tylko poglądowo, linie te można usunąć (oraz deklarację i przypisanie zmiennej czas), są zbędne.
Hmmm... Kilka uwag na początek: Po pierwsze primo: jeżeli chcesz uniezależnić program od nazw arkuszy, wystarczy zamiast: kolejnym wierszu.
OK, rzeczywiście jest jak mówisz. Wracając do makra z tego ostatniego pliku: zmień linijkę rekalkulacji w Excelu. Zmiana koloru takowej nie powoduje, więc dopóki coś nie zmieni wartości, funkcja pokaże starą wartość. PS 3. Nie wiem czemu piszesz, że nie możesz funkcji użyć w kodzie VBA: taki sposób wywołania działa: [syntax=vb]MsgBox SumByColorsFuction(Range("AA4:AA13"),...
Długo nikt nie odpowiada, więc chyba coś tu nie jest jasne. Excel może działać (upraszczając nieco) poprzez formuły lub poprzez makra. Formuły nie mogą niczego przenosić, mogą jedynie "kopiować", a ściślej zwracać wynik tam, gdzie wcześniej wpisano formułę, pozostawiając dane źródłowe bez zmiany. Formuły działają automatycznie, przeliczają się same,...
Cześć, jestem początkujący i nie do końca mogę znaleźć pomoc w sieci. Moim zadaniem jest wykonanie makra, które ma na celu znalezienie w konkretnej kolumnie wartość wprowadzoną do określonej komórki. Czyli np. Wartość z komórki A1, znajdź w kolumnie B. Następnie usuń ten wiersz. Z góry dziękuję za pomoc. Pozdrawaiam Piotrek
Nie wiem czemu nie mogę uruchomić makra z przycisku? Kurcze pierwsze chodziło od cjancik ale to ostatnie nie. Wyskakuje komunikat o ustawieniach osobistych, które mogą być usunięte. Czy to makro ustawia dane w pierwszy wolny wiersz?
https://obrazki.elektroda.pl/4586766500_... Widzę, że się udało. W załączniku przykład tabeli Excela. Jeśli tabela ma wiersz podsumowania, to wstawianie nowych wierszy odbywa się tabulatorem w ostatniej kolumnie tabeli. Można też wstawiać wiersze w środku tabeli z menu podręcznego (PPM) lub ze wstążki. Filtry z tabeli można usunąć...
chciałbym żeby w raz z usunięciem danych w komórce, również usuwał się wiersz tabeli W przedstawionym rozwiązaniu usunięcie indeksu powoduje "wyczyszczenie" całego wiersza :cunning: (jakkolwiek do tego celu wykorzystano odpowiednie formuły w tym arkuszu :D ) - nie wiem jak duże (ile pozycji ?) oferty przygotowujesz dla Waszych klientów , jeśli więcej...
Chodzi mi o stworzenie formuły Jeśli wiersz zawiera tekst np."Nazwa" usuń wiersz. nie mam pojęcia o tworzeniu formuł ani makr, wiem, że może to pomóc w życiu i teraz jest ta chwila. Mam do odrzucenia dużo danych w tabeli. Kilkaset stron, robię to ręcznie.
Witam. Potrzebuję stworzyć makro, które usunie mi wszystkie wiersze oprócz wierszy zawierających słowo "kod", wiersza poprzedzającego ten wiersz + wiersz, w którym znajduje się kwota 0,00. Czy ktoś mógłby mi z tym pomóc? Z góry b. dziękuję.
Chodzi mi o stworzenie formuły Jeśli wiersz zawiera tekst np."Nazwa" usuń wiersz. nie mam pojęcia o tworzeniu formuł ani makr, wiem, że może to pomóc w życiu i teraz jest ta chwila. Mam do odrzucenia dużo danych w tabeli. Kilkaset stron, robię to ręcznie.
Z arkusza1 robię raporty w osobnych arkuszach Efekt taki jak na zrzucie 1041538 automatycznego kopiowania wyfiltrowanych danych z arkusza1 do kilku arkuszy :idea: (z nazwami arkuszy wg filtrowanych danych :D ) można zrealizować przykładowo tak jak w załączonym pliku. 1041541 Makro można uruchomić skrótem klawiaturowym ctrl+r :!: , dla dowolnej (jeśli...
Witam wszystkich ponownie! Przepraszam was ale muszę odgrzebać temat ze względu na małą pierdołe. Problem dotyczy wciąż tego samego makra. Jednak teraz chciałbym żeby makro odjęło mi dwie komórki z godziną w formacie (hh:mm) a następnie jeżeli różnica będzie mniejsza bądź równa 00:01 usunąć cały wiersz. Na mój prosty mózg powinno to wyglądać tak: Dim...
bozio891 W twoim arkuszu wystarczy zmienić zakres obowiązywania nazwy AktywnyWiersz z arkusza na cały skoroszyt (najprościej usunąć nazwę, przypisać ją ponownie ale zakres dać skoroszyt i odwołanie "=0") Zaznaczanie będzie działać w każdym arkuszu gdzie masz ustawione formatowanie warunkowe (październik i grudzień nie mają) :)
Oczywiście, ale :) Excel lubi płatać figle. Zapisz jeden wiersz z CheckBoxem, skopiuj go 100 razy, po czym usuń przez zaznaczenie 80 wierszy. Ile jest CheckBoxów w arkuszu? I co będzie gdy uruchomisz powyższe makro? Raczej użyłbym czegoś w stylu For wiersz = 1 To Range("A65536").End... 'tu drukowanie zaznaczonych w gałęzi...
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...
Skopiować trzeba wszystko, a później usunąć zawartość szarych pól.
Zapisywanie masz przecież (i słusznie) realizowane przy naciśnięciu klawiszy nawigacji. Pod klawiszem 'OK', poza Unload, kod usunięto. Dopisz po prostu 'SaveDataToRow iCurrentPos' i z głowy.
Witam Mam dość dziwny problem... Do sporego arkusza, który zawiera harmonogram prac (makro) postanowiłam dodać sobie kolumnę, która liczyła czas pracy (od daty realizacji odejmowałam datę złożenia zlecenia - wynik to suma dni potrzebnych na realizację zlecenia. Ponieważ zleceń jest dość dużo postanowiłam "rozmnożyć" odejmowanie do samego końca... i...
Działa! Usunęłam tylko pierwszy wiersz w pliku i zmieniłam w kodzie wrs = 1 , bo przesuwało się o jeden w dół. Super, dziękuję ślicznie :)
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ę!!!
Witam, chciałabym stworzyć makro porównujace dwa wskazane przeze mnie pliki. Układ obu plików jest taki sam. Na kilkaset wierszy czasami zostanie zmieniony tekst/kwota lub całkiem usunięty/dodany nowy wiersz. Widziałabym to tak że wskazuje konkretne dwa pliki, a makro porównując je usuwa powtarzające się wiersze (sprawdzając zarówno tekst jak i kwoty)....
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ę...
usunąć wiersz wiersz makro znaleźć usunąć wiersz
odbieranie danych rs232 tl431 ka431 czujnik kocioł
Kod błędu E45 w suszarce Electrolux - rozwiązania Telefon wibruje, ale ekran pozostaje czarny - przyczyny i rozwiązania
