Witam, Potrzebuję przerobić kilka tys. rekordów. Pewnie to banalne makro ale jestem zielony :( Chcę skopiować wiersz 8 i wkleić go w miejsce 11 i 12 i dalej 13 w miejsce 16 i 17 itd. Lub analogicznie pole A8 kopiuj-wklej w miejsce A11 i A12 i dalej jak wyżej (bo dane i tak mam w tej jednej kolumnie). Pomoże ktoś?
Witam Potrzebuje aby makro, ktore kopiuje mi wiersze pokazywało mi ostrzeżenie jeżeli liczba wierszy kopiowanych jest mniejsza niz 24 Chyba wiem jak uzyskać liczbę wierszy ale nie wiem jak zrobić aby msgbox pokazywał sie tylko przy warunku ostatni wiersz jest różny od liczby 24 a jeśli jest spełniony to ma lecieć dalej ostatniwiersz = ActiveSheet.UsedRange.Rows.Count...
Witajcie, Napisałem makro kopiujące cały wiersz. Problem mam z tym, ze jak bierze już dany wiersz do kopiowania w którym są checkboxy i kazdy z nich ma jakieś odwołanie, to wkleja wiersz ponizej już z tym odwołaniem. Nie wiem jak zrobić aby odwołanie się nie kopiowało, a checkbox tak. Poniżej wklejam kod: [syntax=vb]Sub WstawPo(SearchedRn As Excel.Range,...
Drodzy Forumowicze, pracuję nad makrem, które plik csv z danymi dotyczącymi miesiąca (np. stycznia 2006 - załączam do postu ), "przerobi" na pliki dobowe o nazwie pliku w formacie rrrr-mm-dd. W kolumnie A załączonego pliku zawiera się czas i data w formacie: rrrr-mm-dd gg:mm (dane zapisywane są co minutę, dlatego występuje również godzina). Kolumna...
Wydzielono z Witam Podepnę się pod temat i troszeczkę odświeżę. Mam podobny problem z kopiowaniem, muszę tworzyć raporty i kopiuję oczywiście ręcznie (całkowicie nie znam się na makrach). W załączniku zamieściłem plik z tym o co mi chodzi. Z arkusza1 robię raporty w osobnych arkuszach i miło by było gdyby one same się tak kopiowały z pomocą przycisku....
Przedstawione makro kopiuje drugi wiersz arkusza "Schell" z każdego pliku umieszczonego w podrzędnym katalogu o nazwie "xls" do pierwszego pustego wiersza arkusza o indeksie 1. Nie można skopiować pliku do pliku. Natomiast można skopiować całe arkusze lub wyznaczone zakresy poszczególnych arkuszy. Opisz stosując właściwe nazwy obiektów. Lista plików...
Witam. Poniższy kod z VB Excel potrzebuję przerobić na C# tak by wyświetlał się w datagirdview. Zadaniem kodu jest zliczanie wierszy o takiej samej nazwie w kolumnach A:B, sumowanie wierszy w kolumnie D, usunięcie policzonego wiersza. [syntax=vb] Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2011-09-22, autor sidsysunia ' ' Klawisz skrótu: Ctrl+q...
Witam. Zachwyciłem się programowaniem VBA i ulepszam swój arkusz kalkulacyjny. Bardzo przydała by mi się funkcja prezentowana w tym filmiku: Posty scaliłem, zamykam temat. RADU23
Witam, potrzebuję makro do Excela w VBA. Łamie sobie głowę, żeby to napisać i może ktoś umiałby to poskładać w sposób logiczny w makro. Z góry mówie, że to wygląda na dość obszerne makro ale myśle, że dla kogoś kto dobrze ogarnia VBA nie będzie z tym miał problemu. Dla mnie jest to troche ciężki temat :| Program ma kopiować komórki J2:J, K2:K, L2:L...
Witam ponownie Dzisiaj proszę o pomoc w zwiazku z tematem, który czesciowo rozwiazalem. Mam kilkanascie plikow o nazwie: litera alfabetu.xlxs, czyli: a.xlxs, b.xlxs, ... W nich sa zapisane wartosciami 3 kolumny: A B C Z tych kolumn potrzebuje skopiowac kolumny B i C (jedno pod drugim)do nowego pliku, w ktorym mam przycisk i do niego przypisane makro....
Witam wszystkich forumowiczów! Jestem absolutnie początkujący jeśli chodzi o programowanie w VBA w Excelu, a potrzebne mi jest makro, które (po jego aktywowaniu np. kombinacją klawiszy) wytnie jeden wiersz z jednego arkusza i wstawi go do drugiego, w pierwsze wolne miejsce. Skoroszyt będzie się składać z 3 Arkuszy. Chciałbym, aby była możliwość przenoszenia...
cześć, napisałem makro które kopiuje mi dane z nowo otwieranego pliku do tego, które chce. Tylko że robi to w wersji jeden do jednego, a ja potrzebuję rozwiązania na przesunięcie tych danych do innej kolumny tak aby dane nie były wklejane dla mnie w kolumnie A tylko B. Macie jakieś proste rozwiązanie na to? [syntax=vb] Sub Makro1() ' ' Makro1 Makro...
Witam Mam do uzupełnienia dość spory arkusz. Zazwyczaj chodzi o wpisanie wartości w dwóch komórkach, ale często sprawy się komplikują i muszę wstawić nowy wiersz, skopiować kilka potrzebnych komórek z wiersza powyżej (nie wszystkie), wprowadzić zmianę w jednej komórce i sformatować wiersz. Jako, że jest tego dość dużo, a czasu mam mało, chciałem użyć...
W jednym arkuszu co jakiś czas jestem zmuszony tworzyć min. 5 wierszy (odpowiednio sformatowanych) i jest to dosyć czasochłonne, dlatego od kilku dni zmagam się z napisaniem makra, które by to trochę usprawniło. Chodzi o to aby przez buttony móc kopiować 5 wierszy z jednego arkusza do drugiego w odpowiednim miejscu. Problem polega na tym, że te miejsca...
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...
Witam potrzebuję pomocy w stworzeniu makra w Excelu 2007. Potrzebuję kodu który przepisze wiersze do nowego arkusza po spełnieniu poniższych kryterium: Zakres analizowania: Od wiersza 12 kolumna B Do wiersza 111 kolumna P Makro: jeżeli w arkuszu nr 1 w kolumnie P z zakresu wierszy od P12:P111 znajdzie się wartość większą (różna) od „0” (wynik...
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...
Witam To makro realizuje kopiowanie wszystkich plików znajdujacych sie w katalogu do jedengo. Sub Merge() Dim bookList As Workbook Dim MergeObj As Object, dirObj As Object, filesObj As Object, everyObj As Object Application.ScreenUpdating = False Set MergeObj = CreateObject("Scripting.FileSystemObject... Set dirObj = MergeObj.Getfolder("C:\2014") Set...
Witam serdecznie, To mój pierwszy post na forum, tak więc prosiłbym o wyrozumiałość :) Prosiłbym o pomoc w sprawie kopiowania zawartości z jednego arkusza do drugiego na pdst konkretnej zmiennej. W Arkuszu1 mamy listę zamówień firm. Kolejnym arkuszem jest WZ. Chodzi o to, aby po wybraniu z listy numery zamówienia dane uzupełniały się z pierwszego zamówienia....
Witam, ten [url=]Link temat idealnie wpasowuje się w mój problem. Czy można przerobić makro z postu #11 [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next w = Target.Row k = Target.Column If k = 7 Then If Target.Value > 1 Then a = w + 1 b = a + Target.Value - 2 Rows(a & ":" & b).Select Selection.Insert Shift:=xlUp,...
Witam Was, w VBA jestem zupełnym amatorem, w zasadzie korzystam z nagrywania. Pojawił się pewien problem Mam jeden plik z którego chcę kopiować zawsze te same zakresy komórek, do innego pliku. Zasada jest prosta otwieram jeden plik bazowy z którego kopiuję dane i wklejam w pasujący zakres w drugim otwartym pliku, plik do którego kopiuję zawsze ma inną...
Witajcie, Mam taki przykład. Handlowcy, region, punkty. Potrzebuję aby z arkusza "dane" kopiowały się wiersze w zależności od regionu. Tj wszyscy handlowcy z południa do arkusza "południe", ci we wschodu do "wschód" itd. Mam takie makro. Sub CopyWhenConditionMet() a = Worksheets("dane").Cells(Rows.Count, 6).End(xlUp).Row For i = 2 To a If Worksheets("dane").Cells(i,...
Witam, Potrzebuje stworzyć makro wyszukujące odpowiedni numer z zakresu w innym pliku i kopiujące dane. Posiadam dwa pliki: AMSTERDAM_SPC-Carbody shell_v2 oraz SPC_Raport Zadanie makro: W pliku SPC_Raport -> zakładka ‘Geometria’ znajduje się nr KTW (wpisywany z ręki) komorka Z7: Z pliku SPC_Raport Makro musi skopiować ten numer KTW i wyszukać...
Witam, Potrzebuję pomocy z napisaniem makra (najlepiej gotowca ze względu na znikomą znajomość VBA), które będzie miało za zadanie automatyczne skopiowanie wartości w komórki poniżej w zadanym zakresie (by robić to etapami). Moja wiedza kończy się na tym etapie: [syntax=vb] Sub Makro2() ' ' Makro2 Makro ' Range("C39:D39").Select Selection.Copy Range("C40").Select...
Witam Mam takie proste makro które sprawdza czy w komórce G jest wpisane BBBB jeśli tak to komórkę I koloruje na zielono jeśli nie to koloruje na niebiesko kod wygląda tak Sub Makro1() If Range("G6") = "BBBB" Then Range("I6").Interior.ColorIndex = 4 Else Range("I6").Interior.ColorIndex = 5 End If End Sub Tabelka tak : BBBB 1220 BBBB 1220 BBBB 1220 BBBB...
Makro poniżej przesuwa nazwiska w prawo o wartość numeru grupy+1, a następnie usuwa puste komórki w obszarze danych. Nazwiska nie są posortowane. Jeżeli jest potrzeba. sortowania to na początku makra dopisać sortowanie.[syntax=vbscript]Sub Przepisz_Nazwiska() Dim Tab_Opis As Variant With ActiveSheet Tab_Opis = Array("Grupa 1", "Grupa 2", "Grupa 3",...
Proponuję wykorzystać rejestrator makr. Bez większej znajomości VBA można doskonale sobie poradzić. Przykład: 1. Nagrywam makra wstawiania i kopiowania wiersza. Wychodzi coś takiego nagrane 'Ctrl+strzałka w dół'[syntax=vb]Sub Makro3() ' ' Makro3 Makro ' ' Selection.Find(What:="Odżywianie", After:=ActiveCell, LookIn:=xlFormulas _ , LookAt:=xlWhole, SearchOrder:=xlByRows,...
(at)speedy9 , w temacie napisano wyraźnie - makro. EDIT: W dalszej dyskusji podałem rozwiązania za pomocą formatowania warunkowego zaproponowanego przez (at)speedy9 ale z nieznanego mi powodu zostało to wycięte. Więc podaje tu: =ORAZ(CZY.PUSTA(1:1))... Ot tylko tyle dla wiersza 1, dalej można sobie formatowanie kopiować.
Witam Mam makro, które kopiuje plik i wstawia nowe arkusze Dodano po 3 już znalazłem błąd
Witam, Potrzebuję makra, które będzie kopiowało i wklejało zawartość wiersza w którym: Jeżeli w kolumnie G komórka zawiera wartość to wstaw <pod nią> wiersze n-1 i skopiuj dane z tego wiersza. Czyli w komórce g8 pojawia się wartość 3 to makro wstawia pod 8smym wierszem 2 puste i kopiuje cały wiersz 8 do wstawionych wierszy. Mam nadzieję że dość,...
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...
Witajcie, również odświeżę temat, zacznę od początku, byście mieli jasność ... Mam pewien zakres liczb, które zbieram do jednej kolumny kolejno w dół od wiersza 7 do 150. Nazwijmy ją kolumna I. Zakres liczb zawiera się od 0 do 50. Następnie w kolumnie A mam zrobioną formułę sprawdzającą mi ilość występowania każdej z liczb w tym zakresie. Dotąd wszystko...
Działa w takim zestawieniu Masz źle zrobioną instrukcje 'If Not otwarty Then' a co jeżeli plik masz otwarty? "nie pytaj ponownie", po którego aktywacji kolejne załączenie makra, do zamknięcia arkusza masz makro do zamknięcia arkusza? odnośnie pierwszego pytania: Jeśli plik jest otwarty to makro pomija wykonanie otwarcia arkusza "baza". Jeśli nie jest...
Mnie te makra nie zawiesiły Excela ani razu, ale testowałem je na wersji 2007 i 2010. Być może problem jest spowodowany przez połączenie wklejania danych ze schowka z wstawianiem komórek. Jeśli formatowanie komórek nie ma znaczenia i kopiowane są stałe (tak to przynajmniej wygląda w przykładowym pliku), to może zrezygnować z kopiowania na rzecz przypisywania...
Witam serdecznie Kolegów. Mój problem polega na stworzeniu makra do excela, który kopiuje konkretne komórki do nowego arkusza. Nie są to całe wiersze czy kolumny, ale wybrane według pewnego algorytmu. W pierwszym arkuszu (cennik) znajdują się kolumny: A-nazwa usługi B-cena netto C-ilość szt. z VAT 8% D-ilość szt. z VAT 23% Załóżmy, że w wierszach znajdują...
Witam wszystkich forumowiczow, z gory przepraszam za brak poslkich znakow (zycie zmusilo do emigracji). Widzialem ze skutecznie pomogliscie juz wielu osobom w stworzeniu praktycznych i przede wszystkim poprawnie dzialajacych makr. Ja, jak kazda z tych osob rowniez z powodu swoich ogranicen w tej dziedzinie nie potrafie poradzic sobie z ulepszeniem mojego...
Witam, pokrótce opisz mój problem na podstawie zamieszczonego poniżej pliku 'przykład1'. Makro które w nim utworzyłem ma za zadanie: kopiować z arkusza '3' wiersz z ciągiem 4 cyfr do arkusza '1'. Potem z tego arkusza kopiować kolumnę 'J' do arkusza '4'. W przypadku analizowanego przykładu, makro ma się zakończyć, gdy wszystkie wiersze (30) z arkusza...
tytuł tematu trochę zagmatwany, ale już wyjaśniam. Mam takie testowe makro: [syntax=vb]Sub agregacja() ' ' agregacja Makro ' ' Sheets("agregacja").Select Range("A3").Select Sheets("kohezja").Select Range("G1").Select Selection.Copy Sheets("agregacja").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False...
Witam, podczas tworzenia makra natrafiłem na problem z którym nie mogę sobie poradzić. Makro miałoby za zadanie z wszystkich arkuszy o nazwie "Protokół x" zrobić zestawienie w jednym arkuszu oraz z "delikatnymi" zmianami odnośnie rozmieszczenia w kolumnach. Na chwilę obecną nie idzie źle - mam problem ze zliczaniem wierszy z protokołów, żeby określić...
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....
Wystarczy podpiąć poniższe makro :) Sub Kopiowanie() ' ' Kopiowanie Makro ' Makro am 18.12.2009 von xbaj aufgezeichnet ' Dim i As Long, wiersz As Long wiersz = 1 For i = 2 To Worksheets.Count Worksheets(i).Activate Range("M25").Select Selection.Copy Worksheets(1).Activate Range("A" & wiersz).Select...
Zamykając temat. W pierwszym poście tego tematu jest kompletny kod pod EXCEL 2003 i XP (sprawdzony) Poniżej przedstawiam kod sprawdzony na EXCEL 2007 ( w większości opisane co i jak) [syntax=vb] Sub OperacjeHurtowe() 'makro dla excel 2007 'nazwa pliku startowego start2.xlsm i jest umieszczony w folderze w którym znajdują się podfolery z posortowanymi...
Witam, Mam pewien problem. Chcę napisać makro, które umożliwi mi kopiowanie określonych wierszy z pliku txt do Excela. Mam przykładowo takie dane: (...) 121401_2.0011.G22121401_2.0011.185/6185/... 2370 121401_2.0026.G22121401_2.0026.108/3108/... 307900 121401_2.0017.G22121401_2.0017.185/12185... (...) Potrzebuję skopiować do Excela tylko te wiersze...
Utworzyłem makro które kopiuje zakres danych z jednego skoroszytu "Dane" do drugiego "GOW" w pierwszy wolny wiersz kolumny B arkusza "GO1" i "GO2" Niestety formuła nie jest idealna, widzi wstawioną tabelę w arkuszach "GO1" i "GO2" jako zajęty wiersz i wkleja wszystkie dane pod tabelą. Właściwe działanie jakie powinna wykonać formuła to wklejenie zakresu...
Witam, potrzebuję pomocy z makrem. Czy ktos zmodyfikuje to makro tak zebym: 1) Mógł wpisać "z palca" numer wiersza z którego kopiuje (wszystkie kopiowana dotyczą zawsze jednego, wybranego wiersza). Ew. co tez jest dobra dla mnie opcja chcialbym moc wskazac myszka wiersz. 2) Mógł używać makra do aktualnie otwartego pliku (tego, do którego chcę skopiować)?...
Witam ponownie Zacznę od tego, że mam takie dane w excellu: 1293.2750.4324.1294.2750.3765. 0. 0. 0. 1. 1. 1. 1. 2. 3. 1. 2. 3. I teraz chciałabym napisać takie makro, które kopiuje mi komórki z pierwszego wiersza jeżeli w komórkach w wierszu poniżej wartości są takie same. Chciałabym, żeby te skopiowane wartości (tutaj akurat po 3) były kopiowane do...
Ogólnie tu jest kwestia poprawnego żonglowania Do while Cells(i,1) <> "" (czyli określenie ostatniego zapisanego wiersza) , warunku if i poprawności adresacji komórki przez liczbę( czyli dla celnego określenia użyj sformułowania Sheets(" [syntax=vbscript] Dim i, c, d As Integer Dim dzien As String i = 1 c = 1 d = 1 'określenie ilości komórek...
Witam Mam mały problem, może ktoś pomoże. Mam skoroszy excel np A Mam w nim dane powiedzmy komórki od A1 do G1. Chciałbym żeby dane z komórek B1 c1 d1 kopiowały się do innego pliku Excel bądź nowego skoroszytu. Ale to nie problem. Problem w tym że nie mogę skopiować danych z komórek o pierto niżej. Plik jest codziennie aktualizowany więc pisać makro...
Witam Kolejny raz bardzo proszę o pomoc. Potrzebuje kodu, który na podstawie wartości z kolumny H kopiuje dany wiersz do innych arkuszy. Jestem raczkująca w tej dziedzinie, ale napisałam bardzo prosty kod, który działa , ale nie tak jak bym chciała. Kopiuje on wybrane wiersze, ale chciałabym by zostały wklejane w wybranym arkuszu w wierszu czwartym,...
Witam serdecznie! Potrzebuję stworzyć makro, które kopiuje zawartość kolumny do wierszy, które nie są obok siebie. Na ten moment stworzyłem makro dla 10 ciu wartości z kolumny A2. Kopiuję jedno po drugim i wklejam do wybranych wierszy jednak sprawa dotyczy 1000 wartości. Czy można ten kod skrócić? [syntax=vbscript] Sub kopianum() ' ' kopianum Makro...
Witam, potrzebuję pomocy w napisaniu makra, które jeśli znajdzie w przeszukiwanej kolumnie liczbę - to skopiuję odpowiadający jej wiersz i wklei obok... Pokaże na przykładzie: Mam plik z czterema kolumnami - makro powinno przeszukać kolumnę C (wiersz po wierszu - max.300 wierszy) i jeśli znajdzie w nim "liczbę" to skopiować wartości z kolumn B i C i...
Witam, mam prośbę o zrobienie makra dla poniższego zadania, a mianowicie w arkuszu ABC są dane, które należy skopiować do arkusza XYZ w odpowiednie kolumny, ale na podstawie wyboru odpowiedniej daty z arkusza ABC kolumna G i nazwiska osoby też z arkusza ABC z kolumny B (najlepiej przy pomocy UserForm - przykładowy w załączniku), wpisując date do komórki...
(at)adamas_nt - bardzo dziękuję Ci za pomoc! To już prawie działa, ale pojawia się jeszcze jeden problem, z którym też nie potrafię sobie poradzić. Chodzi konkretnie o "wdst". Poprawie zaczyna się od 3, ale chodzi o to, żeby kopiowało do wiersza 3,4,5,6,7 i do 8 już nie(bo tam jest inna wartość), a następnie kopiowało do 9,10,11,12,13 wiersza i do...
Witam wszystkich serdecznie. Bardzo potrzebuję pomocy. Wszystko opisane jest w załączonym pliku. Opisywanie tego na sucho, bez wglądu w plik, raczej nie będzie zrozumiałe, więc napiszę możliwie prosto: W kolumnie "l.p" wprowadzona jest liczba porządkowa produktu, a w kolumnie "ilość" liczba produktów tego samego typu. Makro kopiuje dane z wierszy (jeden...
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, mam taki problem. Zrobiłam w Excelu przycisk, do którego przypisane jest makro kopiujące i wklejające 3 ostatnie wiersze. W jednej kolumnie są scalone 3 wiersze do jednej komórki i jest w niej lista rozwijana. Gdy włączę ochronę arkusza (na wybrane komórki, nie na tę z listą rozwijaną) to ta lista nie kopiuje się do kolejnego wiersza. Kopiuje...
Teraz możemy to przeanalizować: Makro "Save" wywołuje procedurę "kopiuj_wartości" z trzema parametrami: co kopiować, Nr wiersza docelowego określonego w pętli Do (ostatni niepusty w kol "C" arkusza "REPORT") i Nr kolumny docelowej. Jeżeli chcesz wykorzystać je w tej formie, to docelowy plik (NN.xls) musi zawierać arkusz o tej nazwie (REPORT). Linię...
Jeżeli chodzi o kopiowanie kolorów, to najpierw na początku porządnie wyczyść arkusz celu z kolorów: [syntax=vb]wscel.Range("A2:E65536").Clea... wscel.Range("C2:E65536").Interior.ColorI... = xlNone[/syntax] Sam kolor jest zaszyty w zmiennej Range(...).Interior.ColorIndex, zatem kopiuj go razem z danymi w ten sposób: [syntax=vb]wscel.Range("C"...
Witam.Proszę o pomoc w napisaniu kodu makra dotyczy: kod makro do excela działanie: skoczyć do ostatniego wiersza arkuasz1,zaznacz ostatnie 2000 wierszy, kopiuj i wklej do arkusz2. problem:arkusz1 powiększa się o kolejne wiersze Za rozwiązanie z góry dziękuję
Chcę aby moje makro kopiowało wybrane dane z dokładnie 4 arkuszy do innego arkusza. Arkusz docelowy: W docelowej zakładce w wierszach znajdują się nazwy danych a w kolumnach daty generowania tych danych Arkusze źródłowe: 1. Są zapisane w tym samym folderze 2. Różnią się tylko końcową datą (rok-miesiąc) 3. W wierszach znajdują się nazwy danych a w kolumnie...
Wstaw moduł do pliku 'Aktywności NSM_glizda_TOTAL.xlsx' i wklej taki kod Update 22:25 Ups. miało być w pierwszy-wolny. Poprawiłem...
Wygląda to w ten sposób, że 1. Otworzyłem plik B 2. Otworzyłem plik A1 3. Zaznaczyłem obszar danych i skopiowałem 4. Wkleiłem do pliku B i kliknąłem kolejną komórkę w wierszu poniżej 5. Powtórzyłem dla plików A2-A4... [syntax=vb]Sub Makro2() ' ' Makro2 Makro ' ' ChDir "C:\Documents and Settings\Wojtek\Desktop" Workbooks.Open Filename:= _ "C:\Documents...
Witam, Kiedyś miałem podobny problem i już mi raz pomógł jeden z użytkowników, ale teraz gdy zrobiłem całkiem nowy skoroszyt, nie mogę połapać się z Makrem. Potrzebuję podpiąć Makro do przycisku w arkuszu "Baza ofert", tak aby jego naciśnięcie powodowało aktualizację bazy o ofertę z arkusza "Oferta". Za każdym razem kolejna oferta musi być dopisywana...
Dzień dobry, Można spróbować takie makro: [syntax=vb]Sub Uzupełnij() Dim wiersz As Long, wzor As String wzor = "" wiersz = 1 Do If Cells(wiersz, 1) <> "" Then wzor = Cells(wiersz, 1) Else: Cells(wiersz, 1) = wzor End If wiersz = wiersz + 1 Loop Until wzor = "koniec" End Sub[/syntax] Powinno spełniać założenia. Pozdrawiam.
Witam, Znalazłem makro, które ułatwi mi pracę w excelu. Niestety mam problem z dopasowaniem go do mojego pliku. Chciałbym żeby makro kopiowało mi całe wierze wg. kolumny P. Tym samym tworzyło nowy arkusz "505", "504-6" itp. i tam wklejało całe wierze Lp.1 Lp2 itp.
Witam, dzieki bystrosci uzytkownika PRL mam makro ktore kopiuje dane z zakladek. Chcialbym jednak ograniczyc zakres kopiowanie i nie kopiowac wierszy pustych. Czy tos mi pomoze? Dziekuje[/table]
Dzięki. Praktycznie o to mi chodziło. Niestety ten kod importuje do kolejnych wierszy w exelu kolejne ,,wyrażenia", zamiast kopiować całe wiersze. Dokładnie chodzi mi o to , że mam wartości w wierszy rozdzielone ';". Potrzebuje makro które w pierwszym załączeniu zaimportuje 4 pierwsze wiersze z pliku txt do 4 wierszy exela, dzieląc je na kolumny według...
Proszę o pomoc. Chcę, by z arkusza pierwszego po wciśnięciu przycisku "add" cały dany wiersz kopiował się do czwartej zakładki "zamówienie". Plik ma mieć docelowo ok.200 wierszy, więc chodzi o to, żeby przekleić to makro do kolejnych wierszy. Nie w każdym wierszy w arkuszu 1 będzie wduszony przycisk add, dlatego też program musi wiedzieć, że ma kopiować...
Chcesz aby przy kopiowaniu pomijal wiersze, gdzie juz wpisano recznie w kolumnie X? Nie dokładnie o to mi chodziło, ale już znalazłem swój błąd w rozumowaniu. Szukałem makra aktualizującego, a to już dużo roboty, bo opórcz jednej kolumny identyfikującej dane reszta jest specyficzna i unikalna. Dokładnie chodziło mi o to żeby makro sprawdzało, które...
Witam, Potrzebuję pomocy osób obeznanych z Excelem. Mam problem: tak jak w załączniku mam plik w którym pierwszy arkusz to lista osobowa z wartościami do niej przypisanymi. Drugi arkusz to zestawienie ogólne (nieistotne dla mojego problemu) a kolejne to arkusze osobowe których nazwy to imiona i nazwiska osób. Wszystkie te arkusze są identyczne tylko...
Ale dla którego wiersza tabeli 1 ma szukać? Dla jednego czy wszystkich? Jak go chcesz wskazać jeżeli jednego? W najprostszym przypadku uruchamiasz makro stojąc w jakimś wierszu Tabeli 1. Makro znajduje numer wiersza i zapamiętuje klucz wyszukiwania łącząc zawartości komórek z jakimś separatorem, np : Kolumna 1 & "|" & Kolumna 2 & "|" &...
Cześć, mam główny plik kody, oraz istniejące pliki excel o nazwach z tego pliku z zakładki "Sheet3" tzn pliki o nazwach "62-200", "00-001" itd chce aby makro kopiowało do plików o odpowiedniej nazwie dane z pliku głównego kody wszystkie wiersze zawierające dany kod czyli jeśli napotka w pierwszej zakładce wiersz zawierający "62-200" to ma wszystkie...
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...
Cześć, potrzebuje pomocy w zmodyfikowaniu kodu. Mam taki poniżej kod i zauważyłam, że nie kopiuje do "zbiorczo" ostatniego wiersza z pozostałych kopiowanych arkuszy. W arkuszu "panel" mam przyciski z innymi makrami i chciałam, żeby był pierwszy. Kod skopiowany z Internetu i trochę zmodyfikowany przeze mnie. I przez moje dopiski makro trochę się wysypuje....
Dzień dobry, proszę o pomoc w napisaniu makro, które wykonuje poniższe czynności: 1. Zaznacz całą widoczną tabelę (tabela może mieć różną ilość wierszy). 2. Skopiuj zaznaczoną tabelę do kolejnego arkusza. 3. Dodaj kolumnę z lewej strony tabeli, która będzie częścią tej tabeli. 4. W nowo dodanej kolumnie wypełnij wartości do końca tabeli (tabela może...
Cześć, Proszę o pomoc w napisaniu makra, które jeśli w arkuszu1 w kolumnie A, w jakimś wierszu będzie znajdować się literka "W" to wtedy skopiuje komórkę znajdującą się w tym samym wierszu w kolumnie B, wklei ją do arkusza2 w ostatnim wolnym wierszu w kolumnie A i usunie cały wiersz skąd została skopiowana. Bardzo proszę o pomoc!!!! Z góry dziękuję!!!
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...
Na początku pętli [syntax=vbscript]Do While Len(ws_src.Range("E" & i)) > 0[/syntax]jest sprawdzany warunek czy długość zapisu w kolumnie E jest > 0. Eliminuje to przypadki pustych komórek i pustych tekstów. Gdybyś jeszcze chciał sprawdzać wartości zerowe to trzeba dodać nowy warunek pod spodem: [syntax=vbscript]If ws_src.Range("E" & i) = 0 Then Exit...
Witam potrzebuję pomocy z vba otóż chciałbym żeby stworzyć makro które kopiuje i wkleja wartości(bez formatów jest taka opcja w excelu wklej wartości) ale żeby to makro przeszukało mi pewien zakres np g2 do h30 i jeżeli w np w g15 = "" lub w innej komórce albo w h 23 = "" itd. Wtedy kopiowało mi cały ten wiersz np a5 do h5 i wklejało np od l1 do s1...
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...
Cześć wszystkim. Przygotowuję plik excel pod korespondencję seryjną, a dokładniej pod druk etykiet. Rzecz w tym że ilość etykiet jest różna, stąd i niektóre dane są powielane. Próbuję stworzyć makro kopiujące komórki A, B, C, F w każdym z wierszy, tyle razy jaka jest liczba w komórce H. Np. w H1 = 2 to pobiera dane z komórek A1, B1, C1, F1 i wkleja...
Witam, Mam problem. Ostatnio dostałem do przerobienia listę w excelu ma ona ponad 40 tys. pozycji. Ręczne przerebianie jej byłoby niemożliwe. Problem wygląda następująco : W jedej kolumnie znajduje się zapis podobny do tego : &KEY&FILE:\\W:\PROJEKTY\DOKONCZONE\SPAE - estakady\ESP18M.00.03.psm chodzi mi o skopiowanie końcówki (ESP18M.00.03.psm) i wklejenie...
Formatowanie, przy rozszerzaniu tabeli, jest automatycznie kopiowane z wiersza wyżej. Po prostu nie rób z góry określonej ilości wierszy. Alternatywnie sformatuj tabelę dopiero po jej utworzeniu.
Witam, Na początku przepraszam jeżeli powielam temat lub coś takiego ale przeglądałem tematy odnośnie kopiowania danych i jakoś nie mogę znaleźć rozwiązania mojego przypadku. Chodzi mi o kopiowanie danych z arkusza2 z komórki A5. W powyższej komórce będę miał zapisywaną wartość która zmienia się przy każdym otwarciu pliku (kurs waluty ze strony www)....
Brakuje chyba jeszcze jednej pętli zmieniającej kod sklepu. Hmm, raczej: na pewno ;) Spróbuj Dziękuję, to dokładnie to, czego szukałem. Pomyślałem więc, by rozszerzyć to dalej o nową funkcjonalność. W załączniku plik, który nadal meczę. Nie powiem - z ciekawością;] Po kolei: Arkusz "paczki" to nasz generator listy paczek. Uzyskaną listę kopiujemy do...
Witam serdecznie Jestem nowy na tym forum. Potrzebował bym pomocy przy makrze, które by kopiowało komórki z jednego głównego arkusza gdzie codziennie wpisuję dane do kilku innych arkuszy. Poszperałem troszkę w necie i znalazłem makro napisane przez pana Tomasza Gawęda które prawie odpowiada moim oczekiwaniom. [syntax=actionscript] Option Explicit Sub...
Hej dzięki za odpowiedz. Niestety nie działa bo makro w ogóle tego nie kopiuje. A w komórce którą chce skopiować jest formuła. Chciałbym by nie kopiowało formuły tylko jej wynik. [syntax=vb]Range("J1").Select Selection.Copy Application.CutCopyMode = False ActiveSheet.paste ActiveWorkbook.Worksheets.Add With ActiveSheet.QueryTables.Add(Connection:= _...
Witam serdecznie, mam bardzo małe doświadczenie w pisaniu makr i w VBA i prosiłbym o pomoc w następującym problemie: Arkusz1 A1: "FIRMA 001" B1: "Daniel Kowalski" C1: "666 777 888" D1: "2013-08-12" E1: "07:00" F1: dzięki funkcji złącz teksty "FIRMA 001 Daniel Kowalski 666 777 888" Jak stworzyć makro, które skopiuje zawartość komórki F1 do Arkusza2 ,...
Witam, bardzo serdecznie:) Makro wysypało mi się teraz trochę w innym miejscu. Niby prosta rzecz do zrobienia, tak mi się wydaje, skopiowanie zakresu pojedynczych komórek i wklejenie ich, żeby stały jedna obok drugiej w jednym wierszu zaczynając od komórki A1 (arkusz Excel). Makro w arkuszu Excel działa i wygląda mniej więcej tak: "Selection.PasteSpecial...
Witam Nie znam się zbytnio na Makrach, a postawiłem sobie cel - stworzenie makra.. który nie mogę osiągnąć. Problem polega na tym że mam 9 plików, w którym koledzy wpisują co tydzień informacje. Ja chciałbym co tydzień otwierać swój plik i klikając "AKTUALIZUJ" ściągać informacje jakie oni wpisali w jeden zbiorczy plik. Stworzyłem makro, które to robi...
Napisałem makro, które kopiuje dane do kolejnych kolumn. Robi z wielu wierszy dotyczących tego samego adresu jeden wiersz który zawiera informacje z tamtych wierszy w kolejnych komórkach. Problem jest taki, że mam do obrobienia mnóstwo wierszy i makro bardzo wolno pracuje, zacina się. N małej ilości danych jest ok a jak już mam powyżej 14000 wierszy...
Witam Panowie, zwracam się do Was z gorącą prośbą o przygotowanie makra (sam mam jeszcze zbyt małą wiedzę na ten temat), które będzie kopiowało dane z jednego arkusza do drugiego przy zachowaniu warunku daty to raz, a dwa wyszukiwało jeszcze pionowo odpowiedniego wiersza do wklejenia wartości. Krok po kroku: 1)W arkuszu "ESKA" w polu G10:I12 wybieramy...
Witam, jestem całkiem zielony w arkuszach kalkulacyjny jeśli chodzi o makra i potrzebuję pomocy. Utworzyłem skoroszyt w którym są trzy arkusze. Pierwszy to tabela przestawna, drugi to arkusz zbiorczy a trzeci to raport o nazwie '01'. Potrzebuję napisać następujące makro po włączeniu którego wartości z komórek od AS5 do BU5 z raportu będą kopiowane do...
Witam Proszę o pomoc. Potrzebuję proste makro, które skopiuje określone komórki z wybranego przeze mnie wiersza do innego arkusza. Chciałbym żeby to wyglądało tak: okno dialogowe pyta: "Podaj numer wiersza do skopiowania", podaje np wiersz nr 5 i wtedy komórka np A5 B5 D5 G5 z arkusza1 są kopiowane do komórek odpowiednio A1 A2 A3 A4 arkusza2. Nie znalazłem...
Witam, Proszę o pomoc w napisaniu Makra. Informacje: Docelowy plik posiada 10 arkuszy z nazwami miast (załącznik4) Założenia: Makro powinno kopiować nazwiska z arkuszy z nazwami miast (kolumna H) wybierać unikaty, oraz kopiować je do co drugiej kolumny arkusza "Podsumowanie" począwszy od wiersza 9 (czyli pierwsza kolumna od A9, duga od C9 itd.) Przykładowy...
Ok Działa, ale nie przenosi do innego arkusz. Ponadto kopiuje tylko wiersz A2 i to jest dziwne bo w kodzie jest umieszczony zakres od A2 do U3. Nie wiem czym to jest spowodowane. To może tak, zarejestrowałem nowe makro: Sub kopiowanie() ' ' kopiowanie Makro ' ' ActiveWindow.ScrollColumn = 2 ActiveWindow.ScrollColumn = 1 Range("A1:U2").Select Selection.Copy...
Witam Próbuje stworzyć makro które będzie kopiowało dane z excela do pliku csv a następnie wysyłało go na serwer ftp, ale że jestem zielony z VBA idzie mi to bardzo opornie, proszę o pomoc. O co dokładnie chodzi? Plik źródłowy wygląda tak: [syntax=tex] A B C D E F 1 Header Date Hour inflow outflow other 2 3 Name1 2016-03-03 06:00 20,0 1,0 text1 4 Name2...
Witam Nagrałem makro, które kopiuje mi wybrane komórki z jednego pliku i wkleja do innego i odwrotnie. Jednak to makro działa bardzo wolno. Czy byłaby możliwość napisania innego prostszego kodu, który działał by szybciej. Generalnie celem makra jest przeniesienie wartości z pliku 1.xls Arkusz1 z wiersza 9 z kolumn E, H, L, O, R, U, W do pliku 2.xls...
Proszę o przykładowe makro kopiujące pierwszy wyfiltrowany wiersz z listy do nowego arkusza. W nowym arkuszu wklejane wiersze muszą dodawać się jeden pod drugim wraz z datą ich kopiowania.
Masz racje może faktycznie ciężko i spaprałem opis, postaram się to sprawdzić po weekendzie. Jeszcze raz opisuje o co mi chodzi , mam 200 plikow w folderze "dane", w folderze "WZOR" jest plik wzorcowy wzor.xls oraz folder "CEL" czyli jest tak skrypt z folderu "dane" pobiera pierwszy plik to jest otwiera plik np g35.xls kopiuje odpowiednie zakresy komorek...