Witam Tabela z uprawami - po wprowadzeniu działek do arkusza (kolumna C i D) okazuje się ze na niektórych polach jest więcej niż jedna uprawa. Wtedy wstawiam wiersz poniżej danej działki i wpisuję kolejne uprawy na danej działce (tylko kolumna E, G, F, natomiast C i D zostają puste w tym wypadku). Podobnie z usuwaniem zbędnych wierszy w danej działce....
Dzięki dzielenie działa dokładnie tak jak chciałem i to już znacznie ułatwi mi sprawę :) co do drugiej części to użyłem nienajlepszego określenia, chodziło o sortowanie po ilości powtórzeń zawartości komórki w kolumnie B (przy czym to nie będą liczby a ciągi znaków) przykładowo: a b b c d d d d zmnienialo na: d d d d b b a c Jak teraz o tym pomyślałem...
Witam! Mam makro, które przenosi odpowiednie dane do odpowiednich arkuszy na podstawie tego w którym miejscu w kolumnach H:J wprowadzone są dane, makro nie pozwoli wstawić raportu jeśli nie wypełnione są komórki C2 oraz C4, potrzebuję jeszcze dodatkowo aby nie można było wstawić raportu w sytuacji gdy dla któregoś wiersza dane znajdują się w którejś...
Witam, mam plik w którym każdego dnia wypełnia się dane, a na końcu ostatniej zmiany są one kasowane i w to miejsce wpisuje się kolejne dane z dnia następnego. Mam pytanie czy jest możliwość stworzenia takiego makra ,które pobiera dane z określonego dnia na podstawie listy rozwijanej dotyczącej daty i kopiuje je w odpowiednią tabelę i zapisywało się...
Masz tam dwa rodzaje makr - jedna grupa tylko zmienia kolor tła, druga grupa zmienia kolor tła i dodaje tekst. Nie wiem, czy chcesz ograniczyć działanie wszystkich makr do kolumn C i L, czy tylko tych, które wpisują tekst. W każdym razie do każdego z makr, które mają mieć ograniczony zakres dopisz na początku (pod nagłówkiem) takie 3 wiersze: [syntax=vbnet]...
Witam sprawdź plik z załączenia może Ci coś pomoże Przypominam że musisz mieć włączone makra - bo inaczej nie potrafię Ci pomóc jak nie za pomocą makr W pliku jest bardzo prosty i fajny filtr po kolumnie
Dodałem jeszcze możliwość ukrywania kolumn z niepotrzebnymi dniami w miesiącu, aktualizację dni miesiąca na pasku jak również zmiana koloru na szary dni sobota i niedziela. UWAGA!, nie zmieniaj (nie dodawaj nie usuwaj żadnych kolumn i wierszy) bo to spowoduje że makro będzie niepoprawnie działać
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....
Efekt jaki oczekujesz: wpis aktualnej daty i godziny w kolumnie A, jeśli cokolwiek wpiszesz lub skasujesz w kolumnie B :D - tak jak na zrzucie 990806 można zrealizować poprzez makro zdarzeniowe typu Worksheet_Change :spoko: 990807
Do pierwszego możesz użyć funkcji RIGHT (zakładając że tydzień jest dwucyfrowy i zawsze na końcu) tydzien = Right(wartosc_komorki, 2) Do drugiego: albo użyć przycisku którego kliknięcie wywołuje makro dodające nową osobę do zakłądki "status" i "zasoby", albo spróbować obsłużyć zdarzenie Worksheet_Change zawężone do kolumny gdzie jest nazwisko....
otwiera się Arkusz 2 zaznaczając pustą komórkę kolumny B (ewentualnie dodaje nowy pusty wiersz) Patrząc na załączony plik nie mogę zrozumieć w jakim celu chcesz zrobić to makro :?: :cry: Jeśli chcesz szybko weryfikować odniesienia do arkusza 2 to najprościej proponuję makro w arkuszu 1 :spoko: : [syntax=vbscript]Private Sub Worksheet_BeforeDoubleClick(ByVal...
W załączonym pliku możesz dodawać i usuwać kolumny (wyłączając kolumny 'czynnik1' i 'czynnik2'), a makro będzie poprawnie liczyć.
Hmm... Trochę więcej tych danych, niż się spodziewałem. Najprościej byłoby dodawać[syntax=text]WYSZUKAJ.PIONOWO(RAN... MIN w kolumnie C, to 2, MAX - 32, suma kolumny 80326 (losowań) w 5000 wierszach :( Nie mam tyle cierpliwości. No i będzie się działo gdy zmienią się dane w kolumnie C. LOS, MAX.K, INDEX(... w...
A po co do tego makro? Można to zrobić prostą formułą w kolumnie I: =if(isblank(h1);na();now()) Kolumnę formatujesz jako "czas" i tyle.
wpisywane "ręcznie", a nie poprzez formuły - jak ogarnąć drugą część mojego problemu? Żeby wykorzystać makro zdarzeniowe :D to proponuję wykorzystać jednak inną kolumnę np. wolną obecnie kolumnę A :spoko: . W załączonym pliku proponuje w przedostatniej komórce kolumny A wprowadzić wartość 1 , a wówczas cały ten wiersz (od B do AH) zostanie wstawiony...
Dzień dobry, Wydaje mi się, że sprawę załatwi nadanie zakresowi roboczemu nazwy, pod warunkiem, że nie będzie się usuwać ostatniego wiersza ani ostatniej kolumny, a dodawać nowe również przed ostatnim wierszem i przed ostatnią kolumną, a nie za nimi. Poza tym nagłówki kolumn też trzeba aktualizować ręcznie. Gdyby istotne było, żeby tabela się automatycznie...
Powinieneś załączyć przykładowy plik Excela, bo za dużo jest niejasności w tym, co napisałeś. Przykładowy kod, który działa wg Twojego opisu: [syntax=vbscript]Sub AddSheets() ' zakładamy, że nazwy nowych arkuszy ' są w komórkach od B5 w dół Dim ostw As Long, w As Long ostw = Arkusz1.Cells(5, 2).End(xlDown).Row For w = 5 To ostw Sheets.Add(After:=Sheets(Sheets.Count))....
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...
Potrzebuję gotowego makra, które będzie dodawało mi nowe wiersze. Może ktoś da radę pomóc. Mamy przykładowo w kolumnie D takie wartości: 1 D 2 5 3 1 4 30 5 8 6 100 Makro miałoby teraz dodawać pod spodem tyle wierszy ile jest napisane w tej kolumnie - 1. Np. Mamy w komórce 2D wartość 5 to pod spodem trzeba dodać 4 puste wiersze. w komórce 3D mamy 1 to...
Pliki .xsl można dodawać, .xslx - niestety nie, ale wystarczy spakować np. ZIPem i już się będzie dało. Twój opis jest na tyle zawiły, że sądzę, iż lepiej nadawałby się do jego realizacji MS Access... tak czy inaczej spróbuj opisać co chcesz osiągnąć bardziej ogólnie, na wyższym poziomie abstrakcji - nie na poziomie komórek, wierszy i kolumn tylko funkcjonalności.
Witam, Poszukuję makra, które w przypadku gdy w arkuszu z tabelą natrafi na kolumnę oznaczoną 1 i 2, to te kolumny usunie i pozostawi wszystkie inne. Kolumn w arkuszu może być bardzo wiele. W załączeniu dodaję przykład pliku. Będę wdzięczny za pomoc.
A orientujesz się może czy można zrobić tak żeby po zeskanowaniu zamiast potwierdzenia ENTER, przenosiło mnie do wskazanej komórki gdzie od razu mógłbym wpisać ilość, tzn. skan --> automatyczne przeniesienie do kolumny ilość --> ręczne wpisanie ilości i po naciśnięciu enter przejść od razu do kolumny kodu, wiersz niżej, tak żeby skanować kolejny produkt....
Super. Kliknąłem podziękowanie :D. Dzisiaj w pracy przetestuję (nocna zmiana). Czy te makro dodajemy jakoś specjalnie do skoroszytu czy też normalnie na zasadzie makro/wstaw nowe?
Zastosowałem tą formułe do kolumny L, ale niestety z marnym skutkiem ;/
Jak dodajesz wiersze do tabeli, to zawartość wierszy pod spodem przesuwa się w dół, ale wysokości wierszy pozostają bez zmiany (nie przesuwają się). Jest tak dlatego, że poza obrębem tabeli (w innych kolumnach) może być inna zawartość wymagająca innej wysokości wierszy. Żeby przesunąć wszystko w dół wraz z wysokościami wierszy trzeba wstawiać całe wiersze....
Po Next dodać [syntax=vb] .Cells(w,1).value = .Cells(w-1,1).value + 1[/syntax] Powinno działać. Pamiętaj tylko, że gdy w = 1 dostaniesz error, bo spróbujesz się odnieść do Row = 0. Oraz, jeśli ta komórka nad nie będzie liczbą(bądź pusta), a spróbujesz do niej dodać 1. Można temu zapobiec dodając kilka If'ów. Jednakże myślę, że nie jest to takie znów...
Witam Panowie potrzebuję pomocy przy stworzeniu makra które: Będzie wyszukiwało Komórkę w drugim arkuszu o takiej samej nazwie jak w komórce B18 w pierwszym arkuszu i dodawało do komórki przesuniętej o dwie kolumny w drugim arkuszu wartość komórki K18. Ktoś pomoże? Pozdrawiam
Sprawa jest taka: w pewnej tabeli (setki rekordów) jest pole, z wartością numeryczną. Dodałem w projekcie tabeli kolumnę (text), i teraz w tej kolumnie wartość z kolumny numerycznej trzeba przepisać do nowej kolumny, dodając gwiazdki. Czyli np. 123 ma zmienić się na *123*, 50 ma zmienić się na *050*, itd. Jak zrobić to automatycznie, jakimś makrem?...
Idealnie, Dziękuję Ci bardzo ;] Dokładnie o to mi chodziło. Mógłbym Cię jeszcze prosić o dodanie do tego kodu, opcji która dodawałaby date kopiowania w 17 kolumnie kopiowanego wiersza?
1. pobiera listę plików .xlsx w folderze 2. usuwa zakładki, tworzy nowe i orzenosi dane z pobranego pliku z folderu 3. przenosi dane z jednej zakładki do finalnej KOR 4. przenosi poszczególne wiersze z zakładki RAT do zakładki KOR do tego samego wiersza jako kolejne kolumny 5. tworzy nowy plik z danymi z zakladki KOR, zapisuje i przechodzi do pkt 1...
1. Ustawiasz w arkuszu układ danych, tak aby jak najlepiej pasował ci do wyliczeń 2. Określasz i deklarujesz typy zmiennych - jeśli będziesz je wykorzystywać 3. Zliczasz ilość komórek z danymi (liczby) 4. Dla średniej arytmetycznej wykonujesz dodawanie liczb, a następnie podział sumy przez ilość komórek z danymi (liczby) 5. Dla średniej kwadratowej...
.. Czym może być do spowodowane. Aby WYSZUKAJ.PIONOWO działało poprawnie, baza musi być posortowana po kolumnie wg. której szukamy.
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"),...
Ok. Na aktywnym arkuszu jest OK. A co jeśli w docelowym pliku, arkusz z tymi datami jest ukryty? W takiej sytuacji powyższe kody się wysypują. Dodaję plik
Spakowałam dwa przykłady. W drugim przykładzie w kolumnie A, arkusza1 cyfra 5 pojawia się w tej samej kolumnie(A) a nie pojawia się w innych arkuszach "arkusz2 i arkusz3". Też jest brana za duplikat. Potrzebuje edycji kodu która pozwoli mi na dodawanie większej ilości kolumn(np 100) jak makro znajdzie duplikat w kolumnie A. Zdaje sobie sprawę że będzie...
można zrobić i funkcie któras będzie działała jak inne funkcje excela (np suma() z tym że za każdym razem przy wejściu do takiego pliku excela będzie monit o makro. Przyznam że nie jestem za dobry w makrach ale poprzez logiczne myślenie :) coś takiego stworzyłem Function KOMENTARZ(a As Integer, b As Integer) As String KOMENTARZ = Cells(a, b).Comment.Text...
Cześć, potrzebuję stworzyć makro które będzie usuwało kolumny po nazwie nagłówka. Liczba kolumn w arkuszu może się zmieniać ale nazwy kolumn będą te same. Dodaję przykładowy plik w którym chciałbym usunąć kolumny o nazwie "warunek" i "licznik". Myślałem o takim kodzie ale może można zrobić coś prostszego? Nie za bardzo też wiem jak poprawnie tym sposobem...
Hej, mam problem z hasłem na pliku excel. Mam makro zakładające hasło Sheets("DATA").Select ActiveSheet.Unprotect "HASŁO" teraz chciałabym zezwolić na odblokowanie edycji arkusza - mianowicie zmiany kolorów, czy ukrywania kolumn. Gdy ręcznie zakładam hasło na pliku mogę w checkboxach zezwolić na edycję danych i określi zakres, które mogą być edytowane...
Dziękuję za zainteresowanie. Odpowiadam na zapytanie w kolejności. 1. Plik Excela z rozszerzeniem .xls 2. Tak arkusz ma nagłówki, które ręcznie usuwam wraz z niepotrzebnymi mi kolumnami. 3. Skrót "scr" pochodzi od słowa screen oznaczające rzut ekranu. https://obrazki.elektroda.pl/3419958100_... https://obrazki.elektroda.pl/5743212300_...
Kolumna "A" określa grupy (tylko te pozycje, w których występują ukośniki). Kolumna "E" zawiera oznaczenia grup (P2 lub P). Dane do kolumn "A" i "E" wprowadza użytkownik. Kolumna "H" ma zawierać dodatkowe oznaczenia, na podstawie danych w kolumnach "A" i "E". Jeśli dane w "A" i "E" spełniają określone warunki, wtedy makro w kolumnie "H" dodaje kolejne...
Witam, jestem tutaj nowy. W Excelu poruszam się biegle, ale mam problem z Makrami i VB. Mam dwa pliki. Plan produkcji.xls w nim arkusz Produkcja i tam ma różne dane. Drugi plik to Zrobione.xls i arkusz zrobione. Chciałbym, aby w pliku zrobione po uruchomieniu Makra wypisało mi wszystkie arkusze ze statusem GOT. który jest w kolumnie N pliku Plan produkcji....
1. Klikam przycisk "Dodaj wiersz" 2. Makro dodaje jeden wiersz nad wierszem sumy zostawiając formatowania komórek. W tym przypadku numeruje z automatu kolejny wiersz w pierwszej kolumnie a drugi pozostawia pusty Uruchom sobie makro które jest w pliku to zobaczysz. Problem mam że przy wstawieniu tego makro i przypisaniu w nim zakresu "Tabela2" i tak...
Nie wiem czy to zadziała na Excelu 2002, ale możesz sprawdzić przykład z załącznika. Oparty na "zwykłych" formantach formularza - checkboxach. Jak klikniesz prawym -> Formatuj formant to we właściwościach masz Łącze Komórki, gdzie możesz ustawić powiązanie formantu z komórką - to ta pierwsza część. Druga - do checkboxa można przypisać makro, które zaznaczy...
Jak zmienić mu "For wrs = 1" na "For wrs = "zależne od ostatnio wczytanych danych - od ostatniej pozycji w kolumnie A Przez podstawienie Nr ostatniego wiersza do licznika pętli, 'For wrs = Range("A" & Rows.count).End(xlUp).Row to ....' Musiałbyś tylko sprawdzać, czy nie jest większy od drugiego argumentu (pętla pojedzie wstecz), lub dodawać stałą liczbę.
Wiesz co, za daleko to poszło tu pojawiają się jeszcze inne błędy. Musze to przemyśleć od początku. edit ----------------------------------------... Trzeba było tak zrobić od początku - nie było by tylu problemów. Skróciłem formułę ale dodałem "zamianę" danych co jest logiczne: Jeżeli godzina końca jest mniejsza od godziny początku to znaczy, że godzina...
to makro do "zabawy" Dodano po 2 jeszcze dwie wersje.... Pierwsza ile_wierszy, to może być niemal dowolna liczba sprawdzonych wierszy , można wpisać nawet tyle ile wierszy ma cała kolumna (zależy od wersji Excela) Chodzi o to by nie sprawdzać całej kolumny bo to może potrwać.... Skopiowane zostaną tylko niepuste komórki. [syntax=vba] Sub copy_cells()...
Sprawdź, jak to działa (załącznik). Nie wiem, jakbyś chciał liczyć ceny. Ja założyłem, że: - mamy na przykład 3 dostawy po 10 sztuk towarów, pierwsza dostawa ma towar za 1pln, druga ten sam towar za 2pln, trzecia ten sam towar za 3pln, to wtedy: - w przypadku, gdy ktoś kupuje po jednej sztuce, pierwsze elementy będą miały liczoną cenę zakupu 1pln, po...
Działa super! Tylko właśnie problem mam z tym aby do skopiowanych wartości dodał jeszcze dwie kolumny i przypisał tam wartości, które by pobrał z nazwy pliku. Przykładowo plik o nazwie 34_190_2023-05-19, w którym znajduje się 20 wierszy, makro kopiuje wszystkie + dodaje kolumnę z datą "2023-05-19" + kolumna z numerem "190" dla wszystkich 20 wierszy...
Witam mam ogromną ogromną prośbe o makro. W załączniku jest plik do którego potrzebowałybym makro. Mianowicie chodzi o tabelę pomiarów która jest cała na czerwono w arkuszu zar1 2.5st. Chodziłoby o makro które będzie odejmować,dodawać lub nic nie robić(+,-,= takie funkcje). W tabeli pomiarów znajdują się cztery kolumny: praca ciagła, postój 1 s, postój...
Makro zawsze można nagrać (Record macro - ikonka z niebieskim, zamalowanym kółkiem). Po włączeniu nagrywania, wykonujesz "na piechotę" działanie - w twoim przypadku dodawanie obu kolumn i umieszczenie wyniku w trzeciej kolumnie, a następnie przeniesienie wyników do kolumny docelowej. Po wykonaniu obliczeń, zatrzymujesz nagrywanie makro. W ten sposób,...
Witam, mam w sumie prosty problem ale nie wiem jak go ugryźć. Mianowicie: potrzebuję stworzyć makro , które będzie zaznaczało kolumnę do ostatniej nie pustej (ctrl+shift+arrow) wykonywało pewne działanie (powiedzmy dodawanie wartości w dwóch sąsiednich komórkach) i wyrzucało wynik w nowej kolumnie, ale tylko do wiersza, który jest nie pusty. Chodzi...
dodawać kolumna makro dodawać wartość dodawać wiersz makro
speaker workshop pomiary czujnik ciśnienia cyfrowy wzmacniacz ul1482
hotpoint ariston zmywarka hotpoint ariston zmywarka
Peugeot 3008 2009 – brak reakcji przedniej prawej szyby, nie działa silniczek, brak reakcji na włączniki Porównanie płytek antenowych SWA-9701 i SWA-955-5EX Turbo Quatro
