Cześć, Macie pomysł jak wyciągnąć numery wierszy z zakresu nieciągłego, wybieranego myszą + ctrl? Chodzi o sytuację, gdy zaznaczamy np komórkę B1, D5 i F8 i chcę pobrać numery wierszy, by wyciągnąć dane z komórek w kolumnie A z odpowiadającymi wierszami. Najprościej działa zaznaczanie danych w kolumnie A i wklejenie w docelowym miejscu ale metoda ta...
tak powinno działać makro: 1. W zakresie wierszy '42:305' zaznaczenie dowolnej komórki ma wywoływać: a. wypełnienie całego wiersza, z zaznaczoną komórką, "jakimś kolorem" (na tę chwilę nieważne jakim) b. nałożenie obramowania wiersza (przynajmniej na dolną krawędź) c. usunięcie wypełnienia z wcześniej zaznaczonego wiersza z zakresu '42:305' d. usunięcie...
Zaznaczanie i kopiowanie dynamicznego zakresu kolumn A w treści piszesz o wierszach ... Jednak proszę o pomoc w modyfikacji tego kodu aby spełniał warunki opisane powyżej Załączyłeś ... dopiero później ... Udało mi się znaleźć i zmodyfikować kod, który zaznacza zakres tabeli Kod, który załączyłeś tyczy się zupełnie czegoś innego ... (at)Prot zamiast...
Ok to muszę odszukać ta zamiana ręczna. Tak po wstawieuniu nowego wiersza będzie pusta komórka bez formuły to makrem myślałem o tym by zaznaczać komórkę A5 i w dół tak jak zaproponowałem. Zastanawia mnie najbardziej jak stworzyć kod by usuwalo mi wiersz jak cały zakres jest pusty. Bo teraz usuwa tylko wtedy jak coś w jakimś wierszu zakresu jest to usuwa...
Korzystam z podobnego rozwiązania ale potrzebne jest też formatowanie warunkowe (aby zaznaczać tylko zakres wiersza). Zaznaczanie aktywnego wiersza za pomocą formatowania warunkowego i VBA 1. Zaznaczanie aktywnego wiersza Definiujemy nazwę: AktywnyWiersz=0 Wpisujemy formułę w VBA w sekcji Worksheet - SelectionChange Private Sub Worksheet_SelectionChange(ByVal...
Ale jeżeli chcesz zaznaczyć całe wiersze możesz zastosować "tekstowe połączenie": p = 20 k = 25 c = CStr(p) + ":" + CStr(k) I wtedy: Rows(c).Select lub (tak jak chciałeś Range(c).Select Albo wogóle bez zmiennej c Range(CStr(p) + ":" + CStr(k)).Select Przyznam że chwile szukałem gotowej funkcji ale znalazłem tylko zaznaczanie paru wierszy na raz (nie...
Zakres zaznaczasz od pierwszej do ostatniej komórki czyli od A1 do kolumna,ostatni wiersz.
Spróbuj formatowania warunkowego wg takiego wzoru: [syntax=text]=WIERSZ()>PODAJ.POZYCJĘ(PRA... komórek do sformatowania musisz sobie zaznaczyć definiując formatowanie. Formuła formatowania jest zapisana z punktu widzenia pierwszej komórki obszaru formatowania, zakres wierszy w formule musi być zgodny z tym, jaki obszar...
A czy gdzieś napisałeś, że to ma działać w Excelu 2021? Nie piszesz też, czy może być VBA. Bez tych nowych funkcji i bez VBA, to zrobić to automatycznie będzie trudno. Mogę zaproponować taki półautomat w 3 etapach. Najpierw łączymy dane w dwa ciągi tekstowe za pomocą wybranego separatora. Ja zastosowałem średnik. [syntax=text]=POŁĄCZ.TEKSTY(";";;B1:E14)...
Zaznaczasz kolumnę L (ten zakres, który Cię interesuje) i w formatowaniu warunkowym używasz formuły: [syntax=text]=$L3<$M3[/syntax]Formułę zapisuje się dla jednej pary komórek, dla pierwszego wiersza w formatowanym zakresie. Przed numerem wiersza nie ma znaku dolara. Przed literą kolumny w tym przypadku może być, ale może też nie być, bo formatujesz...
Dwie wątpliwości: 1) Czy te formuły będą takie jak w przykładzie tzn. będą się odwoływać tylko do danych z tego samego wiersza? 2) Czy to ma być kopia z zaznaczenia (zaznaczam x wierszy i to kopiuję, tylko dokąd? jak określić miejsce docelowe?), czy kopia wszystkiego co jest (do ostatniego wypełnionego wiersza w określonej kolumnie), wtedy miejsce docelowe...
Range("G6:G89").Select Jak go zmienić, żeby zakres brał pod uwagę wszystkie niepuste komórki w tej kolumnie? Więc tak, jeżeli chcesz, żeby z całej kolumny zaznaczył zakres składający się z niepustych komórek to będzie takie makro: Sub proba() Dim x As Double Dim zakres As String For x = 1 To ActiveSheet.Cells(ActiveSheet.Rows.C... "G").End(xlUp).Row...
w jaki sposób zaznaczyć zakres do ostatniej kolumny w jednym wierszu ost_kolumna = .Cells(2, Columns.Count).End(xlToLeft).Column
Witam, Zwracam się z prośbą o pomoc w następującej sprawie, otóż potrzebuję usunąć dane, które znajdują się poza zakresem wydruku. Czy można to wykonać z poziomu Excela czy jest makro? Mam kilka arkuszy i chodzi o to aby nie zaznaczać kolumn i wierszy z poza zakresu wydruku i wówczas usuwać zbędne dane. Z góry dziękuję za pomoc
Hej Chodzi mi o wszystkie pełne wiersze poniżej i wklejenie tego zakresu o wiersz wyżej. Kod trochę zmieniłam na swoje potrzeby i obecnie wygląda jak poniżej, zaznacza i kopiuje 1000 wierszy (tu wolałabym żeby zaznaczał wszystkie pełne) po pierwszym pustym ale brakuje mi wklejania skopiowanego zakresu o wiersz wyżej. Sub usuniecie() Application.ScreenUpdating...
Dziekuje za propozycję jednak nie bardzo mi odpowiada to rozwiązanie bo mam już gotowy szablon pliku na którym pracuję z już gotowymi makrami. Większość makr uruchamiam jeszcze przed usunięciem wierszy i jest OK. Ale czasem zdarzy się że już po usunieciu potrzebuję uruchomić makro. W kodzie który podałeś musiałbym w takim razie zrobić kopie wszystkich...
Przetestuj [syntax=vb]Sub y() Dim rRng As Range 'definicja przetwarzanego zakresu Set rRng = Range(Cells(7, 3), Cells(19, 15)) 'wpisanie wartości z nagłówków kolumn 'najpierw formuły odnoszące się do wiersza 4 rRng.SpecialCells(xlCellTypeConstants).F... = "=R4C" 'wklejenie jako wartości For Each cl In rRng.SpecialCells(xlCellTypeFormulas) cl.Value...
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...
Różne drogi prowadzą do Rzymu Zastosowałeś jedną w VBA (jak dla mnie trochę przekombinowaną - ale działa) Ja bym to zrobił np. tak edit: Jak teraz patrze na "twoje" rozwiązanie to widzę że właściwie są tam zmieszane ze soba (przedstawione wyżej przeze mnie) dwie metody na raz, co jeszcze bardziej przekonuje mnie w stwierdzeniu "przekombinowane".
Nie zauważyłem by autor pytania prosił koniecznie o formułę. Owszem wspomniał, że: "Wiadomo jest to jedna formuła", ale nie wiemy czy kurczowo zamierza trzymać się formuł, bo jest (jak np: ja) entuzjastą Excel'a, aczkolwiek dopiero "raczkującym", czy być może jest to dla Niego rodzaj testu, zadania (ze szkoły, studiów, pracy - niepotrzebne skreślić)....
I po co wogóle chcesz to zaznaczać? W VBA można się często obejść bez zaznaczania czegokolwiek. Zależy co chcesz zrobić potem z tym zaznaczeniem, bo czasem rzeczywiście warto. Chodzi o to że na podstawie kart grupa a; grupa b; grupa c; grupa d; potrzebuje utworzyć karty: trasa 1; trasa 2; trasa 3; itd. jak w pliku sample1. 1. Jeden z tych obszarów?...
Witam, Proponuję rozwiązanie z zastosowaniem kontroli poprawności danych. W komórce E6 wpisujemy warunek Pełna liczba > 0, pole Ignoruj puste pozostawiamy zaznaczone, w komórce F6 warunek Pełna liczba między Minimum 1 Maksimum =$E6, pole Ignoruj puste wyczyścić, w komórce G6 warunek Pełna liczba między Minimum 1, Maksimum =$F6, pole Ignoruj puste wyczyścić....
a jak napisać makro które zaznaczałoby te 24godzinne zakresy? i po skopiowaniu przechodziłoby do następnych 24godzinnego zakresu?
Co ma wspólnego makro do zaznaczania aktywnego wiersza z funkcją, której nagłówek pokazujesz? Jak i do czego używasz tej funkcji? Zaznaczanie aktywnego wiersza masz zrobione formatowaniem warunkowym z formułą: [syntax=text]=KOMÓRKA("ROW")=WIERSZ()[/s... z tym są dwa. Pierwszy - należy właściwie zaznaczyć zakres komórek, w którym to formatowanie...
Bardzo szybko robi się to ręcznie. Filtr, zaznaczasz, Ctrl+c, Ctrl+v (możesz nawet nagrać makro i je wykorzystać). Klasycznie: w pętli + instrukcja warunkowa (If) oraz licznik wiersza zakresu docelowego.
Tak jak pisałem, tylko pierwsza komórka, a nie cały zakres. Bardzo dziękuję, rozwiązanie pomogło. Dlaczego ten kod jest poprawny w Libre a w Excelu przesuwa wiersze zaznaczenia bądź wcale nie zaznacza?
Mam obszar o czterech kolumnach (A:D) i zmiennej ilości wierszy; w kolejnych iteracjach komórki wypełniane są nowymi danymi, więc liczba wierszy w kolumnach się zmienia. Każda z kolumn lub nawet dwie kolumny jednocześnie może w danej iteracji zawierać same puste komórki. Problem jest taki, że gdy korzystam z CurrentRegion a jedna lub więcej kolumn zawiera...
Wystarczy odblokować tyle kolumn i wierszy ile chcesz i następnie włączyć ochronę arkusza z odznaczoną opcją zaznaczania zablokowanych komórek. Co prawda widać będzie wszystkie, ale pracować będziesz mógł tylko na tych odblokowanych.
niby działa ale zeby zobaczyć wynik trzeba zaznaczyc komorke. Ja to widzę tak: zaznacz zakres do ostatniej pełnej, potem dodaj i pokaz i wypełnij wynikiem do ostatniej pełnej / względnie ostatniego pełnego wiersza. any ideas?
WItam DZIĘKI DZIĘKI SERDECZNE ZA WSZYSTKO - jeszcze tylko jedno pytanko na koniec. Kolumnę E , F przeciągnąłem do 300 - bo tyle mam wierszy po zaktualizowaniu swojej bazy - oczywiście modyfikując odpowiednio formułę w makro zmieniłem zakres do 300 wszystko pięknie działa filtruje jak należy - tylko wyników w tych moich dodatkowych wierszach nie zaznacza...
Można. Najłatwiej w VBA. Aktywujesz pierwszą komórkę wiersza (zakładam, że w przykładzie jest to pierwsza kolumna). Stosujesz pętlę Do While {ostatni znak = np.1 } ... kolumna = kolumna + 1 Loop zaznaczasz zakres od pierwszej kolumny do kolumny o numerze określonym przez "kolumna" z powyższego kodu. Kopiujesz i wklejasz w odpowiednim wierszu....
Witam. W jaki sposób można makrem, zaznaczyć komórki obok wypełnionych? Dokładnie chodzi o to, że w kolumnie B, mam jakieś dane (mogą być też puste komórki między wypełnionymi) i chciałbym, aby makro zaznaczyło w kolumnie C, cały zakres, od wiersza 2 do ostatniego, który jest wypełniony w kolumnie B.
W VB możesz korzystać z funkcji excela: Application.WorksheetFunction.Min(range) Ja bym zrobił to tak: Lecę po tej kolumnie z liczbami 471 itd. i zaznaczam zakres (można stosować przesunięcia)*, następnie funkcją excela znajeść minimum. * - chodzi o adresowanie względne - czyli względem konkretnego wiersza czy kolumny
Sposobów może być wiele, bo to dość typowe zadanie. Nie napisałeś, która wersja Excela, a to może być istotne, jeśli chodzi o szczegóły. Przykładowe rozwiązanie w załączniku. Formuła: [syntax=text]=INDEKS(C2:G5;;B1-2)[/synta... nowym Excelu (2021, 365) będzie to formuła rozlana - wpisujesz do pierwszej komórki, czyli do B2, zatwierdzasz Enter i otrzymujesz...
W tym przypadku wystarczy takie prościutkie makro: [syntax=vb]With Range("B15:C17") 'zakres do sortowania .Interior.Color = xlNone 'czyścimy stary kolor tła .Sort key1:=.Cells(1, 2), order1:=xlDescending, Header:=xlNo 'sortujemy po drugiej kolumnie majejąco .Rows("1:1").Interior.Color = 65535 'ustawiamy kolor pierwszego wiersza w sortowanym zakresie...
Można wykorzystać skróty klawiszowe. Załóżmy taką sytuację: W kolumnie B ciąg jakiś danych, w C3 formuła do skopiowania http://obrazki.elektroda.pl/3064735200_1... Podręcznikowo: chwytasz za uchwyt C3 i przeciągasz w dół. Na skróty: 1. Klik w B3 2. Ctrl+strzałka w dół (przechodzę do ostatniej niepustej) 3. Strzałka w prawo (przejście do kolumny...
Super! działa dzięki za pomoc mam jeszcze jedno pytanko Poniższa pętla przeszukuje zakres komórek w kolumnie A i jak odnajdzie określoną wartość zmienia kolor tła dla całego wiersza. Czy jest możliwość ograniczenia zaznaczania wiersza do na przykład 15 pierwszych komórek danego wiersza [syntax=vb] For Each kom In Range("a4:a3000") If kom.Value = "KA0001"...
Witam, Staram się napisać makro, które zlicza ilość rekordów w przedziale od (B2:B2000) Zaznacza formułę w wierszach A2 i kopiuje ją do zakresu A3:A(wynik z liczenia +1) Nieudolnie napisałem coś takiego, ale nie wiem jak ustawić zakres odwołując się do wyniku z operacji liczenia... PS. Docelowo formuły będą się kopiować z kilku "zakresów" np. Range("D2:E2")...
Witam, Mam pytanie o możliwość stworzenia makra które będzie kopiować wypełnione wartościami kolumny w dół zaznaczając komórkę A2, jednak przy kopiowaniu pomijało by wiersze dla których nie ma podanych wartości w kolumnach D i F: https://obrazki.elektroda.pl/8651122400_... Na chwilę obecną przy poniższym kodzie: [syntax=vbscript] Range("A2").Select...
Dzień dobry, To jest dość typowe zagadnienie konsolidacji. Pewien problem stwarzają tylko te scalone wiersze, bo powodują, że trzeba zaznaczać całe wiersze, a etykiety z oznaczeniami kabli powinny być w pierwszej kolumnie zaznaczenia, więc trzeba je przenieść do kolumny A lub rozdzielić te scalone komórki. Ja przesunąłem dane o 1 kolumnę w lewo. Konsolidację...
Hmmm... nie wiem jak to zrobić inaczej [syntax=vb] Sub bombon() Dim zakr10 As Range 'definujeme zakres, ktore zawiera 10 pierwszych bombonierek, kolumny od F do O Set zakr10 = ThisWorkbook.Sheets("Bombonierki").Range... 'wierszy w zakresie r = 2 'zacziname od 2 wiersza, zmienna r je numer wiersza While Cells(r, 1) <> vbNullString 'tak...
Przepraszam będę dołączał. Niestety nie działa. Kiedy zaznaczam jakąś komórkę w zakresie Excel automatycznie zaznacza jak na rysunku cały zakres danych w kolumnie B, przy tworzeniu tabeli. Podobnie jest jak usuwam dane w A nie zmniejsza jej automatycznie. Według mnie on dotyczące tworzenia tabeli powinien brać z kolumny A czyli ostatniego zapisanego...
To nie bardzo rozumiem w czym problem, zaznaczyć kolumnę D, w zakresie w jakim będą dane (teraz lub w przyszłości), wpisać formułę dla pierwszego wiersza z danymi, np. =b4+c4, jeżeli tym pierwszym wierszem jest wiersz o numerze 4 i nacisnąć Ctrl+Enter (przytrzymując Ctrl, nacisnąć Enter). I to wszystko. W Excelu 2007 i następnych można również zadeklarować...
Dobrze by było podać wersję Excela i załączyć problematyczny plik (lub jego fragment). Przypuszczalnie lista wybieralna została stworzona przez Menu Dane -> Poprawność danych. Samo skopiowanie wierszy poniżej istniejących danych nie spowoduje ustawienia tam wcześniej zdefiniowanej listy wybieralnej. Jest kilka metod aby Excel rozszerzył zakres występowania...
Wydaje mi się, że lepiej będzie jak "załapiesz" o co chodzi. Pierwotna wersja pętli For Each kom In Selection If Left(kom.Address, 2) = "$G" Then If kom.Value = 1 And kom.Offset(0, 1).Value = "tak" Then ActiveSheet.Rows(kom.Row).Copy Sheets(1).Rows(ostWrs) ostWrs = ostWrs + 1 End If End If...
Jeżeli użyjesz takiego sposobu jak opisałem (ze zmienną ost_wiersz), to zakres będzie się rozszerzał automatycznie... Natomiast nie kojarzę jak się liczy percentyle w takim wypadku, tym bardziej że zmienne w kolumnie aa się powtarzają - jeżeli podasz wzór lub - lepiej - opiszesz algorytm jego liczenia, to może coś się uda zaimplementować...
wartości, ale chodzi mi oto że tekst w A1 żeby skopiowało do C1 a później żeby A1 było czyste, czyli tak jak w wordzie zaznaczam teksty daje wytnij, wybieram nowe miejsce i daje wklej. Ale gdybyś opisał oba przykłady na pewno by nie zaszkodziło, bo może ktoś kiedyś będzie chciał skopiować komórkę wraz z formatem i tu by miał rozwiązanie i żeby to jeszcze...
1. #N/D! - da się wyeliminować przez dodanie na zewnątrz formuły JEŻELI.ND albo JEŻELI.BŁĄD. Obie działają podobnie do funkcji JEŻELI, więc nie powinieneś mieć z nimi kłopotów 2. Da radę przeszukać kilka arkuszy jednocześnie - wystarczy w zakresie podać adresy zakresów w poszczególnych arkuszach rozdzielone średnikami, np. Arkusz1!C1:C3;Arkusz2!B1:B3,...
Jeżeli obszar nie jest duży to spróbuj: 1. Zaznacz zakres do kopiowania, naciśnij Ctrl+c 2. Przejdź do arkusza/obszaru z filtrem 3. Zaznacz pierwszą komórkę i trzymając lewy Ctrl zaznaczaj, klikając pojedynczo kolejne (wystarczy w lewej, skrajnej kolumnie). Tu musi zgadzać się ilość wierszy. 4. Nie puszczając Ctrl naciśnij v
... aczkolwiek lepiej by było na przykład, żebym nie musiał za każdym razem zaznaczać komórek... To robisz tylko jeden raz. Kolega mbb90 wyjaśnił ci tylko jak najprościej "stworzyć" formułę. Np w komórce G3 wpisujesz "z ręki" =suma(B3:F3) i wciskasz enter a excel zawsze będzie ci sumował komórki w 3 trzecim wierszu od kolumny B do F ) Zamiast wpisywania...
zaznaczanie wierszy makro zaznaczanie wierszy usuwanie zakresu wierszy
przetwornica uc3843 samoistny włączać otwierać skrzydło
kolokwium obwody kolokwium obwody
Daewoo Lanos radio AKF-9595, AKF-42xx – obsługa, kod, typowe usterki, montaż BT TCL 32S615 MT21X Main Board Schematic – Where to Find Service Manual PDF