Podobne rozwiązanie wraz z implementacją w Kolegi arkuszu. Do mojej funkcji jako parametry trzeba przekazać zakres ignorowanych i datę, po której chcemy wygenerować kolejny dzień roboczy (czyli pon-sob i spoza listy).
Bardzo dziękuje o to chodziło :D Ratujesz mi życie ^^
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,...
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...
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...
Znalazłem rozwiązanie mojego problemu. Z niewiadomych przyczyn w ustawieniach zwykłego formantu pola wyboru, czyli klikając 'Formatuj formant' w zakładce 'Właściwości' nie ma możliwości zaznaczenia opcji 'Przenieś i zmieniaj rozmiar wraz z komórkami', co jest wymagane w przypadku ukrywania komórek w których te pola się znajdują. Rozwiązaniem jest obejście...
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]
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...
Hej wiesz co nie za bardzo zależy mi na gotowcu bo jednak wole się czegoś nauczyć, jednak chętnie zerknę jak ktoś zrobił :). Na razie mam taki pomysł żeby zrobić to na zasadzie oddalenia obrazu i wrysowania całego ustawienia na zasadzi kolorowania komórek. Narysowania bitowo. Oczywiście nie wiem czy to jest rozwiązanie najlepsze pomyślałem że użycie...
Ukrywanie kolumn lub wierszy, które nie są drukowane
Dane - Filter nie dziala ?
Wydaje mi się, że najlepszym rozwiązaniem w przypadku wartości stałych, wpisywanych z klawiatury jest stosowanie grupowania arkuszy. Wtedy w obu arkuszach jest dokładnie ta sama zawartość. Pozwala to również na formatowanie komórek, ukrywanie i odkrywanie wierszy, usuwanie i wstawianie wierszy. Trzeba tylko zadbać, żeby wiersze sobie odpowiadały. Poprawki...
Może trzeba skorzystać z innej funkcji Target.* ? Musisz trochę poczytać n/t VBA szczególnie o procedurach zdarzeniowych :!: :D Przy zdarzeniach typu Change wywoływana jest automatycznie procedura w momencie zmiany stanu (tj. wartości) w określonym zakresie komórek (ten zakres określony jest zgodnie z definicją mianem Target ). Jeśli chcesz wykorzystać...
1. chronić arkusz [syntax=vb]Sub Button4_Click() activesheet.Unprotect 'ew. haslo Rows ("7:19") .Hidden = Not Rows ("7: 19") .Hidden Activesheet.Protect 'haslo End Sub [/syntax]
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...
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...
Pomijając literówkę w przypisaniu, zamienione argumenty w Cells(row, column), zakręcony wybór kontrolki w pętli, to zdaje się coś za dużo tych pętli. Po modyfikacji http://obrazki.elektroda.pl/3585684200_1...
Ok, już rozumiem. Mógłbym ewentualnie zrobić odwołanie w docelowym arkuszu na zasadzie komórka w arkuszu, gdzie kolumny mają się ukrywać = komórka z arkusza źródłowego. Macie może pomysł, jak to zapisać, żeby kod działał i żeby nie trzeba było robić tak ,,naokoło"?
Ten fragment jest w dwóch miejscach. Usunięcie nie rozwiązuje problemów. Błędy pojawiają się kiedy skrypt chce wypełnić już wypełnione i zablokowane komórki - np. w nagłówku linie wypełnione kropkami. Wykrzacza się także przy ukrywaniu komórek - np. przy zmianie z "porównanie sieci" na "sieć x fazowa". Office 2000 to zabytek, więc nie wiem, czy jest...
Bo siedzi w pamięci ze "starą" wartością. Zamiast ukrywać, zamknij: Unload
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.
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.
Witam W jaki sposób napisać formułę aby ukrywała komórkę w której jest określona data? I chciałbym aby mi odliczało ilość dni która pozostała do zapłaty. Bardzo proszę o pomoc.
Nie mam w komórce opcji "odrzucanie połączeń" Mam tylko po wejściu do "ustawienia połączeń" - ID rozmówcy - Połączenia oczekujące - Poczta Głosowa - Szybkie odpowiedzi - Ustalone numery - Przekazywanie połączeń Czy jest możliwość, że komórka sama ukrywa niektóre opcje? Komórka posiada Androida 4.1.2 gdyby była potrzebna ta informacja.
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...
Makro ukrywa wybrane komórki i uwidacznia inne.
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ę...
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.
kolumna ukrywa się w momencie zapełnienia ostatniej komórki z podanego zakresu. Taki efekt uzyskasz przy kodzie :D [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Set Contr = Range("F2:F11") k = 0 LastRow = Cells(Rows.Count, "F").End(xlUp).Row For i = 2 To LastRow If Cells(i, 6) = "" Then k = k + 1 End If Next If Not Intersect(Target,...
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
Długość tekstu argumentu Range jest ograniczona, chyba do 255 znaków. Możesz jeszcze spróbować utworzyć unię zakresów. Jest to też na ogół zakres złożony z tym, że jeśli są komórki przylegające, to one są łączone w obszary np. B30:B35. Jeśli są komórki scalone, to unia to uwzględnia. Przeanalizuj sobie przykład i kody z załącznika i wykorzystaj.
W zasadzie mozna to zrobić na trzy sposoby, mowa jest o drukowaniu arkusza bez "niechcianych" wierszy. 1. uzyć narzędzia Aparat fotograficzny 2. zastosować Grupy i konspekty 3. ukrywać wiersze niechciane Pozdrówka
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...
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ć.
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.
Witam, W załączniku zamieściłem plik, o którym pisałem. Klawisz Odkryj i Ukryj służy do odkrywania i ukrywania komórek, które nie są mi potrzebne w danym dniu. Za pomocą kolejnych przycisków potrzebuję wydrukować: 1) 3 kartki A4 i 1 kartkę A3 z zakresu B2:AV78 - dopasowane do strony; 2) 1 kartkę A4 - dopasowaną do strony; To samo się odnosi do zakresu...
Witam Mam tabelę, w której są scalone komórki w dwóch kolumnach. Problem w tym, że po filtrowaniu kolumny w której nie ma scalonych komórek ukrywają się linie w kolumnach ze scalonymi komórkami, jeżeli pierwsze komórki w tych scalonych komórkach są ukryte. Jak można zrobić, żeby takie linie były widoczne. Dla przykładu dołączam podobny jak mój plik,...
Zaznacz komórki, w których chcesz ukryć formuły, wejdź w formatowanie komórek i na zakładce ochrona zaznacz wszystkie opcje. Tam też znajduje sie dalsza instrukcja, tzn w menu Narzędzia wybrać Ochrona i ustawić Chronienie arkusza
Czy te przyciski są osadzone bezpośrednio w arkuszu? Jeśli tak, można napisać kod, który (w wyniku odpowiednich działań) będzie ukrywał /odkrywał komórki, na których jest osadzony dany przycisk. Można też utworzyć formularz UserForm (lub dwa – niezależne), na którym będą umiejscowione przyciski . Formularz może się uaktywniać w zależności od pewnych...
Witam Mam takie zapytanie w arkuszu jest utworzona baza pracowników z podziałem na działy. Czy jest możliwość ukrywania odpowiednich kolumn w zależności od zaznaczonego czekboksa i wartości w komórce. Chodzi o to że jak zaznaczę czeka umieszczanego w komórce d8, będą widoczne tylko kolumny Q, AD, AQ i tak dalej. Zrobiłem to ręcznie ale jest to po pierwsze...
... 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. ......
To zadzwoń do siebie na komórkę ja i zobacz czy jest zastrzeżony.
Witam ostatnio uzyskałem wyczerpującą odpowiedź na możliwość ukrywania kolumn po wypełnieniu ostatniej komórki a teraz chciałbym prosić o odpowiedź na pytanie: Jak zmodyfikować regułę aby mechanizm funkcji ukrywał równocześnie także trzy inne kolumny z lewej strony ukrywanej kolumny (już bez reguły zapełnienia) Pozdrawiam: keszybz
Faktycznie jaśniej będzie jak załączę plik z przykładem :) Po użyciu pola ukrywania/odkrywania wartości się nie aktualizują - trzeba kliknąć dwa razy w komórkę sumującą i zatwierdzić enterem, aby się zaktualizowały.
To tylko piwnica - nie kwatera NATO ;) Nie należy przesadzać z zabezpieczeniami bo raz że powodują też zainteresowanie - po co Kowalskiemu takie coś w piwnicy - a może by tak sprawdzić co tam tak ukrywa? A dwa że czasem takie systemy poprawiają wartość łupu ;)
ok ukrywanie kolumn też jest dobrym rozwiązaniem, ale pozostaje pytanie jaki kod dodatkowo nałoży filtr? Myślałem na początku aby wpisać Range ("AE2:DR2") autofiltr.select i coś na zasadzie odnalezienia adresu komórki (ctrl+f) i aby zawsze ukrywał godziny nie pracujące... czy trzeba na początku zadeklarować datę jako zmienną i na jej podstawie szukać...
Bez przesadyzmu... Tak jak napisałem nie wszystkie procedury zostały ukończone a selectów to tam dużo nie ma, o Activate jest ten temat ponieważ chciałem go wykluczyć. Co do pętli to się zgadzam. Również chciałem to zrobić czymś w rodzaju 'podaj pozycję', ale nie chciałem już ukrywać kolejnych komórek a wbudowanych funkcji VBA to ja nie potrafię obsługiwać....
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.
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...
Właśnie tak trzeba wybierać z menu Format->wiersze->ukryj/odkryj. Ale żeby można było rozwinąć podrzędne komórki klikając w komórkę z nazwiskiem.
ukrywanie paska ukrywanie kolumny ukrywanie wierszy
światła pozycyjny schemat miernik napiąć icl7107 schemat termostat zamrażarka
horman brama kryzowanie grzejników
SEAT Cordoba Aura Alana Lena – ręczne strojenie radia FM/AM, zapis stacji, ustawienia regionu Kombinacje kodu PIN z dwoma identycznymi cyframi