Odwołaj się w pętli do arkusza źródłowego/docelowego przez Worksheets("nazwa_arkusza"), a po kropce do konkretnej komórki: albo w postaci .Range("E" & i) albo w postaci .Cells(i, 5), gdzie i - nr wiersza źródła (ew. jeżeli zrobisz w pętli for each c in ...., to możęsz użyć c.Row). Do tego druga zmienna...
Bardzo dziekuje za poprzednie porady, bardzo skróciły mi czas pracy. Wydawało mi się, ze Ci podziękowałam poprzednio, ale widze ze jednak nie, więc robię to teraz:) Dalej pracuje nad moją pracą i chcialabym wykorzystać to makro do jeszcze jednego wyszukiwania. Chodzi o to że chciałabym zeby brał inną...
Dzień dobry, Po pierwsze - gdy odwołujemy się do ciągłego zakresu komórek nie ma potrzeby używać funkcji Union. W tym przypadku prościej można to zapisać [syntax=vb]Range(Cells(wiersz, "A"), Cells(wiersz, "F"))[/syntax] albo [syntax=vb]Interse... Columns("A:F"))[/syntax] Po drugie -...
Makro, które napisałem należy umieścić w module arkusza. Jest ono wywoływane w momencie wprowadzenia wartości większej od 1 w kolumnie G. Nie musisz go łączyć ze swoim makrem.
Ten pomysł z kopiowaniem każdego wiersza osobno jest niezbyt trafny, chyba że kolejność wierszy ma być za każdym razem inna. Ale i tak lepiej zamiast przycisków zastosować pola wyboru, żeby było widać, które wiersze zostały wybrane do skopiowania (lub już skopiowane). Teraz można się łatwo pomylić i...
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...
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...
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 ...
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ę 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...
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...
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...
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...
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,...
Witam wszystkich forumowiczów. Bardzo proszę o pomoc z prostym ale przerastającym moje (mam nadzieję, że niedługo) możliwości dotyczące tworzenie makr w VBA. Potrzebuję makra które po naciśnięciu dowolnego autokształtu "kopiuj" skopiowałoby wszystkie wiersze z pliku 1.xls do pliku 2.xls (wklejanie...
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: -...
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...
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...
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...
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...
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:E65... = xlNone[/syntax] Sam kolor jest zaszyty w zmiennej Range(...).Interior.ColorIndex, zatem kopiuj go razem...
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...
Witam forumowiczów, Mam następujący problem, muszę skopiować z określonego arkusza (lista) wiersze (od A do G z pominięciem F) zawierające w kolumnie 4ej "TAK" i przenieść je do arkusza "rekordy", napisałem proste makro na miarę swoich możliwości i: 1) Przez Range umiem tylko wybrać zakres od...
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ć...
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...
Hej wszystkim Xlsowiczom!:) Niezmiernie chciałabym prosić Was o pomoc w automatyzacji załączonego pliku. Muszę stworzyć coś w rodzaju "ankiety" do wypełnienia dla osób w pracy, które do excela podchodzą z duża odrazą i niechęcią nawet w w przypadku wypełniania danych;) zależy mi na tym aby: 1) w zależności...
No dobrze, a co z układem danych ? Opis z wpisu nr 1 jest aktualny ? " komórka B2 zawierająca datę, C5 zawierającą jakieś dane jak imię nazwisko i adres " Bo dziwny to jest trochę układ. Czy tak samo ma być kopiowane do zeszytu 'Bazy', tj. w różnych wierszach, czy w tym samym wierszu ?
Cześć, poszukuję rozwiązania dosyć złożonego (dla mnie) problemu, mianowicie chodzi o: makro które z arkusza "Dane" kopiuje do poszczególnych arkuszy wiersze na podstawie danych kryteriów: Arkusz "kryterium1" - jeżeli w komórce występuje tekst "gola" Arkusz "kryterium2" - jeżeli w komórce występuje...
Witam, potrzebuje stworzenia makra dla ponizszego problemu. Chce skopiowac kilka wierszy z danego arkusza, jezeli dana wartosc wystepuje w pierwszej kolumnie tychze wierszy. Skopiowane komorki a najlepiej tylko wartosci bez formatowania, chcialbym dodac do bazy danych juz istaniejacej w tym...
Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej...
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...
Witam, tworzę plik excela do wydań produktów z magazynu do poszczególnych działów. W arkuszu 1 mam nazwy działów, w których każdy jest połączony hiperłączem do osobnego arkusza do ostatniego wolnego wiersza: =HIPERŁĄCZE("#magazyn1!A"&(MAX(JEŻELI.BŁ...
Witam, Na samym początku chciałbym zaznaczyć, że nie mam wiedzy programistycznej i umiem napisać najprostsze makra (głównie za pomocą opcji "nagraj" :)) Mam następujący problem, od którego już siwieje, mianowicie... Mam całe mnóstwo osobnych plików (ponad 300), które muszę zmodyfikować (tu dam sobie...
Rozwiązaniem problemu jest zastosowanie pętli: For i= ... to ... ... Next Biorąc pod uwagę nazewnictwo plików zastosowałbym: Workbooks.Open FileName:="ścieżka\plik_" & i & ".xls" gdzie i będzie kolejnym numerem w nazwie pliku. Zrezygnowałbym tu z poprzedzającego...
Witam wszystkich mam poważny problem z dodawaniem nowego wiersza za pomocą przycisku. Stworzyłem tabelkę, która zawiera wiele list rozwijanych i funkcji jeżeli to coś tam. Przycisk z odwołaniem do Makra dodaje mi kolejny wiersz zachowuje listy rozwijane ale nie przenosi funkcji i pojawiają się puste...
Interesują mnie wartości z dwóch wierszy- drugiego i czwartego. (...) Chciałbym użyć makra do wyszukania tych wierszy z pierwszego arkusza, gdzie występują wartości szukane w drugim arkuszu i przekopiowanie wszystkich tych wierszy do np. 3 arkusza. Z tego wynika, że szukasz duplikatów wierszy 1 i...
U mnie ten kod działa. Pytanie, czy zrozumiałeś co on robi? Bo sprawdza występowanie fragmentu "www" w kolumnie A (od drugiego wiersza) w aktywnym arkuszu (tym, który jest aktywny gdy odpalasz makro). PS. Zmienna poz jest niepotrzebna, została po innych fragmencie.
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...
Wszystko się da, no ok prawie wszystko. :) Kolumny są oznaczane w Excelu literą lub numerem, więc jeżeli chcesz je kopiować to nie widzę problemu. Wystarczy opanować metodę range.Copy. Jeżeli musi to być po nazwie to zapisz gdzieś (inny arkusz?) listę nazw w pętli i rób range.Find w wierszu w którym...
Witam Czy ktoś miałby chwilkę i mógłby mi pomóc? (może być makro lub jeśli się da to funkcje z arkuszem pomocniczym). Mam problem z kopiowaniem wierszy i ich dublowaniem do gotowego arkusza. Mam skoroszyt, który zawiera 3 arkusze robocze: "Re_1", "Re_2" , "Re_3" oraz arkusz wynikowy "Wynik". Do...
Witam. Trochę już szukałem i nie znalazłem odpowiedzi... Otóż mam pewien problem. Zajmuję sie w firmie raportami dziennymi z kilku obiektów łącznie. Zapisuję oczywiście wszystkie dane w execlu z każdego dnia. Do wpisania mam 25 dostawców na każdy obietk osobno z podziałem na towary handlowe i eksploatacyjne....
Wyszło mi coś takiego[syntax=vb]Sub Pobierz() Dim nazwa As String Dim ark As Worksheet Dim wrs As Long, j As Integer, i As Long nazwa = "Arkusz2" 'nazwa arkusza docelowego 'tutaj 2 dla porównania z 1 ThisWorkbook.Activate 'gdyby nie był Sheets(nazwa).Range("A2:H65536")....
W takim razie mamy zupełnie odmienne wyniki testów :!: Z testów, które robiłem gdy pisałem o optymalizacji (dane dla 2000 wierszy ): - kopiowanie komórek pojedynczo ( z jednej kolumny ) - czas 5.26 - 5.6 s, z czego czasy krótsze dla liczb, a dłuższe dla komórek z tekstem. - kopiowanie komórek...
Kopiuj całe wiersze. Odpowiednia linia jest w makro w załączniku. Usuń apostrof opisanej linii, wyrzuć/zaapostrofuj trzy następne (od For do Next).
Witam. Siedzę już dwie noce nad makrem i nie mogę go ruszyć. Temat: Arkusz z tabelą danych A12:I12 wielkość tablicy 30000. Mam Stworzyć drugi arkusz który by pobierał całe wiersze z pieszego. Ponadto , kolumnie In są warunki utworzenia nowych arkuszy. Reasumując tyle ile będzie różnych...
czy dobrze rozumiem dzialanie? gdy uruchomie makro te zapyta czy chce nowe zestawienie czy nie jesli mam juz wplik z wynikiem za 1 dzien a chcialbym by do tego pliku doszla zakladka z 2 dniem to powinienm kliknac ze nie, podac wartosc ktora ma byc wyszukana a makro powinno dodac dodatkowa zakladke...
Nie wiem czemu nie mogę uruchomić makra z przycisku? Kurcze pierwsze chodziło od cjancik ale to ostatnie nie. Wyskakuje komunikat o ustawieniach osobistych, które mogą być usunięte. Czy to makro ustawia dane w pierwszy wolny wiersz?
Więc tak: mam skoroszyt z makrami, do którego wklejam tabele A:S z niewiadomą liczbą wierszy. Na tą chwilę makra sortują mi tą tabelę po kilku wartościach i odpowiednio rozdziela sortowane wartości po arkuszach nowo utworzonego pliku. Teraz chcę, zeby w nowym pliku, który jest zapisany Truck na pulpicie,...
Cześć, potrzebuję makro które znajdzie się pod przyciskiem w tym kosztorysie, które skopiuje tabelę pomiędzy słowami "KOSZTORYS OFERTOWY" oraz "SUMA WSZYSTKICH PRAC" i kolumnami od A:G. Chciałbym aby makro utworzyło nowy plik który będzie zapisany w katalogu w którym znajduje się plik kosztorysu oraz...
Dziękuję za tak szyba reakcję ale mam taki problem że za bardzo nie wiem jak działają makra. Czy mógłbym prosić o plik ze zrobionym tym makrem :) Z góry dziękuję.
No dobra ... dla zachęty ... Założenia: 1. W arkuszu masz ileś tam pól wyboru - nie odpowiedziałeś na pytanie więc wstawiaj je sobie ręcznie, jak masz czas na to ... 2. Pola wyboru, mają nazwy ściśle powiązane z numerami wierszy, w których się znajdują, np.: "CB 2" 3. Zaczynając się od wiersza nr...
Chcialabym aby po nacisnieciu przycisku wstawil mi sie nowy wiersz pod zoltym wierszem i i zeby zwaratosc zoltego skopiowala sie do tego wstawionego i tak z kazdym kolejnym. nagralam takie Makro: [syntax=vbscript]Sub Makro3() ' ' Makro3 Makro ' ' Rows("6:6").Select Selection.Insert...
Witam, Potrzebuję makra które po wybraniu z listy rozwijanej (kolumna C) przeniesie cały wiersz z arkusza all do innego arkusza jednocześnie wykasowując ten wiersz a arkuszu all. Dobrze byłoby gdyby była zachowana możliwość przenoszenia później pomiędzy arkuszami. Przerobiłem makro znalezione w internecie,...
makro czyszczące dane z bloku pierwszego jest celowo przypisane tylko do pierwszego bloku Nie zrozumiałeś lub nie doczytałeś mojego postu :D ja pisałem tylko o Twoim makrze "dodaj" zamiast działań typu Kod: vbscript Chodzi o to, żebyś w tym makrze "dodaj" wymienił sekwencje czyszczącą na...
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ż...
1. Wyrzuć "górne" r=r+1, ustaw (u góry) r=2 jeśli... sam już nie wiem. Wypróbuj. 2. Nie ta metoda. Musiałbyś copy-paste i wybierając (select) wiersz (zakres) docelowy. P.S. Zmykam. Dobranoc ;)
PRL: nie ukrywam, że moja wiedza na tym etapie się kończy, stąd moja prośba o pomoc w dopasowaniu skryptu do mojej tabelki. Chciałbym, żeby kopiowały się całe wiersze zachowaniem formatowania (scalenia itp)
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...
witam, mecze sie straszliwie z makrem, ktorego zadaniem jest skopiowanie wiersza z jednego arkusza, zindentyfikowanie przy pomocy numeru ID pozycji tozsamego wiersza w drugim arkuszu i doklejenie do istniejacego juz wiersza w tym drugim arkuszu. proobuje rozmaitych rzeczy ciagle wychodzi mi runtime...
Więc potem Wstaw pusty wiersz, a następnie dodaj checkboxy(patrz post #6)
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 ...
Chcę aby w arkuszu produkcja kolumna N , wpisując słowo 'got.' formuła przekopiowała mi cały wiersz do arkusza zrobione. No a jak "kolumna N" nie zna dobrze VBA :?: :D To jeśli W Excelu porusza(m) się biegle szuka(m) innych możliwych rozwiązań dla uzyskania pożądanego rezultatu. Przykładowo...
Witam Zastanawiam się czy jest możliwość, aby makro skopiowało mi tyle arkuszy ile jest wypełnionych wierszy w arkuszu głównym. Dokładnie chodzi o to, że mam arkusz "Dane", w którym są podane pewne informacje dot. klientów (1 klient=1 wiersz) oraz arkusz "1", w którym są formuły pobierające dane z arkusza...
Dziękuję bardzo za pomoc
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...
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...
To makro będzie w miarę proste, wystarczy w pętli sprawdzać kolejne komórki w pogrupowanej kolumnie, a jak dwie kolejne się różnią - skopiować zakres od...do: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Set wsdane = ThisWorkbook.Worksheets("dane")...
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...
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ć...
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ą...
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"....
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...
Sprawdź czy o to chodziło. Jeśli faktycznie druga procedura ma kopiować "wiersze powyżej", to oczywiście nie zawsze będzie ich 15, bo wyszukiwana wartość może zostać odnaleziona w wierszu, powyżej którego nie ma 15 wierszy. Załączona procedura w takich przypadkach kopiuje wartości począwszy od wiersza...
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...
[syntax=vbscript] Sub FZ() r = 1 'kolejny sprawdzany wiersz (row) rstart = 0 'numer pierwszego w serii wiersza do którego wklejam wartości, jednocześnie numer wiersza kopiowanego rend = 0 'numer ostatniego w serii wiersza, do którego wklejam wartości c_from_start = 1 'początek zakresu (nr kolumny)...
Tak zaawansowany nie jestem :/ Ostatnia linijka Dodano po 7 Ogólnie z tym plikiem tekstowym jest taki problem, że generuje się raz 50.000 stron raz 60.000, innym razem 42.000 itp. i około 90% z nich jest mi nie potrzebnych. I teraz tak: 1. Mam makro, które częściowo obrabia ten plik - i chodzi,...
Witam, byłbym wdzięczny za pomoc. Potrzebuję makro, które pomogło by w poniższym opisie. W arkuszu Arkusz1 jest całość artykułów widniejących w systemie ( ok. 40 tys ). Do arkusza Arkusz2 będę wklejał dane artykułów, które będę kontrolował pod kątem jakości. Plik powinien szukać identycznych artykułów...
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...
Wielkie dzięki za pomoc! Zmieniłem trochę twój kod do moich celów. W twoim kodzie makro kończyło pracę gdy w pierwszej kolumnie napotkało pierwsza pustą komórkę. Potrzebowałem mieć pewność, że wszystkie dane zostaną skopiowane. Dlatego też zmieniłem pętle DO WHILE na pętle FOR i użyłem funkcji ...
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....
Kolejna prośba. Wiem, że dla Was będzie to sprawa prosta, ja się cały czas uczę i będzie mi potrzebna pomoc: W Arkuszu 1 wprowadzam dane w wierszu 1 Po naciśnięciu przycisku ZAPISZ (tutaj właśnie potrzebuję makra) kopiuje wpisane dane i wkleja w kolejny wolny wiersz w Arkuszu 2 (jednocześnie kasując...
Witam Proszę o pomoc w stworzeniu makra które kopiuje wiersze z jednego arkusza i wkleja w inny ale uwzględnmia 2 argumenty: Po kolei mam 2 arkusze 1. OPERACJE 2. MAGAZYN Operacje - wydania i przyjęcia magazynowe liczba rekordów zwiększa się co dzień, przewiduje max 8 tys rekordow (kolumna...
Witam. Napisałem proste makro kopiujące kilka komórek. Maklro działa mi bez problemu. Chciałbym jednak troszkę zmienić wygląd arkusza. Jak za pomocą makr ukryć paski przewijania, paski narzędziowe, menu i obramowania wierszy i kolumn widoczne w excelu. Próbowałem troszkę pokombinować, udało...
Utknęłam. Moje makro filtruje wiersze ze statusem New i je kopiuje, następnie otwiera drugi plik i dokleja te odfiltrowane wiersze i usuwa duplikaty. Jak zrobić, żeby dla każdego nowego wklejonego wiersza w ostatniej kolumnie (AE) dodawana była data?
Dzień Dobry, Z VBA w Excelu mam doczynienia od niedawna i dopiero co poznałem w wąskim zakresie programowanie. Problem dotyczy wolno działającego makra. Nie potrafię go usprawnić, by działało szybciej,a przy 25 000 kopiowanych wierszach trwa to około 25 minut :/. Proszę o pomoc we wskazaniu błędu,...
Witam, Potrzebuje zbudować makro które, będzie kopiowało wiersz(lub wiersze) z tabeli jeżeli spełnia warunek. A mianowicie: W Arkuszu1 mam tabele o określonej szerokości (16 kolumn) bez okreslonej ilości wierszy. W Arkuszu3 w komórce B2 wpisywanybyłby warunek (tekst) W Arkuszu2 jest pusty...
Interesuje Cię rozwiązanie formułami (tu z kolumną pomocniczą) czy makro (kopiowanie warunkowe w pętli)?
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....
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...
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...
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...
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...
Witam Prosiła bym o edycje kodu napisanego przez kolegę Prot, któremu jestem bardzo wdzięczna za okazaną pomoc. Poniżej makro:[syntax=vbnet]Sub UpdateBase2() Dim D As Worksheet: Set D = Worksheets("Dane") Dim B As Worksheet: Set B = Worksheets("baza") Dim v4 As Variant, v5 As Variant ...
Witam ponownie Zacznę od tego, że mam takie dane w excellu: 1293. 2750. 4324. 1294. 27... 0. 0. 1. 1. 1. 1. 2. 3. 1. 2. 3. I teraz chciałabym napisać takie makro, które kopiuje mi komórki...
aby makro wiedziało ze w danym pliku jest np tylko 850 Zaznaczanie do kopiowania/przenoszenia/itp. bez używania tzw. zmiennych. Jeśli masz tabelę w arkuszu, a w tabeli wiersze w kolumnach zachowują ciągłość danych, tzn. brak jest pustych komórek, to można w ten sposób:[syntax=vbscript]Range("H1",...
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 ....
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...
Witam Proszę o pomoc, niestety nie mogę sobie poradzić z napisaniem makra. Nie potrafię ściągnąć plików do Excela, gdy są zapisane w innym folderze również w pliku Excelowym. Mam kilkadziesiąt folderów zawierających pliki Excelowe. Potrzebuję, żeby makro pobierało mi konkretne rzeczy ze...
A co z nagłówkami, powtarzanymi wielokrotnie ? Ma być tylko jeden, czy ileś tam za każdym razem nowy i w wyniku nagłówkowy przekładaniec ? Edycja: Nie przyjrzałem się ... kopiujesz bez nagłówka ... Ale może przy pierwszym kopiowaniu powinien on być przenoszony jednorazowo ? Ręczie go wklepujesz/kopiujesz...
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...
