Macie może pomysł jak to zapisać żeby kod działał i żeby nie trzeba było robić tak ,,naokoło"? [syntax=vbscript]Sub zamykanie_miesiąca() For s = 2 To 73 If Sheets("Panel_Sterowania").Cells(4, s) = "TAK" Then Sheets("FTC.023").Columns(4 + s).EntireColumn.Hidden = True End If Next s End Sub[/syntax]
Jak nie będziesz w stanie działającego rozwiązania dopasować do swoich potrzeb to nigdy niczego nie napiszesz.
to wtedy mozesz pokombinowac w ten sposób: If Range("A1").Value = 1 Then Columns("C:G").Sel... Selection.EntireColumn.Hidden = False End If i tak dla 2 inne wartości itd, możesz też pokombinować że 1 odsłania DEF i jednocześnie zasłania GHI, 2 na odwrót, wszystko zależy od tego co ci jest potrzebne, pozdro:)
W takim przypadku zastosuj to co napisałem wcześniej.
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ć.
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...
Najprościej będzie z przekazaniem Nr wiersza: [syntax=vbscript]Sub Makro1(w As Long) Dim MyCell As Range For Each MyCell In Range("B" & w & ":Z" & w).Cells If MyCell = 0 Then MyCell.EntireColumn.Hidden = True Next MyCell End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'If Target.Address(0, 0) = "A2" Then If Target.Column...
Spróbuj czegoś takiego: [syntax=vbscript]Sub Rozwiñ6_Zmienianie() Dim rn As Range Application.ScreenUpdating = False 'Range("a1").Value = InputBox("które dane pokazac") 'Range("a1").Value = Range("b3").Value Range("c502:c800").EntireRow.Hidden = False Dim rng As Range For Each rn In Range("c502:c800") If rn = Range("A492") Then If Not rng Is Nothing...
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...
Sam arkusz trochę dziwnie zaprojektowałeś. Przetestuj załączone rozwiązanie.
Niestety nie działa powyższe makro
Lanzul a czym Twoje rady różnią się od moich? Dokładnie o tym samym pisałem. Ukrywane są kolumny od D (w vba jest makro które je ukrywa) czyli mają szerokość "0" oraz zablokowane są okienka. Powoduje to że w arkuszu wstawiana jest pionowa jak i pozioma czarna linia, która zakrywa obramowanie komórek.
Gwoli wyjaśnienia, szukam pomocy w zapisie kodu.. Przy użyciu poniższego zapisu, usuwa się tylko jeden wiersz. Nie wiem w jaki sposób zapisać aby jednak usuwało wszystkie scalowane wiersze. Dodam, że nie ma stałej ilości scalowanych wierszy. [syntax=vbscript]Sub UsunKomorki() Dim bs As Range, r&, i& Set bs = Range("A:R") r = bs(Rows.Count, 13).End(xlUp).Row...
Jeśli chodzi o korzystanie z pliku to nic trudnego. Wystarczy tylko kliknąć na okno z datą: miesiąc lub rok i pojawi Ci się okno z datą wtedy zadajesz datę którą chcesz i potwierdzasz a makro resztę (ukrywanie niepotrzebnych kolumn) zrobi już samo. http://obrazki.elektroda.pl/2150896600_1...
dla przycisku tak daj takie samo makro tylko zamień True na False
Wykorzystaj dwie kolumny. W pierwszej nazwisko, w drugiej nazwa/indeks przydzielonego arkusza. Reszta w załączniku. Makro przy każdej aktywacji robi porządek z hiperłączami i ukrywa arkusze.
Hejka :) Czyli podywagowali wszyscy na temat (lub nie na temat) a odpowiedzi jak nie było tak nie ma :D Proponuję CI takie rozwiązanie... W ThisWorkbook w zdarzeniu open wrzuć ukrywanie/odkrywanie arkusza na podstawie loginu Windowsowego Twoich userów. To jest fajne pewne rozwiązanie, sam tego używam, nie muszą wtedy podawać żadnych haseł (masz taką...
Makro ukrywa wybrane komórki i uwidacznia inne.
Moim zdaniem sympatyczniejsze są formanty z przybornika. Można je łatwo kodować wpisując w obsłudze zdarzenia CheckBox1_Click() ukrywanie i pokazywanie pozostałych CheckBox-ów sprawdzając ich właściwość Value. Ukrywa się przez zmianę właściwości Visible.
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...
Dzięki za podpowiedź A czy jest możliwość użyć tych makr zakładając, że mam dwa podziały na zakładki dotyczące dokumentacji archiwalnej i dokumentacji bieżącej. Zakładam również, że będę miał osobne przyciski do odkrywania i ukrywania dla dokumentacji archiwalnej jak i bieżącej. A może coś w tym rodzaju: po naciśnięciu przycisku np. "ukryj" otwiera...
po kliknięciu nazwy obrazka w komórce A1 Tam będzie kilka takich nazww? Jeśli tylko jedna w A1, to nie ma znaczenia, czy jest nazwa, obrazek będzie tylko jedyn. p.s. Obrazek może być na pierwszym arkuszu, tylko nie widoczne.
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
Niestety też nie widzę opcji by nie było makra. Ale nie makro ukrywające tylko zwykłe wprowadzenie informacji do wydruku do ilu stron ma drukować. Czyli pod przycisk "wrzucić" [syntax=vb] Sub Druk() ActiveWindow.SelectedSheets.PrintOut From:=1, To:=Sheets("POŚW").Range("E22") End Sub [/syntax] I "drukować" przyciskiem.
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...
Wyrzuć co niepotrzebne w procedurach Thisworbook. Powinno zostać tylko chowanie kolumn.[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) ' i tutaj wstawiłem makro ukrywające ThisWorkbook.Save End Sub[/syntax]Wykorzystaj swoje makro. Żeby ukrywanie było skuteczne, musisz wymusić zapisanie pliku. Dlatego może okazać się niezbędne automatyczne...
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.
w pliku są danę osobowe pracowników, więc najpierw musiałbym go "wyczyścić". Przy starcie jest makro, które ukrywa arkusze i włącza ochronę. Arkusz1 ma własne menu podręczne.
Makro to się samo uruchamia, jeśli podłączysz je pod swój arkusz pod zdarzenie change - wtedy jest z automatu wykonywane gdy cokolwiek się w arkuszu zmieni. Moje makro używa tego samego mechanizmu, w załączniku masz gotowy przykład już z osadzonym makrem. W makro Kolegi PRL musisz zrobić więcej poprawek, żeby działało pod Ciebie - będzie ono jedynie...
Witam, potrzebuję pomocy z napisaniem kodu, który będzie w stanie wyszukać we wskazanym zakresie komórki, które mają obramowanie w kolorze czerwonym. Jeśli komórka ma czerwone obramowanie, to dana kolumna w której jest komórka powinna zostać ukryta. Napisałem prosty kod, który to robi i wrzucenie tego w pętle to też nie problem, ale jest pewien szkopuł,...
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",...
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()...
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ę
Bardzo dziękuję za to rozwiązanie. Mam jeszcze jedną prośbę, czy jest szansa zrobienia tego za pomocą makra? Nie ukrywam, ze ułatwiłoby mi to jeszcze bardziej pracę. Pozdrawiam.
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...
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...
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 Chciałem dodać przycisk typu ON/OFF ukrywa i odkrywa obszar Mam stworzone dwa makra makro1 ukrywa obszar makro2 odkrywa obszar W sieci znalazłem sposób który pozwala na taką sztuczkę ale nie wiem gdzie to podstawić do obecnych wartości aby to działało. znaleziony kod Private Sub ToggleButton1_Click() With ToggleButton1 If .Value Then Call...
Masz literówkę, powinno być: "delete". Dla ukrywania nagraj sobie makro i podstaw, zamiast delete, polecenie nagrane przez rejestrator (ciąg po selection).
Witam, potrzebuje pomocy w makrze, dużo już sam zrobiłem ale tego nie potrafię a raczej nie rozumiem. Makro ma za zadanie ukrywać dni miesiąca które nie występują w danym miesiącu czy może ktoś mi to pokazać co i jak
A zrób tak: zaznacz WSZYSTKIE komórki (CTRL+A), prawym, Formatuj, Ochrona ODZNACZ "Zablokuj". Teraz zaznacz chronione komórki, zaznacz "Zablokuj" - i ew. "Ukryj", to tylko ukrywa formuły... Narzędzia->Ochrona->Chroń arkusz, zahacz co chcesz lub pozostaw domyślne dwa pierwsze, restrykcyjne ograniczenia.
Mam przycisk wykonujący powyższe makro. Jak zrobić by nie był on (przycisk) widoczny na wydruku? Musisz wstawić przycisk w pole tekstowe, i je ukrywać. [syntax=vbscript]With ActiveDocument .Shapes(1).Visible = msoFalse .PrintOut .Shapes(1).Visible = msoTrue End With [/syntax]
Ahaaa, okej. Czyli makro będzie dla każdej pojedynczej linii najpierw ją archiwizowało i od razu ukrywało. Masz łeb :) Dziękuję!!
Na początku procedury wyłącz odświeżanie (1), na końcu włącz. Jeśli masz oprogramowane zdarzenia arkusza lub funkcje użytkownika w arkuszu, to wyłącz także zdarzenia (2). [syntax=vb]Application.ScreenUpdating = False '1 Application.EnableEvents = False '2 i = 1 Do ... Loop Application.EnableEvents = True Application.ScreenUpdating = True[/syntax]
W załączeniu wycinek z większego projektu, obrazujący mój problem. Utworzyłem proste makro filtrujące pewne wartości. Niestety po uruchomieniu makra filtr działa ale ukrywa wszystkie wartości. Po wejściu w filtr i naciśnięciu ok bez żadnych zmian dane pojawiają się.
Zdejmuje haslo, wrzucam range w makro - chyba, że w złym miejscy ale wrzucam range po ponownym założeniu hasła w makrze. Możesz podpowiedzieć w którym miejscu powinien być range? Dane można wpisywać, gorzej, że np nie mogę ukrywać kolumn czy formatować np kolorami.
Marek, dzięki za odpowiedź. Nie ukrywam, że mam już działające makro. Trochę inaczej opisane niż Ty to zrobiłeś, ale działa. Przetestowałem Twój kod i tradycyjnie już - wszystko jest OK :)
.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 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...
Bez plików trudno się zorientować co Ty chcesz kopiować :cry: Proponuję jednak nagrać sobie makro przenoszenia (kopiowania) całego arkusza z pliku źródłowego do pliku docelowego :idea: , a potem przeprowadzić procedurę ukrywania lub usuwania niepotrzebnych danych w pliku docelowym :D
Pomysł bardzo fajny. Niestety nie mam pojęcia o pętlach w vba. Nie będę ukrywał, że ucieszyłby mnie gotowy skrypt do użycia.
To może inaczej, załóżmy, że przy każdym mieście pokażę Województwo do jakiego należy, czyli na powyższym przykładzie będzie Mazowieckie Mazowieckie Mazowieckie Śląskie Śląskie To jak mogę napisać makro, które będzie pokazywać Mazowieckie tylko w pierwszy raz a potem dopóki się powtarza to ukrywać tą samą nazwę a z kolei pokazywać kolejne nowe itp :)?
Zapewne można napisać kolejne makro korzystając z worksheet_change, albo wstawić listę rozwijalną i z niej wybierać.
Problem polega na tym, że mam dwa arkusze. W obu jest lista rzeczy. Celowo miałby powstać trzeci arkusz który wyfiltruje pozycje, które pojawiły sie w arkuszu drugim, a których nie ma w pierwszym. Nie ukrywam, że byłoby super otrzymać gotowe makro, ponieważ nigdy nie miałam okazji poznać szczegółowo Excela od tej strony. Być może nie jest potrzebne...
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...
Witam Może ktoś wie jak zrobić test wielokrotnego wyboru w Excel'u. Np. taki http://zis.pap.edu.pl/sylwia/prace_pliki... Pozdrawiam Przecież w tym pliku co go wskazałeś masz wszystko zrobione to co chcesz żeby ci wyjaśniać ??? Skąd co się bierze? Jak się ustawia pola wyboru? spytaj konkretniej Kwestia ustawienia w arkuszu3...
Cześć, Mam tabele z listą pracowników i przypisanymi do nich wydajnościami za poszczególny dzień. A3 imię i nazwisko B3 średnia C3 - DI3 - dni po kolei Chciałbym napisać makro, żeby w kolumnie był do wybrania zakres A1 - początek zakresu np. 01.03.2023 A2 - koniec zakresu 31.09.2023 Tak żeby zostały widoczne kolumny A3 i B3, a ukrywały się te kolumny,...
Dziękuje. Domyślam że tylko w taki sposób można rozwiązać mój problem. Wolałbym aby każdy arkusz który ma być ukryty i zabezpieczony hasłem, był ukryty i zabezpieczony hasłem. Natomiast makro nie otwierało arkusza ale "wykonało pracę" i nie musiało ukrywać z powrotem arkusza. Zasada działania jak funkcji excela. Czy jest to możliwe?
A skąd kolego masz ten pik z makrami "Skoroszyt.xlsm" ? Odpowiedz na pytanie Excela - czy masz go z zaufanego źródła ? :?: Zaufane źródła - z reguły nie ukrywają żadnych makr ani arkuszy typu "sheet8.xml" :D Otwórz sobie jakiś nowy skoroszyt, wprowadź jakieś dane i zapisz go raz jako zwykły skoroszyt(1) xlsx, a potem zapisz ten sam skoroszyt(2) jako...
Wiesz..dzięki za pomoc, ale chyba się troszkę nie zrozumieliśmy, albo ja zbyt zawile to wytłumaczyłem, otóż mam arkusz_1 , wewnątrz tego arkusza uruchamiam makro, które mi go ukrywa i zarazem zakłada ochronę struktury skoroszytu ( Narzędzia/ Ochrona/ Chroń skoroszyt/ struktura/ hasło opcjonalne) . Wszystko jest OK arkusz_1 został ukryty ochrona została...
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...
Zapewne chodzi o to, żeby otwarcie bez obsługi makr zablokowało arkusze. Można ukryć arkusze z atrybutem veryhidden, zostawiając jeden z informacją w stylu: "sorry, otwarto bez makr, czy cóś". Ukrywanie realizować przy każdym zamknięciu arkusza, a przy otwarciu odkrywać. Edycję VB ochronić hasłem, żeby nikt nie zmienił atrybutów. Edit: O, zdążyłeś wstawić...
Informacje na temat swoich produktów są skrzętnie ukrywane przez producentów. Trudno więc odpowiedzieć na to pytanie. Jedynym obiektywnym sposobem jest zrobienie zdjęć makro takich matryc i porównać je. Chętnie bym to zrobił ale nie mam w domu takich odbiorników telewizyjnych. Tutaj mam fotkę OTV LCD: https://obrazki.elektroda.pl/2201039900_...
makra, które umożliwiłoby ukrywanie kolumn z własnościami, które nie dot. dla danej pozycji, a odkrywało kolumny z właściwościami dot. danej pozycji. Jeśli dobrze zrozumiałem Twoje potrzeby :D to można taki efekt jak na zrzucie 986535 uzyskać poprzez makro Private Sub Worksheet_BeforeDoubleClick :idea: , a następnie poprzez makro Private Sub Worksheet_BeforeRightClick...
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...
Witam. Bardzo proszę o pomoc. W oparciu o zamieszczone przykłady na forum, tworzyłem formularz zawierający m.in. ramki. Do formularza dodałem makro. Ramka powinny się ukrywać jeżeli w przypisanej jej komórce będzie Fałsz. Poniższy kod pisałem w excelu 2013. [syntax=vb]Private Sub CommandButton2_Click() Dim mojFrame As MSForms.Frame Dim pierwszyWiersz...
Witam wszystkich . Otóż mam problem następujący potrzebuje makro ,które sortowałoby wyszukane rekordy po nazwie i kopiowało do innego arkusza , najlepiej żeby było z oknem do wpisania tego co jest potrzebne. Nie zawracałbym tym głowy gdybym miał chociaż elementarną wiedzę. Niestety jestem totalnym laikiem w tej kwestii a znajomość excella mam podstawową....
Potrafię jedynie skopiować kod i ew. go lekko przerobić aby znalazł zastosowanie dla mojego problemu. Twój opis jest nieprecyzyjny, a pliku przykładowego brak :cry: Skoro potrafisz przerobić makro to możesz zmodyfikować kod reakcji arkusza na wypełnienie komórki, oraz reakcji po doubleclick na widoczność komórki :spoko: 1037212
... Kiedy nie miałem filtrowania poprzez przycisk z makrem vba ukrywanie oraz chronienie komórki pomagało, lecz kiedy ma m filtrowanie z przycisku, to VBA wyrzuca błąd iż arkusz jest chroniony A czy w kodzie vba jest gdzieś taka linia (?): True , to po zablokowaniu arkusza dana czynność jest dozwolona. Tam gdzie jest False , jest ona zabroniona. ......
Albo zrób sobie "odtwarzarkę wzorów", czyli makro, które je przywróci, moduł vba zabezpieczysz hasłem oraz przed podglądem, wstawisz przycisk w arkusz ... i wtedy żaden użytkownik ci nie straszny, będzie mógł kasować wzory do woli, co minutę ... jedno wciśnięcie przycisku i masz odtworzone formułki, a złośliwy użytkownik zgrzyta zębami ... Dodano po...
Witam, mam arkusz, w którym muszę zastosować kilka makr, większość przeskoczyłem ale na dwóch się zawiesiłem i stąd mój wpis. 1. Czy w Excel2013 da się makrem ukrywać wstążkę tak jak dało się to zrobić w Excel2007 bo coś mi zadziałać makro, które kiedyś stworzyłem, a wiem że było sprawne oraz 2 ważniejsze: Mam tabelę i w kolumnie np. E11 mam wczytane...
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]
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...
Kiedyś sobie poradziłem z rysowaniem wykresów poprzez autokształty. Makro pobierało wartości i przesuwało początki i końce linii w odpowiednie miejsca, a niepotrzebne linie ukrywało. Tylko musiałem stworzyć tyle linii ile max na wykresie miało być. Ty byś musiał stworzyć tyle kompletów kształtów (można hurtowo kopiować, więc pójdzie szybko) i je poukrywać....
Dzięki za szybką odpowiedź. Originalnego zeszytu nie mogę teraz uploadowac bo nie jestem w pracy. Ale byłbym w stanie makro zaadaptować gdybyś podesłał podpowiedź bazując na wstawionym przykładzie. Choć nie ukrywam że również z chęcią zobaczył bym jak miałaby wyglądać ta lista pominietych / zdublowanych - nigdy tego nie próbowałem. Byłbym wdzięczny...
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
Dzień dobry, w zasadzie to godzina jest podawana w standardowym formacie (oryginalne dane dorzuciłam do arkusza), ale rozdzieliłam ją pod makro (nie radze sobie z działaniem na datach niestety). A makro chciałam zrobić dlatego, że mam takie dane dla całego kwartału i dla kilku spółek (praca magisterska) i nie widziałam żadnego innego "sensownego" rozwiązania,...
Zależy co ukrywasz pod pojęciem "lista rozwijalna". Od tego zależy, jakie funkcje należałoby użyć w arkuszu. Najlepiej wrzuć przykład w postaci pliku, koniecznie z ową listą...
http://obrazki.elektroda.pl/3954164300_1... Coś takiego mi wyskoczyło jak wybieram coś z listy. A żeby ukrywać na zmianę pola to rzeczywiście banalnie się wydaje rozwiązanie i nie wpadłem na to.
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...
Kod łatwiej się czyta, kiedy umieścisz go w znacznikach... Na Twoim miejscu zacząłbym od usunięcia [syntax=vb]On Error Resume Next[/syntax]bo to, że błędy ukrywasz nie znaczy, że one znikną... Nie wiem też, czemu mają służyć te linijki z XlApp - jeżeli chcesz się odwołać do bieżącego pliku, to się robi inaczej (zakłądajc, że jest to makro w Excelu)......
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 mam jeszcze jedn mały problem. Mam nadzieje że mały, czy jest taka możliwość ze po wykonaniu akcji kopiuj i wstawieniu do arkusza test np 10 powtórzonych dwa wiesze pod ostatnia wstawiona tabelka pojawi sie przycisk do którego będę mógł przypiąć makro zamykajcie arkusz. nie ma problemu z makrem zamykającym i ukrywającym arkusz ale z komendą wywołująca...
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...
Witam Chciałbym stworzyć prostą aplikację do pisania kopert. Po prostu na jednym arkuszu tworzę wzór koperty z potwierdzeniem na drugiej lista adresatów ok 3000 pozycji. Cały problem polega na tym aby nie skakać po arkuszach i robić kopiuj wklej, tylko aby się dało dodać adresata przez przycisk Dodaj lub skrót uruchamiający makro z bazą adresatów z...
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.
nie zupełnie bo już siedzę nad tym od piątku i nie a moze jeszcze gorzej !! Dodano po 5 Wielkie dzięki a czy wytłumaczysz mi czym to się różni, sprawdzam Visual Basic i nie ma nic innego a działa inaczej? Dodano po 3 Bo bardrzo mi to pomogło nie ukrywam, ale chcę to skopiować do swojego arkusza więc cały Visaul Basic kopiuje niestety ale nie pali błąd.
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...
W tym skoroszycie już tak masz namieszane z tym Twoim ukrywaniem arkuszy i zakresów komórek, że do momentu uzyskania stabilnego działania makr powinieneś odpuścić wszystkie komplikacje. Pamiętaj o czyszczeniu całego zakresu "wynikowego" przed nowym wyszukiwaniem np po wydruku lub przed wejściem do nowego wyszukiwania. Dla drugiego wyszukiwania powinieneś...
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...
Mowiąc szczerze nie bardzo mi idze z tym makrem. Probowałem coś z waszymi częściami skryptu, ale ponieważ nie ma co ukrywać jestem zielony nie bardzo wychodzi mi tworzenie do tych skrawków "obudowy". Jeśli macie pomysł dlaczego moj kod działa tylko raz, a nie na cały zaznaczony obszar, będę wdzięczny za pomoc. Lub jakiś kod zastępczy. pozdr.
No to zastosuj tu funckcję jeżeli() w komórce D2 piszesz coś a'la: "jeżeli wartość w komórce B2 > 0 to tu wstaw wartość komórki B2" jeżeli(b2>0;b2) - piszę z pamięci, ale coś takiego No i teraz kopiujesz funkcję z D2 do wszystkich używanych komórek w kolumnie D. Można też sobie wymyślić, że jakaś kolumna (np. E) będzie "techniczna", tam można różne...
Że muszę mieć odkryty arkusz to już sam zauważyłem. Ale z czego wynika to , że jak nagrywam macro to wszystko działa. A jak uruchamiam później skoroszyt to jest #ARG? Zarejestrowałem jeszcze raz makra. Tym razem przed Save nie ukrywałem Arkuszy. Wszystko działało. Robie Save. Wychodzę. Uruchamiam. Nie działa. ??????? Wklejam jeszcze raz kod: Sub Nazwisko()...
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_...
w tym pliku wszystko działa jak należy. korzystałam z kolegi pliku"ProtTtablica.xlsx" i przez to powstała pomyłka.Przepraszam kolegę za to. Dziękuje za pomoc. Mam inne pytanie. w swoje dane przerzuciłam kolegi makro i jest problem. Makro nie wywala żadnego błędu, ale nie kopiuje danych, nie wiem dlaczego? Dodano po 35 Witam. Makro działa. Ślicznie dziękuje...
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ąć...
Masz 2 przykłady jak można to zrobić wystarczy wykorzystać. Osobiście proponowałbym niczego nie kopiować/usuwać tylko wstawić do arkusza naklejki kilka tabelek i wg. potrzeb ukrywać cześć lub pokazywać. Przepraszam, chętnie mogę pomóc jak coś się robi ale wykonać całą pracę za kogoś to już mi się nie chce. Mam nadzieję, że trochę pomogłem?
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ę...
Może w sposób następujący: Ad.2 Zmieniłem formułę formatowania warunkowego. Nie wiem czemu służyło 'LICZ.JEŻELI', więc usunąłem. Ad.3 Procedura zdarzeniowa arkusza + (najprościej) ukrywanie kolumn. W obu przypadkach skróciłem zakresy. Nie znam miesiąca, który miałby 32 dni. Może w jakimś innym kalendarzu? ;) P.S. Pliki wersji >2003 trzeba spakować (ZIP,...
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...
excel makro ukrywanie makro ukrywanie wierszy makro ukrywanie arkuszy
junkers cerapur podłączyć sterownik zabezpieczenie odgromowe klejenie żywicą metal
mikrokomputer cobra1 le40c630 podświetlenie
Mercedes W212 2.2 CDI - Kod P2080, Czujnik EGT Mercedes W212 2.2 CDI - Czujnik Temperatury Spalin