Witam. Mam taki problem potrzebuje skopiować dane z jednego arkusza do drugiego pod konkretne daty Arkusz1 Arkusz2 jak na rysunkach lub w załączonym pliku do arkusza 1 dane są pobierane z zewnętrznego pliku i nie mam na ich formatowanie wpływu
Witam, prosze o pomoc w utworzeniu makra, które bedzie kopiowało zakres danych z arkusza X do dowolnego arkusza np Y. Problem w tym że zakres danych z arkusza X jest przefiltrowany - dwoma warunkami po nazwie sklepu i po miejscowości. Chciałbym aby makro przekopiowało zakres już przefiltrowany do nowego arkusza Y. Moje makro kopiuje zakres danych ukrytych...
Coś pokręciłaś z tym hasłem. Odblokować trzeba ten arkusz, do którego dane będą kopiowane, czyli: [syntax=vbscript]Worksheets(2).Unprotect Password:="123"[/syntax]Potem analogicznie zablokować. Oczywiści można też z Activesheet pod warunkiem, że ten arkusz (docelowy) będzie aktywny. Arkusz źródłowy może być chroniony. Odblokowana musi być w nim tylko...
Potrzebuję pomocy przy stworzeniu makra do kopiowania zakresu komórek z Arkusza1 do Arkusza 2. Wybieram np. komórkę Arkusz1:D7. Makro kopiuje komórki C7, D7,E7,F7,G7 i H7 i wkleja je do Arkusza2(C15, H15). Wybieram drugą komórkę np. Arkusz1:D25 i makro wkleja zaznaczony obszar do Arkusza2 w kolejny wiersz(C16, H16). Makro powinno działać tylko przy...
Hej, potrzebuję pomocy w napisaniu makra. Dokładniej mówiąc mam excela z dwoma arkuszami. Arkusz 1 - zawiera dane takie jak (numer faktury, dostawca, kwota) Arkusz 2 - zawiera dane takie jak (id dostawcy, nr vouchera, kwota, data faktury, numer faktury) Są to dane wyciągane z dwóch różnych systemów i informacje takie jak nr faktury i kwota się powielają...
Przeszukałem już wszystko i naprawdę nie wiem jak zrobić. Mam 6 arkuszy na których powypisywane są dane w kolumnie A1. Chciałbym aby w ostatnim arkuszu excel wypisał mi wszystkie dane które są w kolumnie A1 w poprzednich 6 arkuszach. Z tym że te dane w niektórych arkuszach powtarzają się i nie chcę aby w ostatnim arkuszu wypisane były kilka razy tylko...
dobra a jak ustawić aby w pętli było podane lub przednia zdefiniowane wskazanie ktory to aktywny arkusz. Mam trzy Arkusze tj. Arkusz1 Arkusz 2 i Arkusz3 W arkuszu 1 mam dane które chce kopiować do Arkusza 2. bo po tej pętli chce realizować ten kod Sub copy1500() Dim r&, rw& Dim bs As Range, bw As Range Set bs = Sheets(1).Range("A:B") Set bw = Sheets(3).Range("A:B")...
Witam Mam problem ze stworzeniem makra. W zasadzie to nie wiem jak się za to zabrać . Parę miesięcy temu byłem na podstawowym szkoleniu z excel i tam miałem okazję napisać kilka prostych rzeczy i na tym moje doświadczenie się kończy. Widzę że na tym forum jest dużo ludzi którzy mają szeroka wiedzę na ten temat i mam nadzieję że ktoś zechce mi pomóc....
1b. Kod ma kopiować wszystkie na prawo arkusze z tego samego pliku i wszystko wrzucać do arkusza zbiorczo z ostatnim wierszem. Może opisze od początku moje działania: Mam plik XXX, w którym jest jeden arkusz o nazwie Panel. W nim mam różne porobione przyciski z makrami. Pierwszy przycisk pozwala mi na kopiowanie do mojego XXX danych z innych plików...
Witam, mam w Excelu do zrobienia zestawienie, które będzie bazować na kilku arkuszach. W każdym z arkuszy mam wspólną kolumnę "zlecenie" o określonej nazwie z dużą ilością wierszy, obok wiele kolumn z odpowiednimi opisami. W drugim arkuszu mam odpowiednio oprócz kolumny "zlecenie" kolumnę "nadzorujący zlecenie" i inne, a w trzecim arkuszu mam rozpisane...
Potrzebuje pomocy w stworzeniu makra które kopiowało by wybrane przeze mnie kolumny przez userform z arkusza ar2 do arkusza ar1 . W arkuszu ar2 znajduje się baza danych. Do arkusza ar1 chciał bym skopiować wybrane przeze mnie kolumny z arkusza ar 2 do kolejnej pustej kolumny. Wybór kolumn do skopiowania odbywa się przez userform, niestety na chwilę...
Witam proszę o pomoc przy opracowaniu pewnej reguły w excel. Chodzi o to, aby wypełnione komórki z arkusza 1 z kolumny X od wiersza 3 w dół, oraz wypełnione komórki z arkusza 2 od wiersza 3 w dół, były automatycznie kopiowane do arkusza 3 do pierwszej wolnej komórki w kolumnie E od wiersza 3. Można oczywiście z ręki kopiować właściwą komórkę do innej...
Dzień dobry, Bardzo proszę o pomoc z makrem, potrzebuje pętle które będzie miała za zadania kopiowanie i wklejanie w odpowiednie komórki między arkuszami aktualnie mam napisane makro ale niestety sam nie potrafię jeszcze stworzyć takiej pętli Dodano po 3 Mam już coś takiego ale jeszcze nie jest to co bym chciał osiągnąć Potrzebuje dla następnego wiersza...
Witam, całkowicie ciemny jestem jeśli chodzi o makra, a potrzebujący ;] mam arkusz w którym są z góry na dól 24 miesiące, imię nazwisko, NR_EWID_ przy miesiącach dla każdej kolumny są kwoty, każda kolumna jest przypisana do konkretnego nazwiska potrzebuje makro które pobierze dane z każdej kolumny i skopiuje je do drugiego arkusza ale w odpowiednie...
Samo wyszukanie odpowiedniego arkusza możesz zrealizować na dwa sposoby sposoby: 1. Jeżeli wiesz na 100%, że arkusz z kodem klienta istnieje:[syntax=vbscript]ost_w = Cells(Rows.Count, 1).End(xlUp).Row For w = 2 To ost_w kod = Cells(w, 1).Value Set wsDost = Worksheets(kod) Cells(w, "B").Value = wsDost.Range("A1").Value 'tu operacje kopiowania między...
Witam, Bardzo proszę o pomoc... Potrzebuję makro w Excelu, które będzie kopiowało po kolei komórki z wierszy z 'arkusza 1', wklejało je do 'arkusza 2' w odpowiednim miejscu, po skopiowaniu danych z jednego wiersza z 'arkusza 1', będzie drukowało 'arkusz 2' i jechało do następnego wiersza z arkusza 1 i robiło dokładnie to samo i tak aż do ostatniego...
Czyli algorytm mniej więcej taki: 1. Wyszukujesz ostatni arkusz i zapamiętujesz jego nazwę w zmiennej tekstowej, np Src. Metoda wyszukania dowolna, arkuszy jest zwykle nie tak dużo, można przejrzeć w pętli wszystkie. 2. Tworzysz w zmiennej np Dst nazwę nowego arkusza i tworzysz arkusz z taką nazwą: Sheets.Add.Name = Dst 3. Kopiujesz dane z jednego arkusza...
Dzień dobry, od kilku tygodni poznaję język VBA. Stworzyłam proste makro kopiujące dane z kolumny "I" ( z 3-ech kolejnych arkuszy) i wklejające te dane do arkusza o nazwie "oferta" do kolumn: I, J, K. W rzeczywistości arkuszy mam o wiele więcej, przykładowo piszę o 3-ech. Jeśli miałabym np. 30-ści arkuszy kod byłby bardzo długi i szukam rozwiązania,...
Witam Mam problem. Nie bardzo znam VBA, stąd zupełnie nie wiem jak napisać chyba proste makro. Proszę więc o pomoc kogoś, komu to nie sprawi większego problemu. Plik Excel ma 2 arkusze: Arkusz1 i Arkusz2. W obydwóch są takie same kolumny i podobne dane, które często porównuję. Arkusz1: - kolumna A - komórki A1:A500 zawierają ciągi 26 cyfr (komórka w...
Jesli ktos bedzie mial podobne pytanie odsylam do innego zrodla. 2 dni sie meczylem i mi pomoglo w dosyc podobnej kwestii: Niestety ale nazwy poszczegolnych arkuszy i dane z kolumny do makra wstawialem recznie. Jesli jest sposob na kopiowanie + tworzenie nowego arkusza o nazwie skopiowanej komorki bylo by super ;D Wydzielono z
Witam, proszę o pomoc. Jestem totalnie zielony jeżeli chodzi o VBA. W pliku znajduje się X zakładek. Ze stałego pola w każdej zakładce chciałbym skopiować dwie wartości, tak aby dane pojawiały się w formie tabeli. Znalazłem poniższy skrypt, ale zamiast wartości kopiuje formułę z arkusza źródłowego. Z góry dziękuję za pomoc S [syntax=vb]Sub test() 'Change...
Odwołanie, tak aby przy zmianie danych w kolumnie pierwszego arkusza, zmieniały się dane w komórkach A1. Nazwy arkuszy: Arkusz pierwszy: "zestawienie" w tym są dane do kopiowania kolejne arkusze: 9A 01, 9A 02 itd do 9A 120. Czy tworzenie takiego makra nie jest bardziej pracochłonne od ręcznego wstawiania odwołania w każdym arkuszu?
Witam Po krótce: na początku mam dwie zakładki Arkusz, lista Chcę wprowadzać błędy pracownikom i..nie obędzie się bez Waszej pomocy. Forma "arkusz" spełnia moje wymagania. Chciałbym by te dane zapisywało w takiej formie do nowej zakładki która utworzy się jako nazwisko. Oczywiście wiem że brakuje "guzika" zapisz ale nie tworzyłem go bo dalej i tak nie...
tak. Chodzi o to żeby do tego obszaru nie kopiował mi nikt niczego z np: przeglądarki internetowej wraz z formatami i psuł formatowanie warunkowe. Dlatego przewiduje dwie możliwość albo blokada na ten obszar albo wklejanie jako tekst. W innym obszarze posiadam komórki z formułami które kopiuje okresowo dlatego nie chciał bym blokady na cały arkusz.
Witam Potrzebuję pomocy w stworzeniu kodu do exela w vba Chodzi o to aby sprawdzało czy w arkuszu WIATR kolumnie 5 jest text np. POLE i w kolumnie 7 zawierało się w dacie między od a do i jeżeli te kryteria się zgodzą dla danego wiersza żeby skopiowało do drugiego arkusza DANE i wywołać podgląd wydruku. Dobrze by było aby można było wybrać do przypisania...
Mam 3 arkusze w jednym skoroszycie. w każdym arkuszu około 15 kolumn i 150 wierszy. Porzebuję makro, które w przypadku wystąpienia w kolumnie C danego arkusza wartości "TAK" (może występować w różnych wierszach), zwróci mi i skopiuje do osobnego arkusza dane z wierszy kolumn od C do F. Jak to ugryźć?
Nie ma potrzeby sprawdzania czy dane nie będą się powtarzać. Zakres kopiowany z arkusza źródłowego będzie zawsze wklejany do arkusza docelowego i nadpisze stare dane z ostatniego kopiowania a w międzyczasie wierszy przybędzie. łoj ! :) ... "ażem" se narobił roboty ... :) ... Zrobiłem makro, które sortuje dane w tablicy "niearkuszowej", tj. w pamięci...
Cześć, Jestem tutaj pierwszy raz i będę wdzięczny za pomoc. Mój problem polega na tym, że szukam marka, które zrobi tak: 1. W arkuszu 2 mam komórkę w której będę wpisywał wartość odpowiadającą liczbą w arkuszu 1, kolumna A. Obok komórki będzie przycisk do makra. 2. Po wpisaniu liczby, makro musi pobrać dane odpowiadajace poszczególnym komórką z wiersza...
Witam, Zwracam się do Was z zapytaniem o pomoc. Przejrzałem już dziesiątki podobnych wątków, ale odpowiedzi nie znalazłem. Dodam tylko, że jak większość jestem początkujący w tym temacie. Mam dwie zakładki, zlecenia i WZ chciałbym po zaznaczeniu dwóch check'boksow (odnoszących się do tego samego numeru zamówienia) i kliknięciu kopiuj, aby przerzuciło...
Witajcie mam pewien problem. Nie mam pojęcia jak skopiować autofiltr do innego arkusza. Mamy coś takiego: W pierwszym arkuszu "autofiltr matka" mamy kolumny z autofiltrem. w drugim arkuszu "autofiltr kopia" chce mieć połowę mniej wierszy niz w "autofiltr matka" - tzn chce mieć wybrane "rekordy". Innymi słowy: czy da się skopiować dane razem z zastosowanym...
Hej dzięki za szybki odzew. co do dookreślenia problemu "czy chcesz poszkukac napiert komorek Kod: 1 zmienna1 liczba a dopiero potem skopiowac po nich wystapienia Kod: 1 zmiennax liczba" Tak właśnie chcę zrobić - a jako że tych wystąpień jest sporo - to chciałbym żeby mi to zrobił automat. przy czym tak jak w moich "pięknych" wizualizacjach widać -...
Jednak szybciej było napisać makro:) W załączniku. Z tym, że w twoich danych (w załączonym pliku) dane, które chcesz kopiować znajdują się chyba w wierszu 8 a nie 37. Zrobiłem makro kopiujące dane z wiersza 8 pod warunkiem, że są mniejsze od zera. Ponadto, żeby data również się przepisała, musi znajdować się dokładnie 5 wierszy powyżej danych z których...
Hmm, to makro przed edycją, działa w miarę poprawnie. Dodałem tylko "*" by działało dla każdego wersji arkusza xls. * " Then[/syntax] [syntax=vb]Sub otworz_pliki2() Dim MyFile As String, arkusz As Worksheet, wkb As Workbook Dim wrs As Long wrs = 1 MyPath = "D:\Dane" MyFile = Dir(MyPath) Application.DisplayAlerts = False 'wyłączymy pytania o schowek,...
Witaj. poniżej kilka modyfikacji i załącznik do kodu. pokazujący w przybliżeniu o co mi chodzi. Plik '1.xls' to baza źródłowa, z której kopiuję kolumny, plik '2.xls' to miejsce docelowe. Są tam 2 zakładki. 1 to 'Dane', czyli miejsce docelowe, 2 to 'Dekoder' - zawiera nazwy wyszukiwanych kolumn. Cel jest taki by w bazie wyszukać kolumnę po nazwię i jeżeli...
Mam taki problem. Jest plik w nim dwa arkusze Arkusz1 i data. Arkusz data jest arkuszem jaki mogę wyciągnąć sobie z programu do obsługi stacji paliw. Każdego dnia zamierzam usunąć obecny i wstawić z aktualnymi danymi. Teraz mam karte drogowa i kolejno wprowadzam z niej dane. Kierowcę, daty, stan licznika wyjazd, stan licznika powrót. Teraz chodzi mi...
Pytałem o kopiowanie wierszy -jednak do mojego programu potrzebne jest "przestawienie" wiersza na inną linię. Pokrótce omówię dołączony kawałek programu. Chciałbym aby faktury mogły być wpisywane do książki w dowolnej kolejności , a program ustawiał je w/g dat. Program już kontroluje i nie przyjmie faktury z innego kwartału, jedynie w danym kwartale...
Witam ponownie. Pracuję obecnie nad makrem, które miałoby kopiować dane ze stworzonej wcześniej tabeli przestawnej do poszczególnych zakładek/zeszytów (które noszą nazwy osób) na dany dzień. Uwagi i założenia: 1. Tabela przestawna z danymi - daty jako wiersze, imiona i nazwiska osób jako kolumny (a w tabeli dane liczbowe do przyporządkowania). 2. Poszczególne...
Mam nadzieję, że nie zamęczam. Musiałem niestety odrobinę przemodelować tę tabelę stąd też pytanie - Co w poniższym kodzie, trzeba zmienić żeby zamiast kol. B,C,H przerzucał kol. B,C,V z arkusza "kontrole" (kolumny od R stanowią tablice pomocnicze - w zał. plik)? [syntax=vbscript] Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column...
A dlaczego za pomocą formuł? Nie można po prostu, po ustawieniu filtra zastosować metod kopiuj, wklej ( Ctr+C i Ctr+V), ? Jeśli nie, to ew. makro jakieś. andie
Dziękuję za podpowiedź ale nadal mam problem. Chroniony nie jest cały arkusz tylko sama tabela do której należy skopiować dane i tu pojawia się problem. Próbowałem na kilka sposobów i za każdym razem wyskakuje mi błąd, że podane hasło nie jest prawidłowe. Jakie polecenie należy wpisać aby makro potrafiło odblokować komórki tabelki excela? Dodano po...
Kolego. A co ja Ci wysłałem? Mam pytanie korzystam z bardzo podobnego kodu poniżej, ale pojawił się problem po skopiowaniu np 10 wierszy z arkusza 1 i następnie kopiowaniu kolejnych linii z arkusza 2, linie z arkusza 2 nie wklejają się w pierwszy wolny wiersz pod tymi 10-cioma z arkusza 1 tylko nadpisują się na 10-tym, kasują ostatni wiersz. Czy w...
Witam, Moi drodzy, problem jest... To znaczy ja mam, bo dla pozostałych to już problem być nie musi, jak znacie jego rozwiązanie :) Chodzi o tworzenie grafików dla osób pracujących na różnych maszynach (nazwy maszyn: M, M1, M2, D1, D2) z uwzględnieniem dni urlopowych (U), chorobowych (ch) i życzeniowo wolnych od pracy (x) - ten arkusze (zmiana 1 i zimna...
To można też zrobić filtrem zaawansowanym. Arkusz2 musisz sobie najpierw utworzyć i skopiować do niego wiersz z nagłówkami kolumn. Kolumna z NIPami musi mieć taki sam nagłówek we wszystkich arkuszach. Dla ułatwienia zdefiniowałem Ci nazwy obszarów, które są potrzebne. W Arkuszu2 uruchamiasz filtr zaawansowany (karta Dane). Jeśli na początku pojawią...
Mam makro. Obsługuje ono Arkusz z rejestrem, do wprowadzania danych. W innym arkuszu " Baza" jest tabela z min i max do porównania tych wpisów w rejestrze. Mam kompletnie inną tabelę i nie mogę mieszać tych tabel, więc kopiowałem kod w inny Arkusz, i podawałem ścieżkę do innej Bazy. Niestety nie chce to tak działać . Czy chodzi o script.dictionary?...
Dopisuję się do pytania :) Dlaczego nie wykorzystać wbudowanych narzędzi Windowsa lub Excela? Np: zaznacz pierwszy arkusz, naciśnij i przytrzymaj klawisz [Schift], zaznacz ostatni, prawym pm w dowolną zakładkę (nazwę) arkusza, z menu wybierz [Kopiuj], w okienku wybierasz nowy lub docelowy plik, zaznaczasz opcję [utwórz kopię], klikasz [OK] i gotowe....
Porównanie zrobiłem w ten sposób że w arkuszu mam utworzoną pomocniczą komórkę w której zawarta jest informacja który wiersz został aktywowany. Potrzebne mi to jest do tego żeby w aktywowanym oknie UserForm pokazywało mi pracownika z wiersza z aktywnej komórki. Wykorzystałem to i dałem poniższy kod. Ostatecznie po skończeniu się listy pracowników okno...
Witajcie! Mam gorącą prośbę odnośnie stworzenia makra w VBA. Mam plik Roboczy.xls na którym pracuję - spis różnych danych, również powtarzających się, oraz plik Zbiór_danych.xls gdzie mam bardzo dużo informacji (w założeniu kilka tysięcy). Chciałabym aby do Roboczego wyszukiwał dane w Zbiorze i kopiował je do odpowiednich komórek w pliku Roboczym ,...
Mam makro które powinno kopiować dane liczbowe z zakresu A1:C10000, nie wiem czy działa - albo nie umiem odpowiednio tego sprawdzić, albo nie działa. PS dostałam takie zadanie. Nigdy nie pracowałam z tablicami - nawet nie wiem gdzie je znaleźć :(at) Poniżej makro Proszę o pomoc :) w sprawdzeniu czy działa i ew. info jak to się sprawdza... gdzie podgląda...
Kryterium wyboru zawsze będzie takie jak jest - data od, data do i numer klienta. Chce aby ten arkusz drukował się jeszcze i zajmował jedną stronę drukowała się jeszcze i mieściła na jednej stronie. Czy może istnieje jeszcze możliwość zliczania ile razy dana opcja występowała np. kredki jak byśmy mieli taką listę powtarzalnych się rzeczy ?? Czyli doszedł...
[syntax=vbnet]Sub Bazy() On Error Resume Next Dim a As Worksheet, b As Worksheet Set a = Sheets("Baza danych A") Set b = Sheets("Baza danych B") a.Select owa = Cells(Rows.Count, "B").End(xlUp).Row owb = b.Cells(Rows.Count, "C").End(xlUp).Row For x = 5 To owa w = "" w = Application.Match(Cells(x, 2), b.Range("C5:C" & owb), 0) + 4 If w > 0 Then Cells(x,...
No, w takiej formie to można już coś tam pokombinować... Zobacz pliki z załączników. Po kliknięciu przycisku "Import order" możesz wybrać plik z zamówieniem - ważne, żeby miał taki układ danych, jak w testowym zamówieniu. Plus wszystkie rzeczy, o których wcześniej mówiłem - wyjątkiem jest lista klientów w pliku produkcyjnym - jednak nie musi być taka...
[syntax=vbscript]Sub ImportujMaszyny() Set r = Sheets("Arkusz1") Set i = Sheets(2) owr = r.Cells(Rows.Count, "A").End(xlUp).Row owi = r.Cells(Rows.Count, "A").End(xlUp).Row For w = 4 To owr Step 14 nr = r.Cells(w, 2) s = Application.Match(nr, i.Range("C1:C" & owi), 0) If s > 0 Then d = i.Cells(s + 1, 3) d = DateSerial(Year(d), Month(d), 1) wr = Application.Match(nr,...
Witam, mam nastepujacy problem: "zrodlo" - posiadam np. 10 zakladek z takim samym ukladem - sa to zakladki z ktorych chce kopiowac dane "cel" dane chce kopiowac do 40 innych zakladek (kazda zakladka posiada swoj numer np. 5455) - numer ten jest wpisany "x" razy w zakładkach "zrodlo" w kolumnie A. w jaki sposob napisac makro które bedzie do zakladek...
[syntax=vbscript]Sub Kopiuj() Sheets("Dane").Select OW = Cells(Rows.Count, "J").End(xlUp).Row nr1 = 2 nr2 = 2 For x = 2 To OW If Cells(x, "J") = "O" Then Rows(x).Copy Sheets("nr 1").Range("A" & nr1) nr1 = nr1 + 1 End If If Cells(x, "J") = "W" Then Rows(x).Copy Sheets("nr 2").Range("A" & nr2) nr2 = nr2 + 1 End If Next End Sub[/syntax]
Dziekuję bardzo za odpowiedź, makro prawie działa tak jak chciałem. Ma tylko jeden problem łączy dane w wiersze które nie powinien. Dla przykładu pierwszy wiersz w Arkuszu2 powinien mieć dane od A3:A18 z Arkusza1 później drugi wiersz w Arkuszu2 powinien mieć dane od A20:A22. Punktem który ma definiować kolejne wiersze jest pusta komórka
Oczywiście makra mogą (prawie) wszystko. :) Ja czegoś takiego raczej bym wolał nie robić. Przemyśl jeszcze raz czego naprawdę potrzebujesz. Może pomogą Ci w tym poniższe uwagi. Nie lubię niczego uruchamiać "wejściem" w komórkę, działa "topornie". Robię to tylko jeżeli nie ma innego (prostszego) wyjścia. Zwykle lepiej działa normalny przycisk uruchamiający...
Do importu danych które do tej pory obrabialiśmy już dużo wcześniej nagrałem makro i wszystko działa. Dorobiłem do tego przycisk i jest OK. Teraz muszę nagrać kolejne makro, które zaimportuje plik wlasciciel.csv (plik zawsze będzie miał tą sama nazwę). Potem trzeba będzie do tego mara dopisać warunek żeby wykonało się pod warunkiem, że plik istnieje...
Witam, Myślę że po dwóch latach trochę bym inaczej ten kod dzisiaj napisał (czytaj: uprościł), mianowicie: n , domyślnie równą Nothing .
To jest moje pierwsze makro, które skleiłem z pewnie 10 innych:) każdy urywek tego makra szukałem osobno i "kleiłem" w jedność. Tak więc jak widać, nie wiele mam zdefiniowanych zmiennych, ani SET ani DIM :) Także wiem, że całe moje makro można by było w prostszy sposób napisać, ale na tą chwilę zbyt skomplikowane to dla mnie. Błędu już żadnego nie wyrzuca....
Witam. Czy ktoś wie jak napisać kod VBA dla excela, który automatycznie by uruchamiał się przy każdorazowym otworzenie skoroszytu by wykonywał takie oto polecenie: Skoroszyt zawiera 8 arkuszy. W pierwszym arkuszu jest tabela z zakupami zrobionymi w poniedziałek w postaci: nazwa_towaru, cena, ilość, suma W drugim arkuszu jest taka sama tabela tyle że...
Witam, Mam następujący problem. Mam arkusz o zmiennej ilości wierszy. Wypełnione kolumny zawsze od A do J. W kolumnie A występują kody, kody mogą się powtarzać- dla ułatwienia jeśli się powtarzają są jedne pod drugim ale nie ma stałej określonej liczby powtórzeń. Chodzi mi o to by makro sprawdzało kod w kolumnie A - unikat kopiujemy do Arkusza 2 z wartościami...
Czy można zmodyfikować poniższe makro Pewnie można ... jak się komuś będzie "chciało chcieć" ... : ) ... ale wpierw parę uwag dla przyszłych twoich "modyfikacji": 1. xlOpenXMLWorkbook - podawałbym kody liczbowe (w tym przypadku jest to 51) zamiast nazwy stałych, będzie bezpieczniej jeśli plik będzie otwierany w różnych wersjach excela: Function CopyDataRangeP...
Witam, mam następujący skoroszyt: potrzebuję napisać makro bądź jakąś formułę która podczas wstawiania literki X w kolumnie nazwiska np. Martyka będzie przenosić cały wiersz z wszystkimi danymi do arkusza "Martyka". Kolejne zaznaczenie w kolumnie Martyka ma dodawać kolejny wiersz w arkuszu Martyka. Mam nadzieję że nie za bardzo zagmatwałem sprawę, szef...
Witam. Domyślam się że to co potrzebuję jest bardzo proste. Mianowicie potrzebuję pomocy żeby stworzyć przycisk dzięki któremu będę mógł kopiować wartości z jednego arkusza do aktywnego arkusza (w którym znajduje się przycisk) do konkretnej kolumny z tym żeby jak będzie kopiować do kolejnego pustego wiersza. Czyli np. po naciśnięciu przycisku z arkusza...
w tym pliku wszystko działa jak należy. korzystałam z kolegi pliku"ProtTtablica.xlsx" i przez to powstała pomyłka.Przepraszam kolegę za to. Dziękuje za pomoc. Mam inne pytanie. w swoje dane przerzuciłam kolegi makro i jest problem. Makro nie wywala żadnego błędu, ale nie kopiuje danych, nie wiem dlaczego? Dodano po 35 Witam. Makro działa. Ślicznie dziękuje...
Witam, Rzeczywiście w Arkusz2 jest szablon(formularz), który ma być wypełniany z wybranego wiersza Arkusza1 i następnie drukowany. Kol. E celowo została pominięta. Dane z tej kolumny (i kilku innych) są kopiowane do innego arkusza, ale do wierszy. Tzn. dane z wybranych kolumn konkretnego wiersza są kopiowane do innego wiersza, tu nie ma problemu bo...
Witajcie, mam dość według mnie ciężki temat do zrobienia, częściowo poruszany w tym wątku. Chciałbym aby makro kopiowało dane uzupełnione przez pracowników z poszczególnych arkuszy do Arkusza PH1 i wklejało dane jedno pod drugim. Czyli sprawdzało który wiersz jest ostatnim w którym już są dane w PH1 i wkleiło je pod nimi. I tak po kolei z każdego arkusza...
Masz ten problem w każdym arkuszu czy tylko w jednym, konkretnym? W Office 365 v. 2202 nie zauważyłem takiego problemu. niestety w kazdym, nie zauwazylem jakiejs reguly. Arkusz moze byc strzowony od zera przeze mnie, albo przeslany przez kogos (niekoniecznie z tej samej wersji office). Nie ma tu tez specjalnych funkcji, dodatków czy czegokolwiek. Ten...
Witam, Czy może ktoś pomóc mi z makrem które będzie kopiowało dane z excela i przechowywało je w tablicy (chcę kopiować wszystko zarówno wartości jak i formuły) Sub Makro1() - makro działa tylko na komórkach w excelu For i = 1 To 5 Step 1 cells(i, 1).Select Selection.Copy cells(i, 2).Select Selection.PasteSpecial Paste:=xlPasteAll,...
To znaczy, że coś nie zgadza się z założeniami. Prawdopodobnie nazwy plików. Zapuść takie makro (aktywny arkusz z przyciskiem) [syntax=vb]Sub sprawdz() sciezka = Range("G11") plik = Dir(sciezka & "*.xls") While plik <> "" licz = Len(plik) - Len(Replace(plik, " ", "")) If licz > 1 Then MsgBox "plik " & plik & " ma w nazwie " &...
1) Dostaje plik z raportem 2) cały arkusz kopiuje do arkusza TEMP w pliku (WYSYŁKI_NOWE) 3) dokładnie tak jak napisałeś :)
Zrozumiałem (w końcu) :) Kłopotem jest tu ilość tych arkuszy Ex1. Żadna formuła z bezpośrednim wskazaniem komórek źródłowych nie wejdzie bo będzie za długa. Prawdę mówiąc lepiej by było to "łączyć" w accessie. Może zrobić 12 plików pomocniczych z 70 arkuszami i jednym głównym sumującym te arkusze. Każdy z arkuszy byłby połączony z konkretnym plikiem...
Przepraszam za złe gramatyki to tłumaczenie maszynowe dla C działa nie wiem jak to wytłumaczyć, mam rosyjskiej wersji eksel′, ale formuły ma Pan zobaczyc na polski, i nie wiem który zapis Przenieś zdjęcie formuly tutaj w ogóle formuła to linki do nazwy arkusza w kolumnie b i adres taki jak w bieżącej komorkie
[syntax=vb]Sub PobierzDzisiejszeDane() Application.ScreenUpdating = False Dim Sciezka As String, Plik As String Sciezka = ThisWorkbook.Path p = Date & ".xlsx" Plik = Sciezka & "\Dane\" & p If Dir(Plik) = "" Then MsgBox "Brak pliku z dzisiejszą datą." Exit Sub End If Workbooks.Open Filename:=Plik Sheets("Dzisiejsze dane").Select ow = Cells(Rows.Count,...
Cześć, Jestem początkującą osobą w kwestii VBA, więc mam nadzieję, że dobrze trafiłem i mogę liczyć na waszą pomoc, ponieważ chciałbym rozwinąć swoje umiejętności w manualnym tworzeniu makr niż nagrywaniu. Sytuacja jest następująca: Mam dwa arkusze, z czego do jednego codziennie przeklejam dane, które otrzymuje e-mailem - arkusz1 (zawsze w takiej samej...
Chyba mi się udało:) Sub Kopiuj_dane() Workbooks.Open Filename:="H:\BBB\Dane.xlsm... With ActiveWorkbook.Sheets(1) Intersect(.UsedRange, .Range("A2:F5000")... _ Destination:=ThisWorkbook.Sheets(... Application.CutCopyMode = False Workbooks("Dane.xlsm")...
Poszukuję makra, które z 1 arkusza o nazwie "dane" wykopiuje dane do nowych arkuszy w takim samym formacie względem np. kolumny K - wynik działania makra powinien być podobny (tylko dla wszystkich unikatowych danych z kolumny K) jak w załączonym pliku w arkuszu P001 (makro powinno nadać nazwę dodawanym arkuszom
Dzięki adamas_nt za super pomoc. Mam niestety jeszcze jeden, a w sumie dwa problemy. Niby wszystko działa ale po kilkukrotnym użyciu BUCHEN przestaje działać funkcja CLEAR z Makra. Nie wiem dlaczego. Czy jet to zależne od pętli ? Drugim problemem jest brak możliwości filtrowania wyników w poszczególnych arkuszach. Niby w makrze dopisałem Kod AllowFiltering...
Witam, otóż czy jest ktoś w stanie podpowiedzieć jakiego kodu użyć aby automatycznie wyfiltrować dane: Mianowicie: mam zakres danych z którego chciał bym wyfiltorwać dane z arkusz po zakresach wartości : 31 , 33 , 35 mianowicie każdy zakres ma swój arkusz do którego chciał bym żeby przekopiowało dane. po czym filtruje kolejny zakres i tak w kółko aż...
Hej, kolumna ma być zastąpiona nowymi danymi, najlepiej jakby wklejało same wartości. Dodano po 12 Wrzucamzrzuty pliku przykładowego, potrzebuje makro które do dni widocznych w arkuszu pierwszym odnajdzie w arkuszu drugim odpowiadające im kolumny, i je skopiuje (same dane, bez nazwy kolumny) po czym wklei je do arkusza pierwszego w odpowiednie miejsca....
Siema, Mam napisane makro vba, żeby kopiowało mi dane z komórki zawartej w aktywnym pliku excel do drugiego aktywnego. Pisałem to na dwa sposoby i za każdym razem wywala mi błąd. Poradźcie proszę. Będę wdzięczny za każdą pomoc! 1. Tutaj wywala błąd - Compile Error: Sub or Function not defined. Sub screen() ' ' screen Macro ' ' Workbook(cale.xls).Activate...
Witam. Potrzebuje makra, które kopiuj dane z arkusza Excela "BAZA" do arkusza excela "baza1" i usuwa duplikaty (imie i nazwisko) które występują kolejny raz w kolumnie C. W arkuszu "baza" funkcje Excela muszą zostać. Przeszukałam internet i nie znalazłam kodu.Wierszy będzie maximum 100 z których należało by usunąć duplikaty.
Cześć, przejrzałam podobne tematy do mojego problemu ale niestety nie potrafię tego odzwierciedlić w moim zadaniu. Chodzi o to że mam dwa pliki A i B. Plik A jest aktywny i w nim chcę żeby działało makro, które ma na celu: -otworzyć plik B Arkusz2 i wyszukać liczb które znajdują się w plikuA w kolumnie A. Jeśli je znajdzie to przekopiować z tego samego...
Jak się uczyliśmy? Praktycznie. Wiem, to niezupełnie prawda, teoria też musi być, ale ja ją poznałem już dawno, a składni VBA ciągle nie mogę zapamiętać. :) Myślę, że takie kopiowanie musisz się nauczyć robić sam, a nie pytać. Jeżeli nie umiesz kopiować komórek (w Excelu to podstawa) to nikt nie może ci pomóc. Potem zrób to samo w pętli i już masz kawałek...
Proponuję: 1) Zamiast formuły z funkcją JEŻELI zastosować formułę z funkcją MAX. Uniknie się w ten sposób dwukrotnego odwołania do tych samych danych. 2) Jeżeli będziesz przestrzegał zasady, że nowe arkusze są dodawane zawsze na początku (a nie na końcu, jak robi się zazwyczaj), to będziesz potrzebować zawsze odwołań do następnego arkusza w kolejności....
Generalnie wydaję się, że działa wszystko tak jak potrzebuję No to git.:) A co z tym: :) Teraz zastanawiam się, czy jest opcja, rozbudowania tego żeby nie pozwoliło skopiować danych jeśli odpowiednia komórka w arkuszu '2020' była już wypełniona. Czyli chcę wyeliminować potencjalne błędy pracowników. Najlepiej żeby pojawiało się jakieś info, że ma pracownik...
Wklejać danę będe do innego skoroszytu . To dlatego brakowało tego arkusza "Dane" w Twoim pliku :?: :D Jeśli tak nieprecyzjnie wszystko opisujesz to wprowadzasz w błąd wszystkich, którzy Ci pomagają :cry: Makro kolegi PRL będzie Ci kopiowało określony zakres danych tylko do arkusza Dane w tym samym skoroszycie :!: Następnym razem postaram się wszystko...
Na forum jest wiele podobnych tematów, poszukaj. P.S. W załšczonym pliku nie widać Twojej walki.;) walcze z tym juz od 2 dni przeczytalem juz chyba z 50 stron tematow.. masakra jakas.. probuje z roznych tematow.. udalo mi sie jedynie cos takiego ze kopijuje mi po nacisnieciu przycisku do nowego arkusza ale nie jako nowa kolumna tylko jako wiersz Dodano...
Cześć, chciałbym żeby mój kod kopiował dane z jednego workbooka do drugiego workbooka. W pierwszym workbooku jest wiele arkuszy i w drugim workbooku również. Z każdego arkusza z pierwszego workbooka kopiuje dane do konkretnego arkusza w drugim workbooku. Z racji tego że dane mogą się zmieniać zastosowałem lRow i lCol żeby liczył dla każdego arkusza...
Przejżalem wiele wątków na różnych forach, jednak nadal mam problem z automatyzacją łączenia danych. Niestety nie jestem zbyt biegły w VBA. Mam plik xls z czterema arkuszami. Poerwszy arkusz to "MAPOWANE". W nim mają się znaleźć dane z pozostałych. Problem polega na tym, że ilość wierszy jest zmienna. Pierwsza kolumna zawiera dane unikatowe w obrębie...
niestety cały czas powyższe makro mocno obciąża. Może takie rozwiązanie będzie lepsze: Arkusz1 wprowadzamy dane Arkusz2 w tym arkuszu są formuły do wprowadzanych danych w Arkuszu1 Arkusz3 znajduje się z 1000 pozycji Makro na podstawie liczby lp w arkuszu kopiuje odpowiednią ilość lp z Arkusza3 do Arkusza2. np: W A1 lp=120 W A3 lp=1000 do A2 na podsawie...
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! Może ktoś pomoże. Problem jest nastepujący: W arkuszu1 mam dane: Kolumna A ( np: 20 nazwisk), kolumnach B,C,D dane handlowe dotyczące tych 20 ludzi. Codziennie wpływają nowe dane. Nastepne arkusze 2,3...21 nazywam nazwiskami tych handlowców, w których mam już skopiowane dane z poprzednich dni. Kopiowanie odbywa sie recznie.To jest:Kopiowanie...
Witam Poszukuje wsparcia w wyszukaniu, wyswietleniu i wybraniu arkusza z którego będę chciał skopiować dane do drugiego arkusza. Posiadam dwa skoroszyty. W pierwszym znajdują się dane w wielu arkuszach " około 25". Teraz w skoroszycie drugim po wybraniu opcji kopiuj chcę mieć możliwośc wybrania z którego arkusza ze skoroszytu pierwszego kopiuje ustalony...
Z arkusza1 robię raporty w osobnych arkuszach Efekt taki jak na zrzucie 1041538 automatycznego kopiowania wyfiltrowanych danych z arkusza1 do kilku arkuszy :idea: (z nazwami arkuszy wg filtrowanych danych :D ) można zrealizować przykładowo tak jak w załączonym pliku. 1041541 Makro można uruchomić skrótem klawiaturowym ctrl+r :!: , dla dowolnej (jeśli...
Witam, Chciałbym poprosić o makro które kopiowało by nazwy wszystkich Arkuszy z pliku i kopiowało je kolejno do pierwszego arkusza. Plik zawiera wiele arkuszy od Arkusz 1 do Arkusz n (o różnych nazwach). Chciałbym aby jego lista pojawiała się się w pierwszym arkuszu "Lista"od komórki A2 do ilość arkuszy. Dodatkowo w każdym z arkuszy jest "check box"...
Witam, Mam problem z edycją Makra (poskładanego z kilku znalezionych, nieco edytowane). Makro tworzy już dodatkowe arkusze zmieniając ich nazwę. Wybiera i zapisuje dane od 2 wiersza w nowych arkuszach. Chciałbym jednak by zaciągał również pierwszy wiersz z arkusza "OPIS" jako nagłówek. Zależy mi również na tym, by automatycznie edytował również szerokość...
Cześć. Prośba o wsparcie w rozwiązaniu poniższego problemu. Mam kod do dzielenia na pliki (zapożyczony gdzieś z sieci). Do tej pory spaniał w 100% moje oczekiwania, ale teraz potrzebuję dodatkowej funkcjonalności. Makro zapisuje każdy arkusz jako odrębny plik za wyjątkiem trzech wykluczonych prze ze mnie. Pierwszy to plik z danymi źródłowymi. Dwa kolejne...
Mój poziom znajomości VBA przyznam wam się jest na poziomie zero! Nie wiem czy jest to możliwe, jeśli nie jest trudno dałem plamę na cła Polskę, a kto wie może i na cały świat. Zaryzykuje i za pytam. Czy jest możliwe podanie w exelu w podanie określonych danych w exelu: 1. określonej ścieżki w jakieś komórce exela i makro pobiera sobie tą ścieżkę i...
Zamknęłam tamto zadanie a mam jeszcze 3 pytania extra do makra, które stworzył (at)prl . Post dokleiłem do wczesniejszego wątku i odblokowałem go. W przypadku chęci kontynuowania zamkniętego wątku zawsze można zgłosić go do moderacji (raportując którykolwiek z postów w nim) z prośbą o ponowne otwarcie. 1. Makro dzieli skoroszyt na osobne skoroszyty...