Przepisałem tylko, bez sprawdzenia. Zmiennej "kol" przypisz Nr kolumny, w której wyliczasz dni miesiąca. [syntax=vb]kol = 2 'kolumna, odpowiadająca wierszowi Nr.2 w "Szychtownicy" 'zawierająca dni miesiąca 'Jeśli "Kalendarz" ma indeks 1 to licznik od 2 i wtedy zbędny drugi argument If'a For sht = 1 To Sheets.Count If Sheets(sht).Name <> "Podsumowanie"...
Zaznaczasz koluny i ( shift + alt + strzałka w prawo ) Pojawi się nad kolumnami znacznik "minus". Naciskajac na niego będziesz mógł ukryć kolumny lub klikajac na "plus' odsłonić je. Dot wersji Office 2007 .
Załącznik.
Witaj Na początek wyjaśnij trochę bardziej szczegółowo co ma się dziać (czy mają się ukrywać kolumny nie zawierające szukanych danych, czy w jakiejś komórce mają się wyświetlać informacje w jakich miesiącach dany pracownik był w danym kraju, czy też ile razy był w danym kraju, czy wystarczy że dane kraje się podświetlą np. u danego pracownika na jakiś...
Posiadam rozbudowany plik Excel. Muszę dodać w nim opcję ukrywania poszczególnych kolumn w zależności od tego jakie hasło wpisze użytkownik przy otworzeniu pliku Excel. Przypuśćmy, że użytkownik A podaje swoje hasło, więc w jego arkuszu nie pokazują się kolumny C,D,E. Natomiast jeśli użytkownik B poda swoje hasło nie będzie widział kolumn np.G oraz...
Nie wszystkie "knypsy" są podzielne przez 3. Najprościej sprowadzić je do liczby całkowitej.
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:)
Dzień dobry. Zwracam się do Państwa z zapytaniem i zarazem prośbą o pomoc w rozwiązaniu problemu. Potrzebuję napisać makro, ale moja wiedza na ten temat jest praktycznie zerowa. Potrafię jedynie skopiować kod i ew. go lekko przerobić aby znalazł zastosowanie dla mojego problemu. W tym momencie mam zadanie, którego rozwiązania nie znalazłem nigdzie w...
Chodzi mi o to aby użytkownik przygotowanego arkusza mógł w prosty sposób zaznacza, które kolumny mają zostać wydrukowane, bez konieczności ich ukrywania
Prawidłowo powinno się włączyć ochronę arkusza i odptaszkować całość z wyjątkiem tej kolumny. Jakimś wyjściem jest procedura zdarzeniowa z włączoną ochroną VBA. Ale dla średnio rozgarniętego Usera dość łatwe do "złamania". Spróbuj: hasło dla kolumny "elka", dla VBA standardowe na elektrodzie ;) Ale nie wiem czy to ma jakikolwiek sens, bo podejrzeć co...
Witam wszystkich! Mój problem jest następujący. Arkusz Excel zawiera 65 kolumn z tytułami i ponad 6000 wierszy. Chciałbym stworzyć okno checkboxów lub ich listę, gdzie mogę zaznaczyć checkboxy pokazujące/ukrywające określone kolumny. Potrafię stworzyć pojedynczego checkboxa który mi ukryje/pokaże żądaną kolumnę, ale nie uśmiecha mi się robienie tego...
Zwróć uwagę na kod w Thisworkbook. Jest tam wymuszone zapisanie po ukryciu kolumn przy wychodzeniu. Dlaczego? Jeśli otworzysz plik jako administrator, w trakcie pracy zapiszesz, a przy wyjściu nie, to kolumny zostałyby odkryte. To rozwiązanie ma oczywiście swoje minusy, ale coś za coś... Można by ukrywać kolumny przy otwarciu, ale to bardzo łatwo ominąć.
Podszedłbym do tematu na dwa sposoby: - formatowanie wyświetlania - ustaw format niestandardowy komórki, a jako typ podaj: (at)"," - oczywiście w cudzysłowu zamiast przecinka może być cokolwiek innego - funkcja, która łączy tekst - zakładając, że kolumna A to Twoje wartości - w komórce B1 tworzysz funkcję: ZŁĄCZ.TEKSTY(A1;",") - po czym rozciągasz funkcję...
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.
Chyba jest dobrze. Staram się zrozumieć poszczególne funkcje i kod VBA. Gdy przeciągnę formułę F1 do ostatniego wiersza to w kolumnach C i D gdzie nie ma wpisanej nazwy protokołu w kolumnie E pojawiają się błąd #N/D. Normalnie można się go pozbyć funkcją JEŻELI.BŁĄD, a tutaj jak to zrobić? Chyba że zmodyfikować formułę aby dla pustych komórek z kolumny...
Nie dałeś załącznika, to sobie dopasuj do swojego układu danych. Tylko 2 funkcje w Excelu uwzględniają ukrywanie części danych przez filtr. Są to funkcje SUMY.CZĘŚCIOWE i AGREGUJ. Trzeba je wykorzystać przy pisaniu formuły formatowania warunkowego. Do danych z mojego załącznika będzie to formuła: [syntax=text]=B4=SUMY.CZĘŚCIOWE(5;$B$4:$...
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ąć...
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ć
Witam. :arrow: Korek_123 Ponieważ Excel >=2007 zapisuje w formacie xml, następnie ukrytych wierszy i kolumn dla każdej linii ponad milion jest zapis "ukryte = 1 " i jest coś innego. Spróbuj zapisać w formacie binarnym. Ale różnica jest mała. P.S. Osobiście używam Excel97, maksymalno 2003. W każdym razie mój projekt, inny Excel otworzy. Edit: Ale spójrz...
[syntax=vb] Sub PRLPlusik() MsgBox "Odkrywam..." Sheets("Arkusz1").Select ActiveSheet.Unprotect ("haslo") Columns("A:A").EntireColumn.Hidden = False ActiveSheet.Protect ("haslo") End Sub Sub PRLMinusik() MsgBox "Ukrywam..." Sheets("Arkusz1").Select ActiveSheet.Unprotect ("haslo") Columns("A:A").EntireColumn.Hidden = True ActiveSheet.Protect ("haslo")...
[url=http://office.microsoft.com/pl-pl/e... to będzie pomocne. Nie wiem czy to jest w ogóle możliwe. Tyle z mojej strony.
Gdyby ktoś zastanawiał się nad zad. 12 (ActiveSheet.Unprotect) to http://wronx.net/otherworld/2011/04/01/d...
chodzi o to, żeby z 1 i 2 (i innych których nie ma we wzorze) arkusza z danej kolumny konkretnego pracownika na ostatni arkusz przenosiły się w osobną tablkę Jeżeli posiadasz Excela powyżej wersji 10 :?: to tego typu efekt jak na zrzucie 1047238 możesz uzyskać poprzez utworzenie tabelki połączonej (łącza z danymi z tabelek "kierunkowych" np w ukrytym...
https://support.office.com/pl-pl/article...
No to albo kolumna pomocnicza z filtrem (wtedy masz tylko jeden "klik"-wybierasz 0 ) albo makro. Ponizej z kolumną a makro za chwile podrzucę.
Formatowanie na biało dotyczyło wyłącznie kolumny z filtrem - no ale jak sobie poradziłeś to nie ma tematu.
Dzięki. Poczytam coś o konsolidacji, bo nie ukrywam, że nie jestem w tym obeznany.
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....
Nie, zwykła formuła sumowania. Mam wartości w miesiącach chciałbym ukrywać kolumny z miesięcy które już minęły i otwierać je według potrzeb
Jeżeli jesteś mocno początkujący, rób te funkcje krokami, w kolejnych kolumnach. Na zakończenie kolumny pośrednie (techniczne) ukrywasz i masz ładną tabelkę z wynikiem. W ten sposób możesz łatwiej zrozumieć logikę zapisanych funkcji.
Dzięki za próby pomocy mi jednak arkusz nadal pozostaje zablokowany do edycji - nie mogę go filtrować ani np. zmieniać kolorów czcionki, ukrywać kolumn. Pozostaje opcja wyboru z droplisty tylko
Hej VBA jest dla mnie za trudne. Czy ktoś może mi powiedzieć jak w excelu ukryć rzędy w których komórki są oznaczone znakiem "-" (np w kolumnie A). Chciałbym coś takiego zrobić, że jeśli w A1 jest "-" to mi się rząd automatycznie ukrywa i tak dalej w dół.
Mam jeszcze jeden problem. Mam plik w którym w kolejnych wierszach prezentowane są dane poszczególnych pracowników. Jak z pomocą VBA doprowadzić do sytuacji, że jeśli w wierszu danego pracownika w kolumnie G pojawi się data zwolnienia to ten wiersz zostanie ukryty?
Jeśli już masz makro ukrywania/odkrywania kolumn to: podpowiedź 1. W arkuszu chronionym nie można odkryć kolumn podpowiedź 2. Ochronę z hasłem można zrealizować w makro, konieczna ochrona kodu VBA. podpowiedź 3. [syntax=vb]I UserName = "User1" then 'odkrywamy jakieś kolumny ElseIf UserName = "User2" then 'odkrywamy inne kolumny Else msgbox "Jako " &...
Czy Tobie nie chodzi przypadkiem o blokowanie kolumn? Zaznaczasz całą kolumnę B i z menu wybierasz: Okno -> Zablokuj okienka (jeżeli używasz offica 2003). Potem suwak poziomy przesuwa wszystkie kolumny oprócz tych na lewo od zablokowanej. Aby odblokować - wybierasz "Odblokuj okienka". Można też napisać makro pytające o numery kolumn do porównania i...
Witam, potrzebuje pomocy w stworzeniu makra ktore przy pierwszym kliknieciu na przycisk bedzie ukrywalo wiersze od 32 do 52 ktore w kolumnie B posiadaja 0 a po ponownym nacisnieciu wszystkie ukryte wiersze ponownie sie pokaza. Z gory dziekuje za pomoc. Pozdrawiam
Witam. Jak ukryć wiersze które nie zawierają jakiejś wartości. Przykład (na podstawie załącznika) W kolumnie C są numery artykułów. Chciałbym żeby wyświetlały mi się tylko te artykuły które wybiorę w wierszu 3.
pod pozycją A2 masz y pod pozycją B2 masz x pod pozycją C2 masz żądany procent (komórka sformatowana jako procentowa z np. 2 miejscami po przecinku pod D2 formułka =JEŻELI(A2<B2;(B2*C2)-A2;"OK") aby nie pokazywało ujemych wartości tą kolumnę ukrywasz w pod E2 formułka =JEŻELI(D2<0;"wartość ujemna";D2)
Dzięki (at)Prot rozwiązanie jest ok przy założeniu, że dane w tabeli są udostępniane niewielkie ilości różnych komórek Spółki. Problem, że ta tabela jest udostępniana różnym komórkom w Spółce i różna jest konfiguracja potrzebnych kolumn. Niestety kreatywność użytkowników przerasta najśmielsze oczekiwania :crazyeyes: :shii: Finalnie pozostaję przy rozpoznawaniu...
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...
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...
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...
Witam. Proszę o pomoc w zmodernizowaniu poniższego kodu. Kod działa poprawnie, odkrywa lub ukrywa kolumny na podstawie wyniku z wiersza Cells(2, i) . Kod dotyczy odkrywania i ukrywania 31 kolumn (31 dni). W moim przypadku są to kolumny od E do AI , każda kolumna to kolejny dzień miesiąca. Proszę o pomoc w zmodernizowaniu kodu tak by otwierał lub ukrywał...
witam jestem początkujący jeśli chodzi o VBA, w załączniku jest plik, w którym mam użyty kod do ukrywania / odkrywania wierszy na podstawie zawartości kolumny 9 i checkboxa [syntax=vbscript]Private Sub CheckBox1_Click() Dim lastRow lastRow = Cells.SpecialCells(xlCellTypeLastCell).R... Dim v_column v_column = 9 If CheckBox1 = True Then For i = 1 To lastRow...
Witam, Proszę o pomoc w rozwiązaniu problemu. O ile poradziłem sobie z automatycznym ukrywaniem wierszy: Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Not Application.Intersect(Target, Range("F11:Z11")... Is Nothing Then Range("A29:A74").A... ActiveSheet.Range("$A$29:$A...
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,...
Witajcie, chciałbym prosić o pomoc w napisaniu 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. W jednej kolumnie mam rodzaj: taśma, samochód, pompa i dla każdego z rodzajów - osobne kolumny z właściwościami (parametrami). Wykorzystując filtr chciałbym,...
Jedyne operacje jakie są planowane na tym pliku to: - dodawanie usuwanie i ukrywanie odkrywanie wierszy - kopiowanie wierszy poprzez zaznaczenie całego i wklejanie w ten sam sposób wartości do nowego dodanego wiersza (tutaj wiem już że skopiowane wartości z zaznaczonego całego wiersza i wklejenie ich do nowo utworzonego nie są zapisywane w historii...
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...
ponownie dziękuję za pomoc :) Mam jeszcze pytanie, czy korzystając ze sprawdzania poprawności danych jest jakiś sposób, żeby nie pozwalał zostawiać pustych pół. Chodzi o to, że jak inne komórki w wierszu są puste to komórka w kolumnie H też może być pusta, ale jeżeli inne komórki w wierszu są wypełnione, to komórka w kolumnie H nie może być pusta i...
ukrywać kolumna excel ukrywać kolumna excel makro excel ukrywać kolumna makro
polska język ariston podlaczenie telefonu kondensator mniejszy zasilacz
canon skanowanie suzuki burgman an400
Schemat wzmacniacza głośnikowego Radmor FM3011 A706 UL1481 TBA810AS Renault Master P182F – błąd IMS skrzyni, komunikat „Injection fault”, diagnostyka CAN