Np. dla zakresu A1:B5 Od początku powinno być odblokowany. [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) Dim zakres As Range Set zakres = Range("A1:B5") If Intersect(Target, zakres) Is Nothing Then Exit Sub Me.Unprotect 'haslo Target.Locked = True Me.Protect 'haslo End Sub [/syntax]
Trochę przerobiłem.
Change dla całego arkusza (arkuszy), a wewnątrz If B2=1 Then
Chodzi o to, że cały arkusz musi być aktywny do edycji (będą wprowadzane dane). Dopiero po wciśnięciu blokady komórka ma zostać zablokowana tak, aby nikt nie mógł zmienić jej zawartości. Z góry dziękuję za pomoc.
---> kolumny automatycznie się dostosowywały do zawartości (tutaj chyba użyteczna będzie Columns ("1:18").AutoFit); ---> włączenie opcji zawijania tekstu . ---> Każda komórka była obramowana jak w pliku źródłowym ---> kolumna R zsumowała wartości z kolumn L, N, O i była zapisana w formacie księgowym. Kolumna E i F – format daty (dd-mm-yy). Jak...
Teoretycznie - "tak", ale praktycznie to nie wiem czy byłbyś zadowolony, wiązałoby się to bowiem z zakładaniem ochrony na cały arkusz, przy wskazywaniu jednocześnie, które komórki mają być zablokowane, a które nie. Trudno dociec co tam jeszcze masz w arkuszu, co powiino być chronione/blokowane, a co nie i co czemu wchodziłoby w paradę. Taki pomysł na...
Spróbuj z hasłem (zmień wartości, jeśli ma być odwrotnie)[syntax=vb]Sub makro1() ' ' makro1 Makro ' blokowanie komórek i ochrona arkusza' ' Klawisz skrótu: Ctrl+r ' ActiveSheet.Cells.Locked = False With ActiveSheet.Range("C9:F13,C15:F19,C21:F2... .Locked = True .FormulaHidden = False...
Chodzi o to by excel nie przyjmował innego kodu Jeśli chodzi o to aby uniemożliwić wpisywanie ręczne w kolumnie A to można to zrealizować przy wykorzystaniu niestandardowego ustawienia poprawności danych :idea: - tak jak widać na zrzucie i w załączonym pliku :spoko: 1052639 1052640
Powiedzmy że działa - potestuj. Trochę info o pliku: Podstawa: Makro sprawdza w nagłówku (w wierszu drugim) gdzie jest tekst "Zadanie" i "Grupa interwencyjna" jak również w wierszu trzecim szuka ostatniej niepustej komórki. (po tym rozpoznaje ile jest poszczególnych kolumn. Jeżeli zmienisz nazwy dodawać dowolną ilość kolumn do zadania i do pracowników....
Który z linii makro 'Odświerz1' błąd? ActiveSheet.ShowAllData ? wtedy [syntax=vb]If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData [/syntax]
Chcesz odblokować tylko formatowanie tekstu w komórkach ? (dane nie zmieniac) Kod w post #2 odblokuje wszystko... Ale... te makra do przyciskow(Pobierz_Arkusz1, Usuñ_Arkusz1) to odblokowanie usune. Uzyj przy blokowaniu kod ActiveSheet.Protect Password:="x", AllowFormattingCells:=True
[syntax=vb] Private Sub Worksheet_Change(ByVal Target As Range) Dim Komorka As Range For Each Komorka In Target.Cells Select Case Komorka.Value Case "D49", "D48", "D30", "D31", "D32", "D33", "D20", "D21", "D22", "D26", "D27", "D28", "D29" Komorka.Interior.Color = vbBlue Case "PL" Komorka.Interior.Color = vbYellow Case Else Komorka.Interior.Pattern =...
Myślę, że jak dołączysz plik którego ma to dotyczyć i określisz na jakiej zasadzie chcesz zabezpieczyć określone komórki byłoby łatwiej. Możesz też włączyć nagrywanie makr i zapisać które komórki chcesz blokować a później przypisać tak stworzone makro do jakiegoś przycisku lub skrótu klawiatury.
Mam zapisane makro na tabelki do blokowania komórek po wprowadzeniu danych tego wymagają przepisy akredytacyjne. Jeżeli się ktoś pomyli musi w zakładce recenzja odblokować arkusz i w tym momencie czasami usuwają mi formuły.
witam, udało mi się to rozgryźć - dodałem kod, który najpierw odblokowuje arkusz, a na końcu go blokuje ponownie ufff, cżłowiek się uczy całe życie pozdrawiam
Potrzebuję stworzyć makro, które będzie blokowało do edycji dany zakres komórek - jeśli w jakiejś innej komórce nie z tego zakresu będzie określona wartość dajmy na to 2. Prośba o pomoc.
Ok. a więc teraz jak już się da wpisywać w kolejnych wierszach kolumny A, to niestety nie blokuje komórki sąsiadującej, gdy w komórce z kolumny A wpisuje "nie". Kasuje tylko, jeśli wprowadzone było najpierw tak a potem zedytowane na nie Zanim wprowadziłam makro, zaznaczyłam komórki i zaznaczyłam w formacie w ochronie wedle zaleceń a w samym makro usunęłam...
Witam, Mając wykonany printscreen obrazku, z pozycji komórki, w której ma być wklejony, uruchamiam makro, które: - blokuje współczynnik proporcji - wstawia mi obrazek automatycznie pomniejszony do wysokości 2,5 cm - zmienia właściwości obrazu na "przenoś i zmniejszaj rozmiar wraz z komórkami". Już parę dni męczę temat i nie potrafię dopisać warunku,...
W Excel 2007 wykorzystuje w podobnej sytuacji drobne makro, które blokuje hasłem niepuste komórki przy zamykaniu skoroszytu :D [syntax=vbscript]Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim cell As Range ActiveSheet.Unprotect Password:="haslo" For Each cell In ActiveSheet.UsedRange If IsEmpty(cell) Then cell.Locked = False Next cell ActiveSheet.Protect...
Sory, żle to tłumacze :( Chodzi o to aby tak jak w arkuszu1, po wpisaniu daty, blokowała się edycja komórek do danej daty. To makro działa na jednym arkuszu a chciałbym aby dzialalo na kilku...
Możesz wypróbować taki kod: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim WorkRng As Range, Rng As Range Application.EnableEvents = False Set WorkRng = Intersect(Range("B:I"), Target) If Not WorkRng Is Nothing Then If WorkRng.Rows.Count > 1 Then Application.Undo Application.EnableEvents = True Exit Sub End If For Each Rng...
Jeśli nadal chcesz szukać rozwiązania w makrach to poczytaj wątek [url=https://www.elektroda.pl/rtvforum/t... komórek po spełnionym warunku :idea:
Szukam pomocy w rozwiązaniu blokady kolejnych kolumn, jeżeli data w komórkach pierwszego wiersza będzie mniejsza niż data bieżąca. Chciałem w makro odblokować arkusz, zmienić w pierwszej kolumnie wszystkie komórki na Zablokowane, jeżeli data w pierwszym wierszu tej kolumny jest mniejsza od teraz(), przejść do sprawdzenia kolejnej. Jeżeli kolejna data...
ok, działa jednak teraz blokuje się arkusz bo skoro caly czas jest wpisane Start to makro za każdym razem się odpala. Po wykonaniu makra powinna nastąpić zmiana wartości Start na Koniec. Tylko jak to zrobić?
[url=https://www.google.com/search?q=exc... [url=https://www.youtube.com/results?sea...
[syntax=vbscript]Sub Makro() For x = 1 To 31 If Cells(2, x) < Date Then Blokuj If Cells(2, x) = Date And Time() >= "13:59" Then Blokuj Next End Sub[/syntax]
Używam excel'a w pracy i chciałbym mieć możliwość ukrywania pewnego obszaru danych (wścibscy współpracownicy) poprzez zamianę jego koloru na czarny uzyskiwanym przez naciśnięcie przycisku z makrem. Problem w tym że "gdy się uspokoi" chciałbym tym samym przyciskiem powrócić do stanu poprzedniego - widzialnego. A przy okazji - szukam rozwiązania na ukrycie...
Witam. Od dłuższego czasu szukam i nie znalazłem nic co w pełni spełniałoby moje oczekiwania. Poszukuję opcji (pewnie makra) które działałoby i blokowało możliwość wklejania wyciętej komórki/komórek. O ile to możliwe najlepiej było by aby w chwili wyboru opcji "wytnij" zadziałała opcja "kopiuj" i wartości z kolumn zostały by skopiowane i wstawione "jako...
Nie dokładnie o to mi chodziło kod blokuje mi tylko wiersz tej jeden w którym jest coś aktualnie wpisanie (zaznaczenie). Chciałbym aby blokował wszystkie wiersze powyżej, które w jednej z kolumn w danym wierszu mają wartość (dla mnie zapis "m" lub "p" lub "c") takie blokowanie warunkowe. Np. warunkową kolumną jest kolumna E. Jeżeli w danym wersie jest...
Cześć, Taaaka sprawa: mam zrobioną listę 10 pozycji, z czego użytkownik ma zaznaczyć tylko 4 z nich, nie więcej. Jeżeli chciałby zaznaczyć 5, wyskoczy mu alert. Jak to ująć makrem? Jest jakiś "block" czy coś w tym rodzaju którego mogę użyć? Z góry dzięki za info,
Witam, chciałbym stworzyć makro, które pozwoli mi na blokowanie możliwości wklejania i kopiowania danych z komórek przez użytkownika - z zastrzeżeniem, że blokada ma mieć miejsce tylko w jednym arkuszu w danym pliku, a nie w obrębie całego pliku; mam tu na myśli taką 'fizyczną' blokadę jak w niniejszym temacie na forum elektroda. http://www.elektroda.pl/rtvforum/topic22...
Tak, te komórki do których klient wpisuje dane są niezaptaszkowane i nie blokuję ich. Problem mam tylko właśnie z tym, że w pliku udostępnionym w makrach nie może być danych poufnych czyli hasła. Spróbuję twoich rad.
czy jest szansa do zrobić w prosty sposób ? Moim zdaniem zbliżony efekt możesz uzyskać poprzez ujęcie całego zakresu np. I3:K30 niestandardowym trybem sprawdzania poprawności danych poprzez formułę =JEŻELI($H3="Oczekuje na serwisanta";"") :idea: :D Uzyskasz wtedy (dla opcji "odrzucania danych" :!: ) w przypadku próby wpisywania czegokolwiek w ustawionym...
Cześć, Potrzebowałbym jakieś rozwiązanie do pliku Excel, a mianowicie czy jest możliwość utworzenia takiego makra lub może jest jakaś opcja, gdzie będąc w pliku wpisuje dane, po zapisaniu i wyjściu z pliku, komórki z danymi blokują się, a po ponownym wejściu mogę kontynuować wpisywanie w wolnych komórkach, a te z danymi będą zablokowane do zmiany. Poniżej...
Prawda, załącznik by wszystko wyjaśnił. Ja to zrozumiałem tak: Parametr X powinien być zawsze taki jak został podany, nie zmieniać się podczas przeciągania na inne komórki, tak jakby był tam $. Ale tego chyba nie robi się w samej funkcji, to nie makro zmienia parametry, ale mechanizmy Excela. Chyba, że ten parametr jest stały i można go pominąć w definicji...
Trochę to nie jest jasne. Chcesz pokazać wszystkie wiersze, gdzie w kolumnie 6 jest data dzisiejsza albo z komórki? Jeżeli tak to poczytaj o Range.AutoFilter i dowiesz się jak to dokładnie zrobić. Proponuję utworzyć zmienną typu String (albo Date, zależy jaki masz format) pobrać tam kryterium filtrowania i potem użyc już gotowego. Niby to samo, ale...
Wariant z blokowaniem zakresu komórek przy otwieraniu i zamykaniu zeszytu. 1. Na wszelki wypadek w procedurze 'Private Sub WorkSheet_Change(ByVal Target As Range)', w danym arkuszu, zmienić deklarację zmiennej z 'Dim i As Integer ' na 'Dim i As Long ' 2. W module 'ThisWorkbook' wkleić kod: 885619
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...
Witam! Chiciałbym zapisać w VBA kolejność przemieszczania kursora. Czyli np, mam komorkę A2 po naćiścnieciu ENTER przesuwa się do A6 z A6 do C8 czyli zgodnie z wymaganą kolejnością. Blokowanie nie zdaje egzaminu ponieważ mam nagrane makro oraz funkcje jeżeli , przesuniecie pinowe vba itp. te komórki w których jest "co kolwiek aktywne" po zablokowaniu...
Pomijając to że autor pisze że jest zielony i ciekawe czy sobie poradzi :) z kodem ja zasugerował bym (jak i tak muszą być makra) dać przyciski (nie poprzez Worksheet_SelectionChange). Innymi słowy zablokować wszystkie komórki Przycisk "start" (odblokowujący pierwszy wiersz) ..... Przycisk "następna próba" (blokujący poprzedni wiersz a odblokowywujący...
Kurcze dziwne... Dokładnie ten fragment kodu odpowiedzialny jest za blokowanie wszystkich komórek (poza tymi edytowalnymi) przy każdej zmianie edytowalnej wartości. Muszę nad tym posiedzieć. Ale to dziwne=/ Po usunięciu tego fragmentu nadal są jakieś problemy? On występuje w 2 czy 3 miejscach (nie kojarzę teraz). Generalnie poza makrami (to tylko taki...
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, od kilku dni mam problem ze stworzeniem listy rozwijanej, chodzi konkretnie o możliwość widoku na elementy w wybieraniu w liście, tzn. lista odwołuje się do kolejnych liter alfabetu pewnej czcionki, po rozwinięciu listy mają się wyświetlać litery alfabetu tej specjalnej czcionki (nie domoślnej), np. zamiast litery "e" w polu wyboru wyświetla...
Co do tego ze można dla każdego utworzyć kartę to powiedzmy że wiedziałem. Trochę obycia w tym programie mam, ale jak miał bym policzyć każdą osobę z osobna skoro po wybraniu z listy wszystko się zmienia na tego co wybiorę. Sprawdzałem na arkuszu 2 tak było dlatego tam jest tak wiele list wyboru ,bo chciałem właśnie zablokować listy wyboru na każdej...
bo nikt nie siedzi w mojej głowie Dobrze to ująłeś.:) Może spróbuj w krokach opisać kolejne zdarzenia i ich skutki, to zamieni się to na VBA. Arkusz usuwanie: Wpisujemy kod do komórki 1A Skrypt sprawdza czy jest ten kod w arkuszu wstawianie A:A jeśli jest usuwa go z arkusza wstawianie (najlepiej cała komórkę nie tylko wpis) odblokowywuje edycję w zakładka...
Witam Swojego czasu udało mi się napisać taki mały program w Excel-u mianowicie drukuje się kod kreskowy okleja materiał i skanuje do bazy ta z kolei sprawdza czy taki kod już nie jest w bazie po czym blokuje dany kod i podlicza stany oraz metry kwadratowe. Z czym sobie nie potrafię dać radę : 1 Potrzebuję by program zapisywał tak jak teraz za każdym...
Dzień dobry, Tak to jest jak się nie pisze dokładnie o co chodzi. Trzeba było napisać od razu, że chodzi o kopiowanie, a nie wpisywanie lub że o jedno lub drugie. Proszę wypróbować takie makro, reagujące na wprowadzanie danych w dowolny sposób (zdarzenie Change). Ma działać w kolumnach H, J i K (osobno). Można wprowadzać jedną komórkę na raz. Tym razem...
Dzień dobry, Funkcja TRANSPONUJ działa bezbłędnie, ale ma też swoje wady. Tablica jest duża i wyniki trzeba gdzieś umieścić. Potem będzie je Pan chciał dalej przetwarzać. Po użyciu TRANSPONUJ traci Pan kontrolę nad źródłem danych, bo w każdej komórce widzi Pan tylko TRANSPONUJ i adres, poza tym nie można zmieniać pojedynczych komórek. Pewnie wygodniej...
Zakładając, że formuła jest w B1 i odnosi się do A1: [syntax=text]=JEŻELI(A1="Naprawiony";JEŻ... to działało w ustawieniach arkusza musi być włączona zgoda na obliczenia iteracyjne. W momencie wpisywania tej formuły do B1 w komórce A1 nie powinno być wpisane "Naprawiony", dopiero później. W tym wariancie data skasuje...
Dziękuję za pomoc. Uświadomiłem sobie, że nie wiem jak to się robi bo nigdy tego nie robiłem. Kupiłem kursik VBA za ok 60zł (nie będę reklamował skąd) i po obejrzeniu zaledwie wstępu już wiedziałem co źle robiłem. (na pewno cały obejrzę:-)) adamas_nt dzięki za zainteresowanie - nagrałem kod jednak nie zadowalał mnie on. tzn. po odpaleniu makra prosił...
Do wywołania reakcji na wprowadzane do arkusza dane (odpowiedzi na pytania) wykorzystaj procedurę zdarzeniową arkusza: Target - Komórka podlegająca zmianie. W konstrukcji z ".Cells(1,1)" odnosi się do komórek scalonych Intersect - Sprawdza czy "Target" i komórka mająca wywoływać określoną reakcję, to jedna i ta sama komórk, czy też nie Jeśli ta sama...
Witam ponownie :) Międzyczasie, wpadłem na inne rozwiązanie. Porzuciłem listę rozwijaną i napisałem takiego oto makro: Sub Raportowanie_kompletacji() Dim Zlecenie As String, i, j As Long, Status As String, Komponent As String j = 0 'odblokowanie arkusza ActiveSheet.Unprotect Zlecenie = "" Do Zlecenie = InputBox("Podaj numer...
O ile dobrze zrozumiałem to może to wyglądać jakoś tak, jak w załączniku. Do arkusza jest dodane makro (więc trzeba zezwolić na uruchamianie makr). zdefiniowana jest funkcja SP, która przyjmuje dwa parametry: cały zakres do sprawdzania oraz sprawdzany wiersz. Będzie to widać w załączonym przykładzie. W przykładzie tablica prawidłowych cen jest od A2...
Witam! Mam dwa makra, pierwsze sprawdzające czy któryś z plików nie jest otwarty przez innego użytkownika: [syntax=vbscript] Public Function CanOpenAllReports() Dim canOpen As Boolean Dim fileName As Workbook Dim path As String Dim tempString As String Application.DisplayAlerts = False canOpen = True path = "D:\EXCEL\Wpisywanie\wprowadzanie danych\ilości.xlsm"...
Po wpisaniu w tą pętlę kodu - faktycznie chroni arkusz - ale tylko podczas otworzenia arkusza DANE, i próbę wpisu w niepowołane rubryki. Natomiast w czasie działania programu i wpisywania kwoty - da się wpisać w każdą kolumnę... To jest niemożliwe żeby nie chroniło. Chyba że nie w tym miejscu wpisałeś procedury. To ma być w procedurze przycisku Ok...
Z frajdą dołączę się do dyskusji (na dole podam powód), ale musimy mocno rozdzielić targety, które się rozmazują: a) Na ARM-y w zasadzie rdzeń każdego języka da się przenieść b) na 8bit tylko wybrane (tzn nie interesują mnie, choć jestem stary javoviec, np java która co z tego że da się pokazać z hello wordl, ale nic ponadto). I boli głównie rozmiar...
Witam, przeszukałem już cały portal i nie znalazłem odpowiedzi. mam kod obsługi 3 x DS18X20 z numerami układów zapisanymi w EEPROM i jeżeli chcę odczytać właściwy ROM to muszę użyć sekwencji jak w kodzie w sekcji 1 (bez skoku do podprogramu) 'program odczytujący obecność układów 1WIRE i sprawdzający ROMy z EEPROM $regfile = "attiny2313.dat"...
Cześć, Posiadam plik w którym nadpisuje się z makra w wierszu F1 i G1 godzina wraz z datą po uzupełnieniu wiersza A1. Jak zablokować wiersz F1 i G1 aby użytkownik nie mógł zmienić tej daty/godziny? Haczykiem jest dodana funkcjonalność zwijania grupy, czyli opcja chroń zakres odpada bo użytkownik nie może zwinąć grupy po zakończeniu zadania. https://obrazki.elektroda.pl/7324614200_...
http://obrazki.elektroda.pl/3025550100_1... Mając do dyspozycji jedną matrycę 8x8 czerwonych diod LED o boku 60,2mm oraz mikrokontroler ATtiny861 pozostałe po innych projektach postanowiłem zbudować to, co każdy elektronik chociaż raz w życiu zbudować musi: zegar ;). Ze względu na charakter wyświetlacza miał to być zegar binarny, ale...
Witam Wszystkich, Zwracam sie z prośbą o pomoc w rozwązaniu małego problemu związanego z wprowadzaniem danych przez operatora na linii produkcyjnej. Operator zobowiązany jest do wprowadzenia czasu rozpoczęcia (B2) oraz czasu zakończenia (C2) na swoim stanowisku pracy. (+ dodatkowo ilości ktore wyprodukował, braki jaki powstały itd itp.) Dzięki Waszej...
blokować komórka makro komórka excel blokować komórka
radio taraban heterodyna regulacja prądu spawania bocznikiem budowa krajzegi
czujnik halla tempomat honda civic
Napięcie wtryskiwacza w silniku Boxer 2.2 - Subaru i Peugeot Defro piec na pelet – wyrzuca korki przy starcie, zapalarka, zwarcie, diagnostyka
