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)...
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...
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()...
Witam, Mam prawie 3 tysiące plików jpg, którym muszę zmienić nazwę. Pliki nazywałem tak: KOD-#.jpg przy czym kod to numer produktu, a # to numer zdjęcia. Muszę zmienić KOD na ID, czyli: ID-#.jpg W bazie danych każdy KOD ma przypisany unikalny ID. To zestawienie mam w excelu i wygląda tak: http://obrazki.elektroda.pl/8377737300_1... Kolumna...
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...
Należy oprogramować zdarzenie SheetChange skoroszytu. Wykrywa ono równocześnie, w którym arkuszu i w której komórce nastąpiła zmiana. Kod: [syntax=text]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Address <> "$F$6" Then Exit Sub If IsNumeric(Target) And Target > 0 Then Sh.Tab.Color = vbRed Else Sh.Tab.Color...
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 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
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
Temat do zamknięcia, Maciej rozwiązał moją zagadkę :) Bardzo dziękuję!! Makro działa świetnie, na pewno zaoszczędzi mi wiele monotonnej pracy.
Czy istnieje jakiś inny "sposób", aby to jednak formuła zmieniająca wartość komórki była tzw "wyzwalaczem" makro? Generalnie tak - możesz np. skorzystać z kodu typu: x=Target.Row :cry: Jak widzę w Twoim pliku radzisz sobie dobrze z modyfikacją i dostosowywaniem kodu VBA do swoich potrzeb :D
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...
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.
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...
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...
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
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...
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?
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...
Jeśli chodzi o klasyczne odwołanie, to nie jest to możliwe, gdyż odwołanie zwraca tylko wartość komórki, bez formatowania. Ponadto, nawet z użyciem VBA, komórka zawierająca formułę musi być sformatowana jednolicie (to znaczy można sformatować całą komórkę, ale nie poszczególne znaki). Szkoda, że nie dałaś pliku załącznika, bo wtedy łatwiej można by...
Ilość w kolumnie B zmienia się również na aktualną. A zmiana w procentach dotyczy relacji pomiędzy starą B a nową B. Albo gdyby było łatwiej to można by zrobić tak, że w kolumnie B pobiera się wartość aktualna. Następuje jakaś zmiana, to do kolumny C pobiera się wartość zmieniona a w kolumnie D zmiana procentowa ale wtedy to już makro nie musi tego...
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 :)
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...
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))...
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.
... 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...
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...
Bardzo proszę o pomoc jak napisać makro w Excelu aby: 1. makro działało na zaznaczonym obszarze (każdorazowo wskazanym) 2. makro rozpoznaje że analiza jest dokonywana po 2 wiersze przy czym wiersz pierwszy porównuje się z drugim, ale wiersz drugi porównuje się nie z trzecim tylko z pierwszym, wiersz trzeci porównuje się z czwartym (wiem, że to może...
witam szukałem w internecie informacji i znalazłem fajną prezentacje link w programie Pan ma coś podobnego do mnie nawet posiada funkcje ,że przy zmianie miesiąca dni mu się automatycznie zmieniają i cala reszta. Dokladnie to co potrzebuje powiązać to ze sobą tak samo zmiany1,2,3 powiązać z nazwiskami osób klikam zmiana 1 wskakuje z automatu zmiana...
(at)clubs wielkie dzięki za pomoc. Po raz kolejny okazało się, że najprostsze rozwiązania są najlepsze :D (at)ST-14 tak, masz rację. Znajduje pierwszy ciąg znaków jaki pasuje do wzorca i wówczas podmienia zawartość całej komórki. W moim przypadku nie jest to problem, bo działam na unikalnych wartościach, czyli takiego przypadku jak wskazałeś nie będzie....
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_...
Zrobiłem to tak że program wybiera z tabelki po prawej inicjały (4 pierwsze znaki) czyli jak w tabelce jest J.K. to wybiera te inicjały. I przeszukuje kolumnę K w poszukiwaniu zgodnych inicjałów, (też 4 pierwsze znaki) czyli jak jest( J.K. data) to wybierze tylko "J.K." i dodaje do licznika pozycji zleconych. Dodatkowo jak kolor czcionki jest czerwony...
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ę.
Strasznie to wszystko zakręcone, a na dodatek niepotrzebnie komplikujesz sobie życie... Tak naprawdę to by to wszystko można zrobić na funkcjach, bez użycia VBA. No, ale... Zacznijmy od tego że poprzednie makro się wywalało, bo w złym miejscu umieściłeś sprawdzanie warunku: jeżeli masz zdarzenie Change wywoływane zmianą w arkuszu, to jeżeli w tym zdarzeniu...
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)...
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...
Do szczęścia mi brakuje aby efekt makra robił się na arkuszu "wynik" a wartości były brane z arkusza dane. :please: Efekt taki jak na zrzucie 961076 dla wielu "statusów" można uzyskać poprzez makro w załączonym pliku :spoko: 961080
Pierwsza zmiana wpisuje noc (zapisz), druga zmiana wpisuje rano (zapisz)... A co się dzieje z wartością komórki "noc" po pierwszym zapisie :?: a co przy drugim zapisie ? :D W mojej ocenie makro zapisujące powinno na końcu czyścić wpisy poprzedniej zmiany np zapisu czasu przez poszczególne zmiany można wykorzystać Twój pierwotny kod w postaci: [syntax=vbscript]Sub...
jak to jest technicznie zrobione? Do arkusza1 przypisane jest makro reagujące na zdarzenia zmiany :idea: (wprowadzenie nowej wartości) komórki I4. Jeśli takie zdarzenie wystąpi w pierwszym wolnym wierszu kolumny A wprowadzana jest aktualna data, a w kolumnie B nowa wprowadzona do I4 wartość. Na koniec czyszczona jest zawartość komórki I4 :spoko: w...
Widzę, że zadałem dość skomplikowane pytanie. :/ Wie może ktoś, jak zrobić chociaż ten krok ze zmianą zawartości komórki "I"? W sensie zaznaczam sobie te komórki, a makro kopiuje mi do pierwszej zaznaczonej komórki, zawartość pozostałych (zaznaczonych), wstawiając pomiędzy "+". Nigdzie nie mogę znaleźć jak to zrobić. :(
to pozostaje makro lub funkcja użytkownika (też w VBA) Hmmm, czyli muszę na razie dać sobie spokój. A może z innej beczki. Funkcja ta była mi potrzebna do grafiku służb. Polega to na tym, że w jednym grafiku wpisujemy D,N,Sz itp. (dniówka, nocka, szkolenie) a drugi przy użyciu funkcji "jeżeli" wypełniał się liczbą godzin. Czyli jeżeli D to wpisz 12....
Witam, Staram się napisać makro, które na podstawie wartości komórki w danym zakresie w arkuszu, zmieni jego kolor (jeżeli znajdzie daną wartość - tekst, w tym zakresie). Sprawdzanie i ewentualna zmiana koloru ma odbywać się we wszystkich arkuszach z wyjątkiem dwóch. Poniżej przedstawiam kod, który udało mi się napisać, jednak nie działa on gdyż ciągle...
iersz, który zamykam Co oznacza zamknięcie wiersza? to w sumie oznacza umowne w tym przypadku zamknięcie sprawy - najpewniej wpis w komórce np z datą zamknięcia sprawy. Zamiarem jest, że przy zmianie w tej komórce uruchomi się makro które poda monit, czy przenieść wiersz do pliku docelowego. Również ze zmianą w tej komórce może być powiązane przeniesienie...
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...
Makro zrobiłem poprzez zarejestruj makro. Ale zawsze była jakaś zmiana, Oprócz arkuszy A i B utworzyłem dwa tymczasowe. Sprawdzam czy nazwa A i B są jednakowe, jak tak kopiuję do C, jak nie zostawia puste. Później kopiuję ręcznie pozostałe dane. Wyciągam niepuste wg nazwisk. Kopiuję do arkusza D i nadaję pojedyńcze numery
Z tym, że makro uruchomi się przy każdej zmianie w arkuszu, bez względu na to w której komórce nastąpiła aktualizacja wartości.
Coś chcesz ale albo nie do końca wiesz co albo nie potrafisz tego do końca opisać. Tzn mniej więcej wiem jaki chciałbym uzyskać efekt końcowy.Nie jestem specem od Excela więc nie za bardzo wiem jak to zrobić więc raczej to "drugie" . Ale wydaje mi się że można w prosty sposób (bez makra) uprościć to "zadanie" np. przy liście pracowników w kolejnej...
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"),...
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...
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...
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ż...
Widzę, że nie jest to kwestia pojedynczego błędu. Nie wiem z czego to wynika, ale kompletnie nie akceptujesz zasad języka. Nie można być tak upartym. W przypadku tej procedury do zmiennej Target przypisywany jest obiekt typu Range (zakres) ze wszystkimi własnościami. Range.Address jest identyczny z Selection arkusza w momencie uruchomienia procedury...
Przed zmianą wyboru w komórce A3 należy wyczyścić komórki J3:L3. Wtedy formuła wykorzysta dane z tabelki. To czyszczenie można ewentualnie zautomatyzować makrem zdarzeniowym reagującym na zmianę w komórce A3. To makro jest w module arkusza Zabudowa, ale jest w tej chwili zapisane tylko dla komórki A3. Jak będziesz chciał wprowadzać dane także w innych...
Dzięki za wyjaśnienie JRV , robiłem podobny błąd w innych przypadkach. Mam prośbę, mógłbyś zaproponować rozwiązanie dla poniższej sytuacji. Mianowicie mam w jednym arkuszu dużą liczbę nazw, które będę chciał później pogrupować, w tym celu chciałbym aby makro zmieniało nazwy na podstawie bazy w drugim arkuszu (załączyłem przykład o co mi chodzi), próbowałem...
Zastój widzę ;) Obstawiam przy najprostszym rozwiązaniu: Wypełnij kolumnę B listą pracowników (można włączyć filtr) i wpisuj "U" w kalendarz (AH:OH) - tu poruszanie się ułatwi opcja "zablokuj okienka" OK, jeśli się uprzeć można napisać makro, ale trzeba założyć: 1. anulowanie urlopu (usunięcie komórek B-D wiersza) 2. zmiana dat (Np pomyłka, choroba...
Prawidłowo przenosi wartości wraz z datą i zmianą, jednak nie zwraca w komórkach D5 i E5 danych do formularza z którego zostały wpisane , gdzie miało pokazywać dla jakiej daty i jakiej zmiany został wyeksportowany ostatni raport - ma to na celu wyeliminowanie możliwości wprowadzania dwukrotnie tego samego zamówienia. Da radę to zrobić? I jeszcze przy...
Dzięki adams_nt - Widzę ,że uprościłeś makro, ale niestety (przykro mi) nic to nie pomogło. Spróbuj wpisywać w kolejnych liniach programu i zobaczysz jak w co drugiej linii z kolumny 4 kursor przechodzi ruchem konika szachowego. Druga sprawa to skićkałem kasowanie roczne (działało dobrze). I jeszcze na dodatek po kliknięciu na przycisk Zmiana ilości...
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.
Na podstawie zmian w komórce J1 przeliczają się dane w bazie, tam wstawione są funkcje jeżeli,mnie interesuje wartość skopiowanych danych obliczonych na podstawie zmian komórki J1
Najprościej będzie jak "małpka" nagra sobie całą procedurę dla wszystkich lub kilku arkuszy - a tam sprawdzi jak następuje przechodzenie z jednego arkusza do następnego i jak ustawione są właściwości exportu do PDF np. parametr IgnorePrintAreas: Ok, małpka w miarę zna ten parametr i wie co to obszary wydruku itd, ale sprawdziła . Były 4 testy: Plik...
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ę...
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ż...
Inny plik, inny obiekt. Na przyszłość: Kliknij ppm w obszar obiektu, wybierz "Przypisz makro", "Nowe" lub "Edytuj" jeśli już jest...
Ale czy zwykłym formatowaniem warunkowym można zmienić kolor wielu komórek w zależności od jednej? Ja nie umiem tego zrobić. Gdyby się nie dało to zawsze można napisać makro.
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...
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...
czy jest możliwość automatycznego uruchomienia makra w Excelu w momencie zmiany wartości Do tego jest: [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Excel.Range) End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range) End Sub [/syntax]
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...
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...
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...
Dla zasady #NAZWA to nie format tylko błąd obliczeń - excel nie zna funkcji o danej nazwie (nazwa po - ). Aczkolwiek dziwne bo u mnie pomimo myślnika nie zmusza excela do obliczeń (chyba że na wstępie jest znak równości ( = ). Formatowanie arkusza jest na ogólne a wkleja wartości ale ... Sama zmiana formatu komórek właściwie nic nie da bo i tak jak...
Witam, dopiero zaczynam moją przygodę z Excelem - nie jestem informatykiem, nie mam wykształcenia ścisłego - także proszę o wyrozumiałość w razie czego ;) Chciałem uzyskać zapis kwoty słownie podobnie jak to opracował marek003, ale chciałem żeby waluta była na końcu. Ponadto w jakiś sposób rozwiązałem problem, o którym wspomniał zposp i bez względu...
Witajcie. Mam problem natury programistycznej, a może tylko formułowej w pracy z excelem. Próbuje stworzyć coś na kształt kalendarza uzupełnianego dynamicznie. W jednym arkuszu "Zadania" mam w kolumnie A nazwę zadania do wykonania (blacha 1, blacha 2 itd), a w kolumnie B termin wykonania. W drugim arkuszu "Marzec" mam ładnie podzielone dni miesiąca...
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...
Mam pytanie czy to makro trzeba w jakiś sposób uruchomić ? Czy ono uruchamia się samo podczas zmiany wartości komórki ?
Hej hej! Koledzy, potrzebuję pomocy :) Mam pliczek, który pomogliście mi ogarnąć: dostosuj.xls W pliczku makro wygląda następująco: Option Explicit Sub Dostosuj() Dim lista As Variant, ileWrs As Integer, idx As Integer Dim OstW As Long, tbl() As Variant, i As Long, j As Integer Dim Unikaty1 As New Collection, Unikaty2 As New Collection...
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...
Kurcze faktycznie chyba będzie prościej zrobić makro do zmiany całego wiersza z "dzisieejsza" datą z formuł na wartość.
i teraz chciałbym aby jakieś makro warunkowe potrafiło automatycznie zmieniać wybór z listy nie zabierając mi możliwości zmiany manualnej. (np przy jakimś warunku np. wybór języka, program domyślnie ustawi mi kraj pochodzenia Może właśnie ta komórka z listą powinna temu służyć? Trochę nie rozumiem: makro wybór języka, by zmienić wartość na liście wyboru...
Użyłem Select Case, żeby nie zapisać pół strony instrukcją IfThenElse. Teraz jaśniej? Dobra, już tłumaczę. 1. Takie (zgodne z VB) a nie inne pole kombi, bo zdarzenie "Przy zmianie" reaguje tylko na zmianę wartości. Gdybyś chciał wpisać te same oceny raz za razem, to zmiana by nie nastąpiła. Należało użyć innego zdarzenia, o które kombi formularza jest...
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...
Polecam zaprzyjaźnić się z debuugerem. Pomaga na zgryzoty :D Wstawiasz break ("czerwone kółko") na początku obu funkcji, ale nie przy deklaracji zmiennych (klikając na szarym polu po lewej stronie kodu). Potem robisz jakąś akcję w excelu, np. zmieniasz arkusze, i kiedy program zatrzyma wykonywanie w zaznaczonym miejscu, wciskając F8 przechodzisz kolejne...
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....
Ok. Rzeczywiście małe zamieszanie się wdało w moje tłumaczenia. Bijąc się w pierś jedną ręką, wyjaśniam niezwłocznie wszystkie zawiłości ręką drugą. Chodzi mianowicie o dwie funkcjonalności: 1.Po wypełnieniu którejkolwiek z komórek z danego zakresu (C3:F1000), makro przypisuje aktualną datę do drugiej kolumny wiersza, w którym nastąpiła zmiana. Gdy...
Chyba najprościej zdefiniować makro jako funkcję, w jakąś komórkę dodać wywołanie tej funkcji, a argument byłby podawany jako odnośnik do zmienianej przez Ciebie komórki: - niech funkcja nazywa sie MyFunction, ma jeden argument - zmieniasz zawartość komórki A1 - w komórce AA1 wpisać '=MyFunction(A1)' Taka funkcja będzie wywoływana zawsze po zmianie...
W ty, nowym pliku xls przydałoby się podmienić nazwę (obecnie kopiuje z pierwotnego xlsx) na np "Arkusz1" a mógłby kopiować tylko to co jest aktywne (bez tego co ukrywaję filtry) Trzeba kopiować tylko widoczne komórki i wklejać je potem jako wartości i formaty. Wymaga to jednak zmiany sposobu tworzenia nowego arkusza. Przy okazji czemu: Worksheets("Nazwa...
Oj, zapomniałeś o zdarzeniu 'BeforeSave'. Przy "zapisz jako" argument SaveAsUI przyjmuje wartość True. Przy "zwykłym zapisz", False. Można to wykorzystać (zapisać z podstawioną nazwą, następnie "zCancelować")... Myślałem o tym :) Tylko w okienku "Zapisz jako..." domyślnie wyświetla się aktualna nazwa pliku. Gdyby dało się w locie zmienić nazwę aktualnego...
Chyba się nie rozumiemy. Napisałeś kod w "sekcji" Change arkusza (monitorującym czy w arkuszu nastąpiły zmiany) Czyli oczekujesz że jeżeli "coś" zmienisz w arkuszu to uruchomi się makro. Ograniczyłeś że ta zmiana ma dotyczyć komórki N5. Jednak jak sie okazuje komórka n5 nie zmienia się gdyż jest w niej formuła - zmienia się tylko wynik (nie robisz tego...
Gdzieś chyba jest błąd w kodzie bo zamiast liczyć to wstawia tekst formuły brakuje na początku formuły znaku "=". Natomiast gdy ręcznie wstawię to zlicza natomiast i tak wyskakuje komunikat "Łącza do pliku*xls' nie zostały uaktualnione, ponieważ plik xls*' nie został ponownie obliczony przed ostatnim zapisem". Imuszę ręcznie wciskać OK aby wartości...
Witam. Potrzebuje zrobić coś takiego: Wstawiam dane w komórce np. A1 to automatycznie kopiuje do np B1.Teraz w A1 zmieniam wartość danych to automatycznie kopiuje nową wartość do B2 i tak w kółko jak jest nowa wartość w A1 to przenosi ją w nową komórkę. Ma to się odbywać w automacie bez przyciskania przycisków. Chcę ze strony internetowej importować...
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...
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...
Niestety ja pracuję na starej wersji excela i takiej funkcji nie mam :( Skoro formuła działa, to może nagraj makro wywołujące to okienko i uzależnij jego wykonanie od zmian w komórce B1?
Zakładam, że za aktualizowanie odpowiedzialne jest jakieś makro. Dopisz wstawianie komórki (Range("A1").Insert Shift:=xlDown) i usuwanie końcowej przed zasadniczą procedurą.
Dzięki, naniosłem poprawki i makro wygląda w ten sposób: 1 czesc: jest ktoś w stanie zobaczyć i ewentualnie poprawić '2 część' makra?
(at)maciejgonet Dzięki wielkie za pomoc! Miałbym jeszcze tylko pytanie co do działania całego makra. Czy da się z niego wyeliminować zapisywanie w historii sytuacji kiedy ktoś dodaje nowy wiersz? Makro oczywiście wtedy działa tak jak powinno i zapisuje zmiany, czyli zapisuje np. 16000 pustych komórek które zostały dodane przez wstawienie nowego wiersza....
Powracam do tematu, Czy mógłby ktoś wyedytować makro, które napisał PRL w ten sposób, aby można je było odpalić "ręcznie" przypisując je do np. jakiegoś autokształtu ? Makro miałoby działać identycznie jak to napisane przez PRL z różnicą taką, że uaktywnia się po wciśnięciu przycisku i makro sprawdza całą kolumnę G i z automatu kopiuje i wstawia poniżej...
Excel wyświetla Nr błędu, więc możesz go przechwycić i oprogramować warunek. Z drugiej strony - lepiej tak skonstruować makro, aby ustrzec się takich błędów. Np instrukcja warunkowa: If (not) isnumeric(znak_z_klawiatury) przy zmianie, lub tp
Wróżąc z fusów wróżę, że ta propozycja nie doprowadzi do postępu. Klawisz Enter nie ma tu znaczenia. Sprawdzałem, że jeśli makro wstawia wartość do komórki zdarzenie Change jest generowane i godzina się pojawia, choć nie jest używany żaden klawisz.
makro zmiana wartość makro zmiana formuły wartość makro zmiana formuła wartość
klimatyzacja zasilanie excel makro zmiana wartość transformator inwerter sprawdzić
radmor5412 przestrojenie amica pa4560a420
Schemat centralnego zamka Ford Scorpio Mk2 (1994-1998) Błąd i65 w zmywarce IKEA - przyczyny i rozwiązania