Jak nie będziesz w stanie działającego rozwiązania dopasować do swoich potrzeb to nigdy niczego nie napiszesz.
W takim przypadku zastosuj to co napisałem wcześniej.
Wklej w kod arkusza :[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "C47" Then If LCase(Target.Text) = "przelew" Then 'Przelew, PRZELEW, przelew Rows("48:49").EntireRow.Hidden = False Else Rows("48:49").EntireRow.Hidden = True End If ElseIf Target.Address(0, 0) = "C47:E47" Then 'jeśli pusta też ma odkrywać to...
takie zadanie dostałem A są wakacje. [syntax=vbscript]Const w As Long = 8 Sub Ukryj() If Cells(w, 1).EntireRow.Hidden Then For x = w To 1 Step -1 If Cells(x, 1).EntireRow.Hidden = False Then Cells(x, 1).EntireRow.Hidden = True Exit Sub End If Next Else Cells(w, 1).EntireRow.Hidden = True End If End Sub Sub Odkryj() For x = 1 To w If Cells(x, 1).EntireRow.Hidden...
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...
dla przycisku tak daj takie samo makro tylko zamień True na False
Niestety nie działa powyższe makro Jakiś komunikat czy co? Pokaż załącznik
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
1) Lista musi mieć ciągły zakres. Najlepiej wykorzystać do tego osobny arkusz. Trochę można zautomatyzować (patrz załącznik). Założyłem, że nazwa firmy w Arkusz1 występuje co 13 wierszy. 2) W przykładzie wykorzystałem VBA (Select Case) i ukrywanie/odkrywanie wierszy 3) j.w.
Wiersz niezmiennie jest nr 4, tylko kolumny się zmieniają, więc chyba jest ok
Hej, potrzebuje makro w excelu, które ukryje mi wiersze 7 i 8 gdy w komórkach B4 i B5 pojawi się wartość większą niż 85. Próbowałem przerobić kilka makr które tu znalazłem jednak nie są to zadowalające efekty. [syntax=vbnet]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "B4:B5" Then If Target.Value > 85 Then Rows("7:8").EntireRow.Hidden...
No to albo kolumna pomocnicza z filtrem (wtedy masz tylko jeden "klik"-wybierasz 0 ) albo makro. Ponizej z kolumną a makro za chwile podrzucę.
Witam Mam takie makro, które w zakresie kolumn B:Z, ukrywa kolumny jeżeli w wierszu 2 komórki są puste. [syntax=vbscript] Sub Makro1() Dim MyCell As Range For Each MyCell In Range("B2:Z2").Cells If MyCell = 0 Then MyCell.EntireColumn.Hidden = True Next MyCell End Sub [/syntax] Makro jest uruchamiane po kliknięciu komórki A2, dzięki wpisaniu kodu arkusza...
Cześć, mam napisane makro[syntax=vba] Sub Makro1() Const max As Integer = 10000 Dim i As Integer Application.ScreenUpdating = False i = 1 Do While i <> max If Cells(i, 6).Value = 0 And Cells(i, 7).Value = 0 And Cells(i, 8).Value = 0 And Cells(i, 9).Value = 0 And Cells(i, 10).Value = 0 Then Rows(i).Hidden = True End If i = i + 1 Loop Application.ScreenUpdating...
Ahaaa, okej. Czyli makro będzie dla każdej pojedynczej linii najpierw ją archiwizowało i od razu ukrywało. Masz łeb :) Dziękuję!!
Hej, Jako młody adept a wręcz laik VBA mam do speców pytanie. Mam do zaprojektowania formularz zgłoszeniowy i chciałbym zautomatyzować pewną rzecz. Mam wybieraną listę gdzie mam trzy opcje do wyboru i chciałbym żeby dla jednej z nich ukrywały mi się wiersze. Da radę ktoś pomóc? Z góry dziękuję
Dodałem jeszcze możliwość ukrywania kolumn z niepotrzebnymi dniami w miesiącu, aktualizację dni miesiąca na pasku jak również zmiana koloru na szary dni sobota i niedziela. UWAGA!, nie zmieniaj (nie dodawaj nie usuwaj żadnych kolumn i wierszy) bo to spowoduje że makro będzie niepoprawnie działać
Chcesz ukrywać całe wiersze zawierające zaznaczone komórki? To przecież wystarczy: [syntax=vbscript]Selection.EntireRow.Hid... = True[/syntax]niezależnie w jaki sposób te komórki zostały zaznaczone, więc kody można połączyć.
Witam wszystkich forumowiczów i specjalistów. Piszę, ponieważ potrzebuje pomocy w zapewne trywialnej sprawie... Otóż.. Stworzyłem makro do arkusza, które w momencie spełnienia określonych warunków ukrywa lub odkrywa poszczególne wiersze w arkuszu. W tych wierszach znajdują się m.in. pola wyboru, które w momencie ukrywania wierszy nie ukrywają się, tylko...
Mam taki problem z macrem ukrywajacym wiesze jezeli komorki w kolumnie 5 sa puste. Makro tego typu musi być umieszczone w module arkusza , a nie w module ogólnym :cry: Dla uniknięcia problemów (np. tekstowego formatowania komórek w kolumnie 5 ) proponuję zmianę warunku ukrywania wierszy :D [syntax=vbscript]If Cells(RowCnt, ChkCol).Value = "" Then[/syntax]
Witam potrzebuję pomocy w stworzeniu makra w Excelu 2007. Potrzebuję kodu który przepisze wiersze do nowego arkusza po spełnieniu poniższych kryterium: Zakres analizowania: Od wiersza 12 kolumna B Do wiersza 111 kolumna P Makro: jeżeli w arkuszu nr 1 w kolumnie P z zakresu wierszy od P12:P111 znajdzie się wartość większą (różna) od „0” (wynik...
Witam, Prośba o pomoc mam trzy pola checkbox, każde z nich ukrywa lub odkrywa wiersze które mają określone wartości. Lepiej lub gorzej ale radzę sobie żeby każdy checkbox działał osobno, ale chciałbym jeszcze dorzucić warunek, że kiedy wszystkie trzy checkboxy są odznaczone (false) to żeby wszystkie wiersze były odkryte. W załączeniu również plik z...
Cześć Jestem początkującym i mam problem w napisaniu makra który by mi chował parenaście wierszy. W chwili obecnej mam napisane takie makro Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Cells(3, 4) = "Badanie wstępne" Then Rows("42:47").Select Selection.EntireRow.Hidden = True Else Rows("42:47").Select Selection.EntireRow.Hidden = False...
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
Spróbuj z autofiltrem (makro nagrane rejestratorem i zmodyfikowane) Sub filtruj() Range("C5:C69").Au... ActiveSheet.Range("$C$5:$C$... _ Field:=1, Criteria1:=Array([d3], [e3], [f3], [g3]), Operator:=xlFilterValues End Sub Aby zupełnie...
Teraz kolego to ładnie kopiuje wszystkie wystąpienia. Bardzo Ci dziękuję za Twą pomoc. Próbuję jeszcze zmienić coś w kodzie ponieważ po zakończeniu instrukcji w arkusz1 zostaje tylko jeden wiersz ( ostatni ) a reszta jest ukrywana. Może mi się uda doczytać jak to zmienić. tak to wygląda : https://obrazki.elektroda.pl/2877661100_...
Masz literówkę, powinno być: "delete". Dla ukrywania nagraj sobie makro i podstaw, zamiast delete, polecenie nagrane przez rejestrator (ciąg po selection).
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, Mam problem z wolnym działaniem makra ukrywającego niepotrzebne komórki, przejście makra przez ok 300 wierszy zajmuje ok 10 sekund, niestety jest to za długo. Kod Sub Rozwiñ6_Zmienianie() Dim rn As Range Application.ScreenUpdating = False 'Range("a1").Value = InputBox("które dane pokazac") 'Range("a1").Value...
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...
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....
Witam. Mam problem z napisaniem programu w VBA. Chciałbym by makro ukrywało kolumny w jeżeli w określonej komórce tego wiersza znajduje się zero (komórka ta odpowiada za sumę całej kolumny). Podczas próby odpalenia makra wyświetla się błąd : "Rune time error '1004' Method 'Range' of object ' _Global' failed". Kod programu poniżej. Sub UkryjZeroweKolumny()...
To proste, mam arkusz w którym dość często wprowadzam zmiany, ale w normalnym trybie w arkuszu działają różne makra które miedzy innymi ukrywają wedle potrzeby wiersze i kolumny. Kiedy potrzebuję wprowadzić w arkuszu zmiany to mam jeden przycisk którym w arkuszu odkrywam wszystkie wiersze i kolumny, ale w tej sytuacji muszę włączyć tryb projektowania...
(at)marek003 już sobie poradziłem, nagrałem makro i "wstawiłem" kod do kodu pola kombi, trochę to nie po polsku, ale chyba wiesz o co mi chodzi, a co do formatowania na biało, to możnaby to zrobić, ale wtedy miałbym luke w wydruku, a dużo tego robie.
Witam wszystkich życzliwych, z góry bardzo dziękując za pomoc. Zasięgałem już porady na tym forum ale potrzebuję doprecyzować już na konkretnym przykładzie. W załączeniu zamieszczam projekt, który potrzebuję stworzyć. Do rzeczy, potrzebuję stworzyć makro, które będzie przeszukiwało folder z plikami w których będą dane źródłowe i przenosiło te dane do...
No niestety to nie rozwiązuje problemu, bo niektóre arkusze były dodawane i usuwane podczas tworzenia, czyli na przykład na liście jest 230 nazwisk (kolejność nazwisk jest ważna i nie mogę jej zmienić) i pierwsza osoba ma arkusz9, a druga osoba ma arkusz 11, a nie 10... A jest może zdarzenie które działa po zaznaczeniu wybranej komórki?? wtedy napisałbym...
Moje pierwsze w zasadzie makro VBA w wordzie (pisałem kilka makr w Excelu, ale swój poziom szacuję na podstawowy). Tak więc trochę mojego niechlujnego kodu: Const ilePyt = 50 Const ileOdp = 4 Const pytWTescie = 15 Należy ustawić odpowiednio ilość wszystkich pytań, ilość odpowiedzi na każde z pytań, a także z ilu pytań ma się składać test. Dokument źródłowy...
Sprawdziłem - z poziomu konsoli faktycznie można sprawnie łączyć pliki, ale niestety taka opcja wplata w tabele taką ilość wierszy nagłówkowych ile plików będzie w katalogu. Nie ukrywam że ułatwia to nieco pracę, ale może jest jakieś rozwiązanie które pozwoli osiągnąć dokładnie taki efekt jakiego szukam.
Witam, potrzebuję pomocy... Czy ktoś z Was podpowie jak powinno wyglądać makro, które namiesza mi w pliku Excelowskim :) ?? Mam 3 kolumny z danymi w osobnych wierszach. Zależy mi na tym, aby makro zgrupowało w jednym wierszu kolumny A te same wartości, w kolumnie B ustawiło wartości pod kątem godzin z kolumny D, zgrupowało tą samą wartość z kolumny...
Niestety nie może to być tabela przestawna bo dane mają wpisywać się do pewnej przygotowanej już przez kogoś innego tabeli stanowiącej Formularz, z którego będą korzystały różne osoby. Dodano po 17 Właściwie to metodą prób i błędów większość udało mi się zrobić. Dla UserForm1 i UserForm2: Proszę pamiętać o używaniu znaczników syntax . Opcja Listing...
Są dwa typy userów - administrator który widzi wszystkie arkusze i user szeregowy, czyli sprzedawca (Basia/Ania itp), który widzi tylko swój arkusz z klientami oraz arkusz z raportami. Po uruchomieniu skoroszytu Excel pyta o login i hasło, na tej podstawie makro ukrywa niektóre arkusze, zależnie od tego kto się zaloguje. Arkusz z klientami "wolnymi",...
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! Kolejny raz potrzebuję pomocy: W Pliku roboczym za pomocą power query wyciągam dane z pliku źródłowego. Plik aktualizuje się w momencie otwierania i co 60 minut. Pliki znajdują się w różnych lokalizacjach - plik źródłowy jest wrzucony na serwerze i korzysta z niego kilka osób, dlatego aby go wzajemnie nie blokować pomysł z makrem przenoszącym...
Rzeczywiście autor nie ma talentu do przekazywania informacji. Wydaje mi się że o to mu chodziło (załącznik). Do autora topiku: Nie da się funkcjami wydrukować tylko wybranych stron. Można ukrywać widoczność ale wtedy ostatecznie będą białe/czyste strony drukowane. Pozostaje makro - w sumie proste ale ... w makrach położenie poszczególnych komórek jest...
Dobudowałem trochę - ale mimo kilkugodzinnych prób nie wyczaiłem gdzie w makrach są odpowiednie odnośniki aby coś pozmieniać. Pod przyciskiem OK formatki Świetnie działają przejścia i chciałem aby jeszcze w arkuszu WPIS w kolumnie D wpisywało cyfrę znajdującą się przy wybranej pozycji z SŁOWNIKA (kol A). W zależności od tej wartości wpłata będzie wpisywana...
Witam, nie mogę sobie poradzić z jednym tematem. Stworzyłem kalkulator w którym jest kilka comboboxów z listami wyborów. I... chciałbym aby makro które wykonuje w danym kalkulatorze różne obliczenia na koniec zmieniło w comboboxie wybraną z listy wartość na inną. Piszac wprost. combobox ma listę wyboru: brak wskaźnik 1 wskaźnik 2 wskaźnik 3 ... pracując...
nie wiem co dalej czegoś brakuje :) wiedzy zapewne. Poszukaj trochę i przyjrzyj się jak to zrobili inii. Po mojemu spokojnie obejdzie się bez makr. 1. Znajdź pozycję wybranych z list wartości. funkcja wiersz podstawiasz wynik funkcji z pkt.1 3, Kolorowanie wierszy zrealizujesz przez formatowanie warunkowe. Formuła: =$A6=1 zakres: =$B$6:$O$36 4. Zamiast...
PRL: nie ukrywam, że moja wiedza na tym etapie się kończy, stąd moja prośba o pomoc w dopasowaniu skryptu do mojej tabelki. Chciałbym, żeby kopiowały się całe wiersze zachowaniem formatowania (scalenia itp)
Witam z Nowym Rokiem, potrzebuje pomocy do pliku kontrolek pracy, jako, że Nowy Rok nastał czas ułatwić sobie pracę. Nie znam się za dobrze na Excelu, co potrafiłem to zrobiłem ale potrzebuje Waszej pomocy w kilku sprawach. 1) Potrzebuje Makro do zapętlenia daty; tłumaczę w arkuszu Liczydło w kolumnie Z mamy zakres dat w przedziale Z12 - Z95, potrzebuję...
Dodałem zewnętrzną pętlę na arkusze: Sub przelicz() Const max As Integer = 36 Const max_ark Integer = 36 Dim a As Integer Dim i As Integer a = 4 i = 26 Do While a <> max_ark Sheets(a).Select Rows("26:36").Select Selections.EntireRow.Hidden = False Do While i <> max If Cells(i, 3).Value = 0 Then Rows(i).Hidden = True End If i = i + 1 Loop...
Dzięki, o to chodziło... niestety napotkałem kolejny duży problem. Nie wiem czy to wina Excela 2003,ale okazuje się że w tak przygotowanym arkuszu nie są aktualizowane łącza. W zasadzie miało to działać tak: Wiersze z danymi są zaciągane z zewnętrznych plików, numerowanych od 1 wzwyż, stąd konieczna była zmiana nazw. W przypadku braku pliku excel wyświetla...
.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...
Witam! Potrzebuję pomocy z poprawnym wstawieniem lub modyfikacją obecnego makra. Aktualne makro po aktywowaniu kopiuje wybrane wartości z kilku różnych kart w kolejności alfabetycznej kart, jeśli w kolumnie C jest konkretny dostawca. Teraz w załączonym pliku potrzebuję w ostatniej karcie "podział na kolory" wstawić (lub przekształcić obecne) makro,...
Witaj, Dziekuje za odpowiedz na moja prosbe. Uruchomiłem makro ktore mi przeslales wprowadzam dane i niestety nie dziala wiec nie moge sie wypowiedziec czy robi to czego szukam. Plik ktory przeslalem z przykladem i opisem dzialania makra, ktore jest mi niezbedne do prawidlowego dzialania to tylko fragment wiekszego projektu. W moim przykladzie i opisie...
Witam wszystkich, Od razu zaznaczam, że nie liczę na gotowca. Chciałbym poprosić Was o wskazówki / małe podpowiedzi jak napisać makro które : zakładając, że arkusz jest posortowany wg numeru zamówień Sprawdza kolumnę nazwaną " Order-ID " i jeśli Id jest np 000223 to patrzy w kolumnę klient widzi 17 , sprawdza kolumnę niżej gdzie znów jest ID 000223...
Nie wiem, czy dobrze zrozumiałem. Filtrowane mają być tylko kolumny, czy również wiersze? Najlepiej zawsze pokazać w załączniku oczekiwany wynik. Napisałem makro zdarzeniowe ukrywające kolumny z tygodniami z wyjątkiem tej wpisanej w polu "LICZBA TYGODNIA". Makro jest umieszczone w module arkusza. Pusta komórka w polu "LICZBA TYGODNIA" odkrywa wszystkie...
Witam ponownie. Dotychczasowa Wasza pomoc okazala sie bezcenna. Juz mam gotowe i dzialajace zestawienie, ktore dolaczam w zalaczniku. Mam do Was kolejne zapytanie. Jak uruchomicie to zestawienie to widac, ze jest juz ono uzupelnione. Jest dzialajace makro do wczytywania wartosci z plikow (dzieki Wam), dodalem makro ukrywajace wiersze gdzie pojawiaja...
Akurat kwestia tworzenia samego designu strony w oparciu o tabele to żaden kłopot więc nie zrozumieliśmy się - sądziłem że coś się zmieniło w budowie stron na ramkach (ostatnią stronę robiłem z 4lata temu). Co do opublikowywania w postaci htmla wprost z excela to pisałem że robi się totalna masakra i zupełnie nieczytelne biorąc pod uwagę 100kolumn....
p.s. Dzień dobry Panie Macieju, miło Pana widzieć, 01 lutego mi pan pomógł, to jest dalsza część sprawy. Tak, zgadza się, nazwa arkusza to liczba, niestety nie mogę tego zmienić bo nazwa arkusza czyli liczba zaczyna się od ,np. 104,105,120,147,148 itd. Ta liczba oznacza nr kontraktu. Wiem, że może to w przyszłości generować problemy. Sprawa wygląda...
Kopiowanie formuł jest właściwością tabeli i w zasadzie sposób odwoływania się nie powinien tu mieć znaczenia. Mnie jednak po przekształceniu zwykłego zakresu w tabelę, to od razu nie zadziałało, dlatego zmieniłem sposób odwołania. Można też raz skopiować formułę, a potem powinno już działać automatycznie. Jeśli po wpisaniu czegoś do kolumny C chcemy...
Witam Nie ukrywam że nie znam się na VBA a problem który przedstawie zapewne jest banalnie prosty jednak nie znalazłem podobnych tematów Zadanie Posiadam dwa pliki Exel (Ewidencja jedynek i formatka klienta). Chciałbym przekopiować wybrane dane z formatki klienta do pliku ewidencja jedynek na koniec wolnego wiersza jednak plik formatka będzie zmieniał...
Cześć, Uczę się dopiero tych zagadnień i Mam pewien problem mianowicie chciałbym aby w Google Sheets jakiś guzik miał przypisane makro, które po aktywacji sprawdza obszar F4:R222 i ukrywa do druku(lub zwyczajnie w tym pliku ukrywa) te wiersze w których np. od f4-r4, f5-r5 itd do 222 wartości wszystkich komórek w wierszu to "0" aby nie drukowac czegos...
Witam serdecznie, potrzebuje pomocy w stworzeniu makra służącemu skopiowaniu określonego zakresu komórek (zawsze inny) w jednym arkuszu i specjalnego wklejenia (jako zdjęcie)do drugiego arkusza. Zdjęcia będą trzy ( z trzech różnych arkuszy) zawsze zakres zaznaczonych i kopiowanych komórek zawierał będzie się od komórki A1 do komórki o wartości słowo...
ukrywa wiersz excel excel ukrywa wiersz wiersz makro
philips pilot przycisk rozruchowy danfoss 10w40 bierze
Odłączenie czujnika faz rozrządu - lepsza praca silnika? Obsługa CAN w ESPHome na ESP32 i ESP8266