Ja w "międzyczasie" napisałem coś takiego: [syntax=vbscript]Sub GoalSeekinRange() Dim i As Long, RngForm As Range, wks As Worksheet Dim RngGoal As Range, Rngx As Range Set wks = Worksheets("Brudnopis") Set RngGoal = wks.Range("L5:L9") Set Rngx = wks.Range("J5:J9") Set RngForm = wks.Range("K5:K9") For i = 1 To RngGoal.Count If IsNumeric(RngGoal(i)) And...
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.
Zastanów się, czy makro toggle jest operacją atomową. W tym kodzie można tą operację rozbić na 3 etapy: pobranie IO_PORT, zanegowanie bitu oraz zapisanie IO_PORT. Jeśli przerwanie wystąpi pomiędzy pobraniem a zapisaniem IO_PORT, przerwanie spowoduje zmianę stanu pinu, ale zaraz po powrocie nastąpi wpisanie nowej wartości z IO_PORT, z którą wiąże się...
Dzień dobry, Jeśli rozwiązanie ma być w Excelu to należy użyć funkcji JEŻELI np. =JEŻELI(A1>151;150;A1). Formułę można potem skopiować, aby objąć wynikami cały zakres. Można też najpierw zaznaczyć zakres, wprowadzić formułę i nacisnąć Ctrl+Enter, nie trzeba już będzie kopiować. Wyniki można zamienić na stałe, jesli to konieczne. Skopiować Ctrl+C, potem...
Po pół godzinie wczytywania się załapałem (chyba) o co chodzi. Po pierwsze czy aby na pewno nie będzie interesowało cię za co klient zapłacił? Bo czyszczenie danych i przygotowywanie do kolejnego "wpisu" zlikwiduje szczegóły (składowe) danej wpłaty. Druga rzecz związana z brakiem sumowania. Może jest błędna formuła (nie uwzględnia wszystkich komórek)...
OK, rzeczywiście jest jak mówisz. Wracając do makra z tego ostatniego pliku: zmień linijkę rekalkulacji w Excelu. Zmiana koloru takowej nie powoduje, więc dopóki coś nie zmieni wartości, funkcja pokaże starą wartość. PS 3. Nie wiem czemu piszesz, że nie możesz funkcji użyć w kodzie VBA: taki sposób wywołania działa: [syntax=vb]MsgBox SumByColorsFuction(Range("AA4:AA13"),...
Jeśli w zakresie są formuły, to zmienia postać rzeczy. Spróbuj wykorzystać inne zdarzenie. [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim kom As Range For Each kom In Range("C13:G13") If kom.Value < 0 Then MsgBox "Błąd w " & kom.Address(False, False) Next End Sub[/syntax]Warto może ograniczyć Target.Range, bo zmiana...
Wpisywanie $CRYSTAL bez rzeczywistej zmiany taktowania procesora będzie powodować, że wszelkie opóźnienia i obliczenia kompilatora dotyczące liczników nie będą zgodne ze stanem faktycznym. GETRC5() korzysta aktywnie z licznika TIMER0. Tak manewruje wartością wpisaną do rejestru licznika oraz preskalerem by otrzymać jednakowe odcinki czasu zliczane później...
... gdyż naciskasz F9 idziesz zrobić kawę, wracasz i gotowe :D ... A mogę zapytać po co naciskasz F9? Masz wyłączone automatyczne odświeżanie? Odwołania cykliczne w formułach? Owszem F9 wymusza przeliczanie ale całego arkusza/skoroszytu a akurat "moje" rozwiązanie tego nie potrzebuje (pod warunkiem że masz włączony standardowo automat w opcjach) W...
Rzeczywiście, do końca to "w = w+2" nie działa, Sprawdza się gdy pierwszy wiersz to liczba nieparzysta a następny parzysta, Jak odwrotnie to już nie. Ale gdyby wstawić na górze arkusza jeden wiersz to pary parzysta, nieparzysta zamienią się i makro zadziała a potem 1 wiersz usunąć Wiem, że jest to nieeleganckie rozwiązanie, ale na ten moment nie widzę...
https://obrazki.elektroda.pl/7268233500_... Ten artykuł powstał w odpowiedzi na propozycję kolegi (at)Techekspert i jest rozwinięciem mojej prezentacji przedstawionej na konferencji The H(at)ck Summit w dniu 20 października 2023 r. Samą prezentację możesz pobrać stąd: Wyrzucamy algorytm Gutmanna do kosza Podstawowe informacje o niszczeniu...
http://obrazki.elektroda.pl/9209500600_1... O tym, że większość padów do PEGASUSa często ulega uszkodzeniu, nie trzeba nikogo informować. I nie chodzi tu o uszkodzenia kabla czy też wtyczki, ale układu scalonego będącego w padzie. Zwykle uszkodzenie objawia się: * całkowitym brakiem reakcji na wciśnięcia klawiszy, * niedziałaniem niektórych...
Bardzo dziękuję za zainteresowanie moim tematem. Dołączam pliki, które pomogą zrozumieć o co mi chodzi. Odpowiadając na postawione przez Ciebie pytania doprecyzuję o co chodzi: Pisząc o tym, że nie ma być pustych wierszy, chodziło mi o to, że każdy wiersz w zakresie zawiera formułę wczytującą dane z plików (górny zakres z "plik" i dolny zakres z "plik1")....
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ć?
Temat do zamknięcia, Maciej rozwiązał moją zagadkę :) Bardzo dziękuję!! Makro działa świetnie, na pewno zaoszczędzi mi wiele monotonnej pracy.
Witam. Utworzyłem makro do zmiany koloru karty w zależności od wartości komórki. Jeżeli w komórce F6 wartość będzie większa od 0 to karta zmieni kolor na czerwony. Makro działa, ale muszę je wywoływać każdorazowo uruchamiając to makro. Na razie poradziłem sobie tworząc we wszystkich kartach przycisk uruchamiający to makro, ale jest to trochę bez sensu....
Witam ponownie. Mam jeszcze jeden (w najbliższym czasie) problem do rozwiązania. Niestety formuły tutaj nie udało mi się skonstruować (ale jeśli można to chętnie wykorzystam :) ), dlatego kieruję prośbę o pomoc do programistów VBA. Żeby zrozumieć o co mi chodzi, trzeba zapoznać się z arkuszem, który załączyłem do tego postu. Natomiast opis wklejam też...
W Twoim opisie coś nie gra :cry: Jeżeli w kolumnie G ilość w pierwszym wierszu jest np. liczba 9... Ma skopiować dane z wiersza powyżej . To znaczy, z którego wiersza ma kopiować jeśli zmiany wprowadzasz w "w pierwszym wierszu" :?: :D Wierszy mam około 2 000 tyś 2 mln wierszy to musisz pomieścić w dwóch tabelach wykorzystując całą wysokość arkusza (jeden...
Dzień dobry. Zwracam się z prośbą o pomoc przy kolejnym projekcie :) . Próbowałem coś porobić samemu, ale skutek mizerny z tego wyszedł. Nie bardzo umiem w VBA a niestety nie wszystko można załatwić formułami. W czym problem? Mam arkusz zawierający 6 komórek z listami. Nie każda zawiera pozycję "RAL" (numer koloru lakieru). W załączonym arkuszu dwie...
W pliku na stronie mam Tabelę i CommandButton1 którym wywołuję makro zamieszczone poniżej. Nie wiem czy do końca jest ono prawidłowo złożone, ale działa. [syntax=vbnet] Private Sub Worksheet_Activate() If Range("H6") = "drukuj" Then Range("H7").Value = "Tak" If Range("H6") = "nie drukuj" Then Range("H7").Value = "Nie" If Range("I6") = "drukuj" Then...
aby po zmianie wartości w komórce B11 recznie? With Range("B39") Gdzie End With ?
Witam. Nie potrafię sobie poradzić z zamianą wartości w komórce, jeżeli ta wartość jest wynikiem formuły. Nie pomaga nawet przekopiowanie tejże wartości do innej komórki i wklejenie samej wartości. Dokonując zmany popzez ctr+f "zamień" nic się nie dzieje poza pogrubieniem trzcionki. Dodam, że próbuję wspomnianą wartość zamienić na pustą komórkę. ( Nie...
Cześć. Bardzo proszę o pomoc. Mam plik excel w którym jest 150 arkuszy o nazwach liczbowych odpowiednio 1, 2, 3... 150. W każdym jednym arkuszu chciałbym aby było makro które kopiuje konkretne dane do nowego pliku (zawsze te same od S6:V6). Plik excel z makrami jest "matrycą" która co miesiąc powstaje nowa (służy do rozliczania zleceń) i zmienia się...
Drodzy użytkownicy, Mam taki problem, że nie potrafię napisać kodu za pomocą którego będę mógł zmieniać wartość skali osi X na wykresie. Chciałbym za pomocą przycisku żeby makro dodawało 0,002 do skali oraz tyle samo odejmowało Mianowicie wykres wygląda tak: https://obrazki.elektroda.pl/3439578800_... https://obrazki.elektroda.pl/8731476400_...
W zasadzie ładnie algorytm już opisałeś, pozostaje tylko poszukać odpowiednich funkcji. Wg mnie, jeżeli nazwy w kolumnie A nie będą się powtarzały, to o wiele prostsza w użyciu będzie funkcja .match , np. [syntax=vb] Szukana_nazwa = Worksheets("Arkusz1").Cells(ActiveCell.R... 1).Value 'Wiersz aktywnej komórki, kolumna A czyli 1 Nr_wiersza = Application.WorksheetFunction.Match(Szuk...
Andie, bardzo dziękuję za Twoją odpowiedź. Sprawa niestety wygląda tak, że wartości komórek J4, J5 to również wynik formuł w nich zawartych, a te odnoszą się do kolejnych komórek z formułami... dość to rozbudowane, dlatego załączam prosty plik (w załączeniu; rozszerzenie zmieniłem z .xlsb na .txt ponieważ nie mogłem załączyć pliku z rozszerzeniem .xlsb),...
Spróbuje wyjasnic jeszcze raz o co mi chodzi. Dodaje dwa pliki z excela(jeden z makrem drugi bez). Mam dużo większą ilość danych niż w przykladowych plikach i większy rozrzut wartości zakończonych gwiazdką(*). Potrzebuje pozbyć się gwiazdek do czego stworzyłem proste makro. Po jego wykonaniu gwiazdki znikają, lecz formatowanie tych komórek pozostaje...
Mam problem z napisaniem makra które działało by przy następującym zdarzeniu: Zmiana wartości w komórce a1 -(lista rozwijana) powodowała by odpowiedni wpis do komórki b12. (ten sam arkusz) np. komórka a1 - wybór z listy - "spec" w komórce b12 - pojawia się zapis - "4210" oraz w komórce b13 - pojawia się zapis - "4260" i tak dla kilkunastu pozycji z...
PS. do drugiego kanału wystarczy zdublować zmienne mn. czas aktualny itp. oczywiście z dopiskiem na przykład ''czas aktualny 2 '' ? W najprostszym rozwiązaniu tak, na upartego można by korzystać z wspólnych przy założeniu że nie będziemy używać wielu przycisków jednocześnie, wtedy zaoszczędzimy te kilka bajtów w pamięci (cóż za herezja w 2021 roku...
Procedurę vlookup która będzie szukać danej wartości w kolumnie A i kopiować cały zakres wiersza do oddzielnego pliku raport . Problem w tym że formuła vlookup szuka tylko pierwszej wartości więc chcę to ominąć przez dodanie do każdego pliku formuły która będzie zmieniać wartość kolumny A poszczególnie do zmiany . [syntax=vbscript]Private Sub CommandButton1_Click()...
Witam, mam wielką prośbę o pomoc. Potrzebuję stworzyć makro, które będzie podmieniało wartości komórek w kolumnie w zależności jaka wartość tekstowa zostanie znaleziona. Przykład: Mam komórki które zawierają: Dobre_Kino Kina Super_kino_ Samochodu Jadę Samochodem KOTEK Dla_kota Makro powinno wyszukiwać ciągi tekstowe: "kin", "samoch", "kot" i tak gdzie...
Program masz "prawie" gotowy. Pomyśl, potrzebujesz odwołać się do Nr wiersza komórki spełniającej kryteria (tutaj zmienna "abc", zadeklarowana jako 'Range'). Będzie to wartość właściwości 'Row'. Następnie należy znaleźć lub określić Nr ostatniej w wierszu. Zadziałaj podobnie (metoda End), jak masz to z licznikiem pętli. Pozostaje przeliczenie (wymnożenie)...
Bardzo bardzo dziękuję! Praktycznie o to mi chodziło. Natomiast jeszcze 2 pytania: 1) Czy duża byłaby zmiana w kodzie gdyby dla braku nazwy czy braku numeru w arkuszu config, makro nie wyświetlałoby komunikatu tylko pozostawiało stare wartości w kolumnie z nazwą? (Arkusz1) Po prostu żeby wtedy przechodziło dalej do kolejnej linijki nic nie robiąc.....
trudność jest, że w formatowanie warunkowe jest używany ColorIndex, ale do wykresy mają tendencję do RGB(), tj. kolory nie będą zgodne... Dodano po 1 te wartości procentowe zmieniają się przez formuly? Dodano po 10 ciągną się z innego arkusza potem odpalic makro np dla Wykres 1 [syntax=vb]Sub Kol_w1() Sheets("Raport").ChartObjects("Wykres 1").Chart.SeriesCollection(1).Points(1)....
Panie Macieju, serdeczne podziękowania, zrobiłem wstępną próbę i wygląda na to, że makro spełnia dokładnie moje oczekiwania :)) Jutro wprowadzę pełne dane do Arkusza2 i zobaczę jak się wtedy zachowa skrypt. Parę linijek tekstu co mieisąc zaoszczędzi mi ze 2 godziny roboty. Gdyby Pan miał chwilę i podesłał jeszcze jedną zmodyfikowaną wersję, w której...
Witam. Mam ok 60 plików CSV (pliki tekstowe oddzielone przecinkami) znajdują się w jednym folderze. Pliki mają różne nazwy (przykładowo: 21172001 6.28.18 13.07.05) każdy plik ma tyle samo kolum (po przecinku) wiersz pierwszy: a,b,c,d,e,f,g,h,i, wiersz drugi: 1,1,1,0,0.00,0.00,N-m,0,0 wiersz trzeci: 1,1,1,0,0.00,0.00,N-m,0,0 Potrzebuję makro które: 1....
Oczywiście możesz czasy po prostu podzielić przez 16 A nie pomnożyć? Tzn. wiadomo, że czasy trzeba zapewnić takie same, a więc pomnożyć ewentualne stałe na bazie których odmierza się opóźnienie. Albo na przykład pomnożyć wartości dla sprzętowych liczników, jeśli na bazie ich odmierzasz sobie czas. Jeśli korzystasz z delay.h z avr-libc, to tak jak pisze...
Panowie. Mam takie problem. Kiedy mamy stworzoną tabele w Excelu przy każdorazowym dodaniu nowej wartości wiersza tabela nam się powiększa mam na myśli głownie formatowania. Na czym polega problem? 1.Więc kiedy usuwamy wartości z wiersza formatowanie zostaje.W jaki sposób stworzyć taką tabele aby np dane o wielkości tabeli były pobierane np z pierwszej...
Dzień dobry, Na wstępie powiem że ze wszystkich sił starałam się nie fatygować nikogo by mi pomógł znaleźć rozwiązanie problemu, próbując sama zrozumieć dlaczego tak się dzieje. Jednak moja nieznajomość VBA wzięła górę i do co utknęłam w martwym punkcie (choć może nie do końca bo makro w sumie robi co chce). Makro które udało mi się stworzyć, przerabiając...
https://obrazki.elektroda.pl/4671082400_... Interfejs graficzny Home Assistant opiera się o potężny język szablonów Jinja2. Jinja2 używany jest do przetwarzania danych z czujników, tworzenia warunków w automatyzacjach czy dynamicznego formatowania komunikatów. W celu ułatwienia pracy z Jinja2 Home Assistant oferuje wygodne narzędzie...
Tak jak napisałem wcześniej przy konstrukcji nie brałeś pod uwagę GN , robisz zdjęcia na F 18 (tak sobie wymyśliłeś ) zatem parametry lampy po uwzględnieniu dyfuzora powinny być dobrane . Jako matecznik wybrałeś lampę która ma jakieś 12 GN , lampa nie ma sterowania siła błysku . Jak dostosujesz parametry ekspozycji dla lampy w której nie można zmienić...
Dzięki wielkie za naprowadzenie lanzul ;) Function Totalcost(zakres As Variant, rate As Variant) As Double Dim i, j As Integer For i = 1 To zakres.Rows.Count j = 1 Totalcost = Totalcost + ((zakres.Cells(i, j) + zakres.Cells(i, j + zakres.Columns.Count - 1)) * 1.5) * rate.Cells(i, 1) For j = 1 To zakres.Columns.Count...
Witam. Ponieważ na innym forum nie uzyskałem jak dotąd pomocy to może tutaj znajdzie się pomocna ręka. Mam problem , którego ja sam nie mogę rozwiązać od jakiegoś czasu , a który nie pozwala mi spać (autentycznie - to nie przenośnia). W załączniku mam tabelkę. Arkusze "target" oraz "wykonanie" to łącza do skoroszytów , które będą ulegały zmianie. Zmiana...
OK UDALO SIE !!!! Dodano po 1 marcinj12 miał na myśli ponowne włączenie automatycznego przeliczania arkusza, bo: Application.Calculation = xlCalculationManual włącza przeliczanie ręczne (defaultowo - klawisz F9), żeby przyspieszyć podmienianie wartości w komórkach. Tak więc po wykonaniu całej pętli powinieneś na nowo włączyć przeliczanie automatyczne,...
poszczególnych konfiguracji w tabeli arkusza Excel z poziomu SolidWorks Nie wiem jak to wygląda w Solid Works, ale zakładam, że tam jest VBA i z jego poziomu łączysz się z Excelem przez referencje. Jeśli tak to chyba należało by pisać tak (Nie w Excelu!): [syntax=vb]Sub RunMakro() Call OpenExcel40(Empty) End Sub Private Sub OpenExcel40(DimCol) Dim...
A czy można i jak zapisać aby działało w całej kolumnie? W kolumnie, wierszu, zakresie, poza zakresem. Jak sobie życzysz. Po wpisaniu 'Target' i postawieniu kropki w edytowanym kodzie, otworzy się lista rozwijalna z własnościami i metodami. M.in. Address, Column, Range, Row, itp. W niemal każdym przypadku będzie nieco inna składnia zapisu. Można o...
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....
Witam, Zmontowałem kiedyś sygnalizator jak w temacie. Działa dobrze, sygnalizuje przekroczenie górnej temperatury nastawionej, sygnalizuje spadek temperatury poniżej 0 stopni. Przydała by mi się jeszcze funkcja sygnalizacji przekroczenia dolnej nastawionej temperatury. Może ktoś podpowie co zmienić w kodzie ? KOD: [syntax=c]/*****************************...
Wierszy by było około 5tys. i są to podobne wartości (raport kasowy) Jeżeli wszystkich 5 tys wierszy to nie ma sprawy. Excel ma w jednym arkuszu 65.635 wierszy w każdej kolumnie. Jeżeli w każdym arkuszu masz po 5 tys to razem 600.000 wierszy więc jeżeli już to trzeba to będzie rozdzielić na parę kolumn. Kolumn jest w 2007 do IV czyli 256. A tak już...
Witam, Myślę nad zrobieniem czegoś w stylu wyszukaj.pionowo + zamień, dla tekstu zawartego w jednej komorce. Chodzi o to że z innego skoroszytu chce wyciągać wartości odpowiadające tekstowi zawartemu w powiedzmy komórce C1. Nie byłoby w tym nic trudnego gdyby w tej komorce znadowal sie tekst tylko dla jednego rekordu a wynik wyszukaj pionowo mialby...
Jeszcze raz dzięki, co do nagłówka już sobie poradziłam (poniżej kod - dla zainteresowanych). Private Sub Dzielenie_Click() Dim wbBook As Workbook Dim wsSheet As Worksheet Dim rnStart As Range Dim rnData As Range Dim i As Long Application.ScreenUpdating = False On Error GoTo myErr Set wbBook = ThisWorkbook Set wsSheet = wbBook.Worksheets("Prowizja&quo...
Żeby pisać na mikrokontrolery w C++ trzeba znać ten język bardzo dobrze. Niestety mikrokontroler to nie PC i nie "wybacza" nieprzemyślanych konstrukcji, które kończą się alokacją ogromnych ilości pamięci. Tak konkretniej to chodzi mi o nieprzemyślane używanie klas. C na mikrokontrolery jest znacznie łatwiejszy. A mógłby ktoś napisać w C++ i w C program...
w przykładzie zeszyt3 [syntax=vb]Sub Wstawianie_wierszy() Dim i As Long, OstWrs As Long OstWrs = Cells(Rows.Count, 1).End(xlUp).Row 'ile wierszy Application.ScreenUpdating = False For i = OstWrs To 2 Step -1 If Cells(i, 1) <> Cells(i - 1, 1) Then Rows(i).Insert Next i Application.ScreenUpdating = True End Sub[/syntax] A tu kod z nazwą - ale nie...
hmmm coś niechce działać po wprowadzeniu zmian Hmmm, coś myślę, że zmiany źle wprowadzone. :D Kod kolegi adamas_nt działa. Wrzuć plik po zmianach.
dodanie takiego makra jak poniżej, nie wyświetla mi napisu "hello" Popełniasz błędy: - wprowadzając "prywatne makro arkuszowe" do modułu uniwersalnego :cry: , jeśli to samo makro wkleisz do modułu arkusza "zamówienia" i dokonasz zmiany treści komórki - zamiast ujętej tam formuły wprowadzisz tam 1 - to uzyskasz Twój pożądany efekt - "hello" :D ; - nie...
Sukcesywnie w miarę wpisywania danych w tym samym wierszu w zakresie kolumn 5 do 8 "a" co to jest to "a" w "If Target <> a" ? Tutaj też trzeba by chyba coś zmienić, bo wychodzi na to, że dwa razy jest sprawdzane, czy jakaś ".Value = "" ", czy też czemuś się równa jednak. W załączonym do tematu kodzie "a" zawsze jest 'puste', gdyż nigdzie nie...
Tak się składa, że niedawno robiłem dla naszych finansów coś podobnego. Program, po uproszczeniu, w załączniku, może jakoś Cię natchnie. ;) Zamiast kopiować do innej zakładki - grupuje pasujące linie. Dla 5000 linii jak w przykładzie działa u mnie, po drobnej modyfikacji, ok. ~4s (przy ~260s dla poprzedniego makra). Być może zmiana Range() na Cells()...
Wartości ujemne: Najlepiej skorygować przy imporcie, wystarczy kilka poprawek w istniejącym makro[syntax=vb]Sub kopiuj_z_pliku() Dim kom As Range Windows("plik importu.xlsm").Activate 'wskazane wybranie właściwego arkusza Range("A2:K1000").Select Selection.Copy Windows("rozliczanie palet.xlsm").Activate Sheets("Import").Activate 'dodałem Range("A3").Select...
Dziekuje serdecznie za znalezienie źródła problemu. Teraz pozostaje pytanie jak temu zaradzić? Czy jest jakiś sposób, aby zapętlenia uniknąć i żeby wszystko działało tak jak należy?? Jak mogę zmienić procedurę żeby nie powodować zawieszania? Czy potrzeba może stworzyć osobne makra, działające niezależnie od siebie? Może stwórz makro wpisujące wartości...
Wyłącz Eventy na czas działania makra (Application.enableEvents=True/False)
Witam!!! Mam taki problem mam 6 checkbox-ów pogrupowanych w 3 kolumny , nad każdym z nich jest YES lub NO i po zaznaczeniu tych checkboxow w Yes chciałbym dostać wartość YES a jeśli zaznaczę choć by jeden z NO to żeby ta wartość zmieniała się na NO w jednej komórce..za wszelkie podpowiedzi z góry dziękuje
Jak zrobić to automatycznie, jakimś makrem? Proponuję na początek nauczyć się "szanować dane źródłowe" swojej bazy :-) Zmiany wprowadzone makrem do bazy mogą być nieodwracalne !!! Zatem podobne zmiany w tabeli bezpieczniej jest dokonać poprzez utworzenie kwerendy np. tak jak na zrzucie 1177947
Jest to zrobione makrem zdarzeniowym Worksheet_Change, reagującym na zmianę wartości w komórkach B9:D9. Makro jest w module arkusza, w którym jest formularz. Treść makra: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target(1).Address = Range("f_rodz_nieruchomosci").Address Then Rows("33:76").Hidden = True With Worksheets("Legenda")...
Witam forumowiczow, Siedze nad dosc prostym makrem, ktore przeszuka kolumne G; jesli znajdzie tam wartosc "oplaty licencyjne" to w kolumnie R wstawi wartosc "koszty". Kod, ktory napisalam - oczywiscie - nie dziala. [syntax=vb] Sub FindAndReplace() Dim rCell As Range Dim xCell As Variant Set rCell = Sheets("YTD2012").Range("g2", Range("G65536").End(xlUp))...
żeby to magiczne makro działało z moimi danymi, byłoby super Na podstawie Twojego pliku utworzyłem jeszcze drugi podobny plik csv i przetestowałem z nimi import za pomocą załączonego pliku z makrami :D Po uruchomieniu makra zmiana_numerów (skrót ctrl+i ) - wszystkie numery kart uzyskują przedrostek CN - uzyskując w ten sposób cechy wartości tekstowej....
Zainteresuj się instrukcjami obsługi plików. Np Instrukcja używana do zmiany nazwy pliku dyskowego lub folderu (katalogu). Składnia rozkazu Name: Name StaraNazwa As NowaNazwa Sprawdzaj w pętli cztery (trzy w drugim przypadku) znaki od lewej każdego jpg, wyszukaj w kol.B, podstaw z kol.A i zmień nazwę
Sprawdź dobrze, bo pisane w przerwach między obieraniem ziemniorów i marchewy, i mogą być błędy. 919204 Stałe, zmienne i kod na tyle czytelne, że od razu zrozumiesz intencje. Kody z ich wartościami na oddzielnej zakładce, makro uruchamiane zmianą zawartości komórek w określonym zakresie (stałe dla zakresu początkowego i końcowego), zdefiniowanym w module...
Inny plik, inny obiekt. Na przyszłość: Kliknij ppm w obszar obiektu, wybierz "Przypisz makro", "Nowe" lub "Edytuj" jeśli już jest...
Jeżeli odświeżanie ekaranu jest wyłączone przed dokonaniem obliczeń i włączone po zakończeniu, to makro powinno wykonywać się szybko.
(at)Andy74 Dobrze napisane, lepiej bym tego nie zrobił.
Witam, Pytanie jak w tytule. Czy moge uruchomoć makro za pomocą zmiany filtrów w kolumnie? Coś w stylu Worksheet_Change ale żadna komórka nie zmieni swojej wartości.
Załącz przykład. (jak to 2007 i wyżej to spakuj) Jaki ty masz excel a na jakim otwierają go inni? Czy plik ma makra?
Makro reaguje na zmianę wartości w komórce. Jeśli pierwszy wiersz jest "FPS", określa ostatnią komórkę z wartością w kolumnie. Począwszy od 2 wiersz do ostatniej wartości koloruje. Dodano po 16 Oto mały fix, gdyby w zakresie niewypełnione komórki Dodano po 11 Czy chcesz malować kolumna E, ale "FPS" w innej kolumnie(np. B)? Wtedy byłoby inne podejście...
Witam mam problemik z Excelem. Mam np dane w kolumnie A w kolejnych wierszach np 1,1,2,3,3,3,4,5,5,5 czy jest jakas formuła która z automatu porównała by te dane i przed każdą zmianą danych wstawila pusty wiersz aby pozniej wygladalo to tak 1,1 pusty wiersz, 2 p[usty wiersz 3,3,3, pusty wiersz 4 i tak dalej? Z gory dzieki za pomoc
Czy takie makro da się zrobić? Tak :D , ale chyba lepiej dwa oddzielne :spoko: Po drobnych zmianach w pliku tygodnie.xlsm 901448 umieszczony w Module1 kod sprawdza "stan arkuszy" i ewentualnie przygotowuje arkusz na nowy tydzień :!: Zmodyfikowano również plik suma pól.xlsm 901451 i wyposażono w makro do kopiowania potrzebnych Ci wartości z aktualnego...
Witam, chcę stworzyć makro które po wprowadzeniu zmiany wartości w komórce np. c4 będzie automatycznie usuwać wartość komórki D4 czyli przesunięcie o 1 kolumnę . Makro ma działać tylko po zmianie wartości w komórkach (c4:c35) nie aktywuje się przy innych komórkach. stworzyłem coś takiego ale nie działa proszę o pomoc. [syntax=vbscript]Private Sub Worksheet_Change(ByVal...
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ę.
Pytanie zrozumiałe. To zwykła suma liczb, więc w czym problem? Osobiście nie bawiłbym się w składanie formuły. Wystarczy zostawić jeden wiersz, pozostałe usunąć i wpisać sumę... Jeśli jednak składniki ulegają zmianie. Zamiast "+" użyj ActiveCell.Formula = "=SUM(arg1,arg2,...)" Gdzie prawa strona równania jest typu string, więc łatwo poskładać.
HiFi-Man , powinieneś odróżniać makra (makroinstrukcje) od funkcji, bo Twoje pytanie jest przez to niezrozumiałe. Makro to działanie wykonywane jednorazowo, doraźnie. Po wykonaniu wynik ma najczęściej formę stałej (liczby lub tekstu). Makro można powiązać ze skrótem klawiaturowym i uruchamiać go za pomocą tego skrótu. Z kolei funkcja (lub w tym przypadku...
Zupełnie mnie nie przekonuje to rozwiązanie, wpisywanie wartości w jednym arkuszu a potem wyszukiwanie wg kilku kryteriów, automatyczna zamiana lub dopisanie itp. Trochę za dużo kombinacji. Trzeba pamiętać, że działania makr są nieodwracalne, najmniejszy błąd i pozamiatane :( Oczywiście makro jw. da się napisać :) Proponuję inne, wg mnie prostsze rozwiązanie...
:idea:Ten kod uruchamia makro, po zmianie wartości w B1. Private Sub Worksheet_Change(ByVal Target As Range) kolumna = 2 wiersz = 1 If Target.Row = wiersz And Target.Column = kolumna Then 'Twoje makro MsgBox "Hurraa!" 'do usuniecia End If End Sub I jak słusznie kolega Nie należy umieszczać go w modułach tylko w arkuszu
Mysle iz bez makra sie nie obedzie (własciwie trzeba napisac drobny kod w VBA bo nie da sie takiego makra zarejestrowac) Nie ma funkcji (ja przynajmniej nie znam) która po wyliczeniu danych zmieniałaby wynik w stała, czyli po zmianie wprowadzonych danych nie zmieniał wyniku. Kod jest stosunkowo prosty Powodzenia
Tak na marginesie: :) Kolego, po napisaniu odpowiedzi zanim ją wyślesz, przeczytaj to co napisałeś, byś był pewien że odpowiadasz na pytanie. Twoje pierwsze zdanie: ... jeżeli w A1 wpiszę wartość to ... w A2 należy ... To wynikało z Twojego pierwszego postu, ale excel tego nie zrozumie :) Całe szczęście że dodałeś drugie zdanie :) Z komunikatem jako...
Witam, Zielony z makro szukam pomocy :-) Uprościłem pytanie, poszukuję makra które uruchamiałoby się automatycznie po wprowadzeniu zmiany w arkuszu dane C3, makro powinno zapamiętać i zapisać poprzednią wartość C3 do arkusza zestawienie C5, przy kolejnym wpisie do C3 w danych, kolejny zapis w C6 w arkuszu zestawienie itd. Mógłby ktoś pomóc w stworzeniu...
Po pierwsze należy załączyć plik, a nie sam kod. W tym Twoim kodzie są jakieś przekłamania. Ale najważniejsze, że nie piszesz gdzie mają być rejestrowane te zmiany drugiej komórki (B2). Czy razem ze zmianami A1 w tej samej kolumnie? Czy w innej kolumnie (której) tego samego arkusza? Czy w innym arkuszu? I czy wystarczą same wartości? Zwykle rejestruje...
Witam, Mam taki problem, bo niestety nie znam się na VBA, a chciałbym sobie ułatwić życie i z automatu wysyłać maile. Mam szablon w excelu z danymi, mailem oraz zmienną wartością procentowa i przypisanym do tym zdaniem. Czy dało by rade zrobić takie makro, które bierze z arkusza adres e-mail i maila z teksem z komórki wysyła automatycznie w momencie...
Propozycja rozwiązania w oparciu o makro. W module uniwersalnym wpisałem takie makro: [syntax=vbscript]Sub NowaData() On Error Resume Next Dim ark As String With ActiveSheet ark = .Range("BA22").Value .Range("BI21:BI25").FormulaLocal = "=SUMA.ILOCZYNÓW('[Wyniki tygodniowe.xlsx]T" & ark & "'!$H$2:$H$23;--('[Wyniki tygodniowe.xlsx]T" & ark & "'!$G$2:$G$23=$BH21))"...
Kurcze faktycznie chyba będzie prościej zrobić makro do zmiany całego wiersza z "dzisieejsza" datą z formuł na wartość.
Jeżeli chodzi o przenoszenie formatowania to excel właściwie nie ma żadnych funkcji. Można to zrobić jedynie poprzez makro (VBA) lub "pisaniną" poprzez formatowanie warunkowe i to w excelu 2007 i powyżej, bo niższe mogą mieć tylko max 3 warunki. Ten kto zna jako-tako programowanie w VAB może sobie poradzić. Ten kto nie ma pojęcia na początku upadnie,...
Witam, Mam problem z Makrem które będzie automatycznie zmieniało filtry w tabeli przestawnej. W dołączonym pliku są stworzone dwie tabele przestawne (wartość netto, spalanie) filtrowane przez nazwę oraz napęd. Jak napisać makro które po wpisaniu w odpowiednią komórkę nazw (Toyota, Nissan itp.) automatycznie wprowadzi je do obu tabel ? Lub makro które...
Niby tak ale nie do końca :) Wklejam plik dla lepszego zobrazowania. Klikając "Przycisk 1" makro powinno znaleźć wartość "Data pomiaru" w kolumnie "Data", następnie skopiować "wartość pomiaru" i wkleić w kolumnę "temperatura" (czyli zaraz obok). Dzięki temu, nie trzeba ręcznie wprowadzać zmian dla dat z przeszłości.
Mam pytanie czy to makro trzeba w jakiś sposób uruchomić ? Czy ono uruchamia się samo podczas zmiany wartości komórki ?
Zmiana ścieżki na klasyczne GCC rozwiązuje problem.
Zobacz, czy o to chodziło. Makro do kopiowania: [syntax=vbscript]Sub Kopiuj() Dim b As Worksheet Dim ow As Long Set b = Sheets(ActiveSheet.Index - 1) ow = b.Cells(Rows.Count, "A").End(xlUp).Row - 1 Dim CopyRng As Range, PasteRng As Range b.Range("A4:B" & ow).Copy ActiveSheet.Range("A4").PasteSpecial Paste:=xlPasteValues b.Range("N4:O" & ow).Copy ActiveSheet.Range("N4").PasteSpecial...
W Wordzie są dostępne polecenia sumowania tabeli (Menu Tabela->Formuła ...): =SUM(ABOVE) - Sumuj komórki nad kursorem =SUM(LEFT) - Sumuj komórki z lewej strony kursora =SUM(RIGHT) - Sumuj komórki z prawej strony kursora. Uwaga Program Word wstawia wynik obliczeń jako pole w wybranej komórce. W przypadku zmiany wartości w komórkach, które obejmuje działanie,...
Wstawiłem tabelę, włączyłem rejestrator makr, zmieniłem nazwę w 'Narzędzia tabel'. Nagrało się m/in: https://obrazki.elektroda.pl/2689543600_... Odpowiedź: Tak, można
Witam, zaczynam przygodę z mikrokontrolerami i mam pewien problem, czytam kilka książek dla początkujących oraz przeglądam przykłady w internecie, i mam pewien problem, ponieważ widziałem kilka równoważnych zapisów(przynajmniej tak mi się wydaje), zmian wartości wybranego bitu. -makra(?) cbi() i sbi() -makro register_bit -makro _BV() w połączaniu z...
Wytłumaczenie dosyć proste: użyłeś zdarzenia odpalanego przy jakiejkolwiek zmianie w którymkolwiek arkuszu, bez żadnych dodatkowych zabezpieczeń/warunków... Jeżeli to makro wypisuje jakąkolwiek wartość do innej komórki, automatycznie odpala kolejne zdarzenie i program się zapętla... Zamiast globalnego zdarzenia, użyj zdarzenia Worksheet_Change w arkuszu...
No właśnie potrzebuję makro, tylko nie wiem jak w nim napisać, że każdorazowo po zmianie zakresu (zmiana wartości ScrollBar) ma sprawdzać, które etykiety mają wartość poniżej 95%, aby oznaczać ją w inny sposób :)
Mam stworzony arkusz w którym w kilku komórkach użytkownik wprowadza pewne parametry i chciałbym żeby tylko do tych komórek miał dostęp. W innych komórkach makro dokonuje obliczeń obliczenia te widać ale użytkownik nie może mieć w to ingerencji ponieważ boję się że ktoś coś pomiesza bądź usunie formule. Używając tego parametru umożliwie aby makro wprowadzalo...
uruchamianie makro zmiana wartości excel makro zmiana wartości makro wklejanie wartości
zmywarka wyrzuca wyczyścić pompa grundfos moduł ładowania laptopie
crunch wzmacniacz crunch wzmacniacz
Czy Softonic jest bezpieczny? Analiza ryzyka Iveco Daily 2007 – zamiana skrzyni AGile na manual, polecane firmy, koszty, kodowanie
