Takie makro powinno załatwić sprawę: [syntax=vb]Sub Przycisk10_Kliknięcie() On Error GoTo myErr Set wsdane = Worksheets("Dane") Set wsform = Worksheets("Formularz") total_rek = 0 ost_w = wsdane.Range("B" & Rows.Count).End(xlUp).Row If ost_w < 3 Then ost_w = 3 For w = 3 To ost_w If wsdane.Rows(w).EntireRow.RowHeight > 0 Then wsform.Range("H2").Value...
Witam Mam w arkuszu ukryte wiersze od 3 do 200. Znalazłem kod odkrywający jeden wiersz lub cały zakres [syntax=vbscript]Sub Makro1() Rows(3).Hidden = False End Sub [/syntax] Chodzi mi jednak o to, aby po uruchomieniu makra sprawdziło ono czy jest ukryty wiersz 3 i jeżeli tak, to powinno odkryć ten wiersz, a jeżeli jest on już odkryty to odkryć wiersz...
Excel to arkusz kalkulacyjny (obliczeniowy) a nie gotowy program. Nie da się "wstawić "tabelki w jeden wiersz. Wg mnie nie do końca rozumiesz co to jest arkusz kalkulacyjny. Co do makra i "małej" podpowiedź. :) Kłopot polega na tym że pisanie makra pod dane rozwiązanie musi opierać się na konkretnych/stabilnych danych (które zna autor projektu). To...
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...
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]
Witam, Jak napisać makro, gdy mam do wyboru tylko jedno pole wyboru. Oznaczając je chciałabym, aby wiersz 10-12 się odkrywał, a odznaczając, żeby te wiersze się ukrywały. Nie wchodzi w grę, abym zrobiła dwa pola wyboru i przypisała do jednego opcję odkryj a do drugiego ukryj. Musi być jeden checkbox. Prośba o pomoc.
Być może ten temat już był wyjaśniany ale przeglądam forum i nie mogę, niestety, znaleźć odpowiedzi. Mam w arkuszu obszar ukryty. Mam wypełnione wiersze przed i za tym obszarem. Powiedzmy, że ukryty obszar ma 100 wierszy. Wpisuję tam dane w kilku kolumnach, a w jednej jest formuła, która coś mi wylicza. Na starcie widoczny jest tylko pierwszy wiersz...
Szukam makra, które: gdy wartość w kolumnie M="tak" ukryje komórki z kolumn A:R w danym wierszu i przesunie dane do góry o wszystkie scalowane wiersze, czyli jeśli np. wiersz 1 i 2 , w kolumnie M jest scalowny i jeśli w tej komórce widnieje opis "Tak" to oba wiersze (1 i 2) przesuną się do góry
Ktoś mógłby pomóc? Ok, to tylko wyjaśnij: - skąd będziesz kopiował ? czy na pewno z tego arkusza Raport gdzie są przyciski ? - gdzie chcesz wklejać te dane ? gdzie jest słownik wiążący używane kody i zupełnie inne nazwy arkuszy ? skąd makro :D ma wiedzieć gdzie Ty masz ochotę wkleić aktualne dane ? - jakie jeszcze niespodzianki przygotowałeś dla osób...
Witam! Jeśli praca będzie sie powtarzała dość często to może wartałoby napisać krótkie makro: OD początku zaznaczenia DO końca zaznaczenia rób { Jeżeli wartość komórki z zaznaczonego przedziału jest mniejsza od 0 to ukryj wiersz w którym znajduje się niechciana komórka (Selection.EntireRow.Hidden = True) } Mógłbym coś napisać ale teraz naprawdę nie...
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...
może źle się wyraziłem chodzi mi o obszar roboczy widocznych będzie tylko część wierszy po odfiltrowaniu reszta jest ukryta jak w nowym załączniku czy da się coś takiego zrobić podejrzewam że będzie potrzebne makro, ale pewności nie mam. nowy załącznik raz jeszcze nie chce w filtrze odznaczać pozycji których ma nie wyświetlać bo musiałbym "odptaszkować"...
Już sprawdzam. Dziękuję za odpowiedź EDIT: Wygląda na to że kopiuje wiersz bez zaznaczonego checkboxa. Jednak problem leży gdzie indziej: Jak kopiuje przyciskiem dany wiersz i przy okazji shape checkbox, to powiela mi ukrytą w chceckboxie formułę. Przykładowo W wierszu 16 mam chceckbox z odwołaniem do komórki =$F$6 Po kliknięciu kopiowania, w kolejnym...
Bałem się ze odpowiedź będzie zahaczała o VBA, tak formularze są w jednym arkuszu, ale mogę je podzielić tak żeby każdy był w oddzielnym z tym że wtedy musiałbym znaleść sposób na ukrycie konkretnego arkusza w powiązaniu z zawartościa komórki a to zapewne też już trzeba płodzić makro albo dwa? Plik załączam, liczba która determinuje ilość formularzy...
Prawie wszystko już jasne. wg mnie pozostaje tylko makro. Czy te dodatkowe kolumny (ukryte) też docelowo maja się kopiowac do kart pracowniczych? I druga rzecz piszesz że wolisz stawiać x przy nazwisku (jest bardziej czytelne). Masz rację przy 5 nazwiskach. Ale sama mówiesz aby przewidzieć ok 20 pracowników. Dalej uważasz że przy dwudziestu nazwiskach...
Autorka powinna wtedy albo usunąć istniejące katalogi razem z ich zawartością - ręcznie, albo dopisać stosowne zabezpieczenie... Masz słuszność, chociaż można było zrobić goto i wyświetlić komunikat, ale chyba za dużo programuję w VB.NET i później zapominam, że w VB to było mniej przyjemne :) 1. Zamknij oczy 2. Odpal makro He he... to sobie własnie...
Cześć, chciałbym się podłączyć pod temat chyba z podobnym problemem. Posiadam arkusz excel gdzie osoba trzecia będzie wprowadzać nowe pozycje (wiersze) i uzupełniała do każdej pozycje dane w kolumnach. Każdy wiersz posiada 10 kolumn z czego kolumny 2-3 (trzy) posiadają skomplikowane formuły dot. auto-uzupełnienia. Excel jest tak zrobiony, że jak ta...
Wkradł się mały błąd. Sumujesz komórki z zakresu A:AD i sprawdzasz, czy wynik = 0. Jak będą 2 komórki '-1' i '1', to też wiersz zostanie ukryty, a tak nie powinno być. Proponuję zliczyć wszystkie komórki zawierające zero w tym zakresie: [syntax=vb]Sub Ukryj_Zerowe() For x = 2 To Cells(Rows.Count, 4).End(xlUp).Row If Application.CountIf(Cells(x, 4).Resize(1,...
Dzień dobry, Moim zdaniem lepiej to zrobić funkcją użytkownika niż makro. Szkoda, że nie dał Pan załącznika z plikiem, bo nie bardzo wiadomo, co tam jest, czy dane są tylko stałymi, czy są też formuły, czy są tylko liczby, czy również teksty. Nie wiem też czy potrzebne jest ukrywanie wierszy, jest to dodatkowa czynność, czy potrzebna? Kluczową sprawą...
Witam, To jak w temacie - czy jest możliwe zastosowanie formatowania warunkowego (lub innej funkcji Excel) - aby np. po wybraniu z drop listy przykładowej wartości (powiedzmy w komórce A1) - określony wiersz czy kolumna na tym samym tabie znikał/pojawiał sie ? Bardzo proszę o pomoc - jak to zrobić - jeśli jest to w ogóle możliwe. Mam nadzieję, że problem...
Trafiłem na ten temat zupełnie przypadkiem, bo też sie kiedyś czymś podobnym zajmowałem, tworząc dedykowane urządzenie i oprogramowanie do "rozgryzania" PALów/GALów: https://obrazki.elektroda.pl/7604469300_... https://obrazki.elektroda.pl/7052897800_... Myślałem, że autor tematu napisze chociaż troche o swojej metodzie,...
OK UDALO SIE !!!! Dodano po 1 marcinj12 miał na myśli ponowne włączenie automatycznego przeliczania arkusza, bo: Application.Calculation = xlCalculationManual włącza przeliczanie ręczne (defaultowo - klawisz F9), żeby przyspieszyć podmienianie wartości w komórkach. Tak więc po wykonaniu całej pętli powinieneś na nowo włączyć przeliczanie automatyczne,...
Witajcie, mam ogromną prośbę o pomoc w stworzeniu makra dla pliku. Męczę się z tym już kilkanaście godzin i niestety brakuje mi zwyczajnie wiedzy programowania VBA. Czy ktoś z Was mógłby mi pomóc stworzyć marko? Wkrokach opiszę co chciałbym, aby makro robiło. 1.Po naciśnięciu przycisku ( wiem jak przypisac marko do przycisku) odblokuj aktualny skoroszyt....
W pliku "test" rozpisałem zawartość wszystkich skrzynek. Teraz gdybym posiadał makro które samo zapisze zawartość wszystkich skrzynek do osobnych plików "skrzynka 1", "skrzynka 2", "skrzynka 3", "skrzynka 4". A czemu kolega zakłada tworzenie makra do realizacji takiego zadania ? :cry: Czemu specyfikacja każdej "skrzynki" umieszczana jest w odrębnym...
Dzięki wielkie adamas_nt. Makro działa tak jak chciałem. Dzięki też marzatela. Chodziło mi o to, że makro ma ukrywać kolumny tylko w tym wierszu, w którym klikam w kolumnie A, czyli, jeżeli klikam w komórkę A6, to ukrywa mi komórki puste w wierszu nr 6. Jeżeli chodzi o odkrywanie wcześniej ukrytych komórek, to o czym pisałeś adamas_nt, to rzeczywiście...
Nie wiem, czy mogłoby to ułatwić temat, bo właśnie skończyłem manualne obrabianie tego pliku. I wiem, że dane z poszczególnych wierszy można kopiować np w ten sposób: Dane z pod wierszami A1-G1 do wierszy G2-N2 i da sie kilka takich potrzebnych wierszy wpisać jako stała. Lecz potrzebne byłoby sprawdzenie, czy nazwy danych nie uległy zmianie tzn wiersze...
Kod jest długi (odwołuje się do innych funkcji) wysyłam tą część która odpowiada za wysłanie maila i krótki opis całego kodu (próbowałam wrzucić późne wiązanie, ale chyba nie potrafię tego zrobić): 1.Definicja zmiennych 2.Ścieżka do załączników maila 3.Definicja typów maila do wysłania 4.Zdjęcie filtrów w pliku 5.Sprawdzam pętlą czy w linii znajduje...
Witam, prosze o pomoc w utworzeniu makra, które bedzie kopiowało zakres danych z arkusza X do dowolnego arkusza np Y. Problem w tym że zakres danych z arkusza X jest przefiltrowany - dwoma warunkami po nazwie sklepu i po miejscowości. Chciałbym aby makro przekopiowało zakres już przefiltrowany do nowego arkusza Y. Moje makro kopiuje zakres danych ukrytych...
Witam, Bardzo dziękuje za pomoc i podpowiedzi. (at)JRV Masz całkowitą rację - wystarczy odwołać się do If Weekday(kolejny_dzien) = vbMonday Then przez dzień tygodnia, dla: Doc.Cells(p_w + i, p_k).Interior.Color = RGB(122, 122, 122) i wtedy „dopisać kolor tła” (jest w załączonym przykładzie ;-) ) Nie wiem dlaczego „zafiksowałem się”...
hmm, nie za bardzo o to chodziło, ale dzięki za odpowiedz. zmiany pracują w systemie i rzadko dwa lata z rzędu wypadają tak samo :( ja zrobilem cos takiego lopatologia ale dziala czy ktos jest w stanie doradzic co do kodu? [syntax=vb]Option Explicit Sub dniowki() With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter End With With...
Dzień dobry, proszę o pomoc z makrem. Zarejestrowałem sobie takie, żeby przygotować do druku stronę - Karta Nazwisko. Wcześniej jest dane są przygotowywane automatycznie jest to ok 170 wierszy - Nazwisko, w których jest wiele błędów #N/D. Jak się domyślacie na wydrukowanej stronie chcę mieć tylko wiersze z poprawnymi danymi. Dlatego filtruję kolumny...
potrzebujesz pomocy z kodem w VBA czy szukasz kogoś kto napisze całe makro? Dodano po 1 Przygotowałem w zasadzie bardzo proste makro: Kopiuje Twój arkusz "x1" (nazwałem go "Template") i w nim zmieniam tylko dane. Nazwę nowego arkusza biorę z arkusza "Wyświetlenie odczytów" z kolumny A czyli "Lp." ale idzie to łatwo zmienić w kodzie (dodałem tam komentarz)...
We wszystkich excelach można to zabezpieczyć. Podczas zapisywania pliku (zapisz jako ...) po pojawieniu się monitu jak ma się nazywać plik i gdzie ma być zapisany wciskasz Narzędzia i wybierasz"Opcje ogólne ... " tam ustawiasz hasło. Co do drugiego punktu to będzie ciężko Owszem możesz zablokować górne wiersze i pierwsze kolumny - ale górną i ostatnią...
wiersz makro makro wyszukaj wiersz makro wyszuka wiersz
zakup tunera combo lokalizacja pulpitu wymiana wkładki
suszarka bosch sieci światłowodowe
Renault Grand Espace – zalecane ciśnienie w oponach, wartości dla różnych wersji Cursor C70 błąd E16 – płytka PCB, czujnik prędkości, silnik – diagnostyka bieżni
