Sprobuj takie makro [syntax=vb]Sub sortgodz() With ActiveSheet.UsedRange .Sort key1:=.Columns(4).Cells(1), header:=xlYes Set bt = .Find("Zast") r = Cells(Rows.Count, 4).End(xlUp).Row + 1 Rows(bt.Row).Cut Rows(r).Insert shift:=xlDown End With End Sub [/syntax]
Cześć, mam pytanie. Potrzebuję makra, które będzie przerzucało odpowiednie wiersze do 2 arkusza, żeby potem zrobić z nich tabele przestawna- i to jest ok. Ale warunki do przerzucenia wierszy to : np mamy w kolumnie b nazwy projektów a w kolumnie c ich status potrzebuję makra, które wybierze tylko te cząstki projektów które są otwarte lub otwarte i zamknięte...
Przetestuj makro z załączonego pliku. Arkusze 1 - 4 to arkusze z danymi źródłowymi Arkusz5 - arkusz na wiersze wytłuszczone
Zbliżone działanie do pożądanego :D tj. przenoszenie danych z katalogu do oferty przy pomocy dwukliku (makro działa pojedynczymi wierszami - oczekując na wpis ilości do oferty :ok: patrz na zrzut ) 978389 Drugie makro w "ofercie" usuwa wybrane wpisy (wybrany indeks :!: ,a przy okazji ilość :D ) 978391
Powiedzmy że działa - potestuj. Trochę info o pliku: Podstawa: Makro sprawdza w nagłówku (w wierszu drugim) gdzie jest tekst "Zadanie" i "Grupa interwencyjna" jak również w wierszu trzecim szuka ostatniej niepustej komórki. (po tym rozpoznaje ile jest poszczególnych kolumn. Jeżeli zmienisz nazwy dodawać dowolną ilość kolumn do zadania i do pracowników....
Temat do zamknięcia
Dzięki wielkie. Makro działa. Super.
[syntax=vb]'1.xls Arkusz1 z wiersza 9 z kolumn E, H, L, O, R, U, W do pliku 2.xls Arkusz1 do tych samych kolumn w wierszu 6 'z wiersza 6 w pliku 2.xls z kolumn F, J, N P, T, V, X, Z do wiersza 9 w pliku 1.xls Arkusz1 Sub swap_walue() Dim ark1 As Worksheet Dim ark2 As Worksheet Set ark1 = Workbooks("1.xls").Sheets("Arkusz1") Set ark2 = Workbooks("2.xls").Sheets("Arkusz1")...
Witam serdecznie: Probuje napisac makro z przenoszeniem wierszy, lecz mam spory problem z tym. Przedstawiam sytuacje i prosze o pomoc Mam 3 arkusze z danymi : Arkusz1 ( tabela, ponad 2tys. pozycji ) Arkusz2 ( tzw. Transfer ) Arkusz3 ( Archiwum ) 777 737 747 Wprowadzam dany kod np. ( 747 ) Tabelka w ktorej znajduja sie wszystkie usuniete wiersze z Arkusza1...
marcinj12, Dzięki za tę podpowiedź. Poprawie to w kodzie i zobacze czy choć trochę przyspieszyło. Szczerze mówiąc to nie wiem, która zajmuje więcej czasu, wydaje mi się, że delete, ponieważ jest odpalana dwa razy (w dwóch arkuszach). Jeżeli chodzi o ilość danych, to przy około 300 wierszach radzi sobie w miare szybko, jednak już przy tysiącu, niestety...
Nie wiem... To makro na Excel2003 już 11 tysięcy wierszy zrobić. Baza w 65 tysięcy, wszystkich formuł złożonych formuł w bazie danych?
Witam. Mam prośbę odnośnie stworzenia makro. W arkuszu "dane" potrzebuje wyszukać wartości powyżej 9 i poniżej -9 w kolumnie "cena". Tych kolumn "cena" jest kilka w arkuszu "dane". Gdy znajdzie takie wartości zaznaczy je kolorem na czerwono i wytnie cały wiersz i przeniesie na początek kolumny. Nie potrafię stworzyć makro z wyszukaniem takich wartości....
jeśli chodzi o zmienne to tam nie ma znaku $ (dolara) tylko § (paragraf) (można zrobić za pomocą kombinacji klawiszy ALT+21) pliki powinny się tworzyć do wszystkich wierszy które w polu "P" mają wartość "1"
Jakoś nie widzę zastosowania makra do przenoszenia z Arkusz1 do Arkusz2 niepustych wierszy. Wygląda na to, że coś się zmieniło... Opisz wiec proszę co i jak ma być.
A nie prościej zrobić formatowanie warunkowe. Wówczas mamy sprawdzanie przez excela wartości i makro nie obciąża go dodatkowo...Piszę już jakiś czas makra i np jak robi się kopię dużych arkuszy, to makro jest zbyt wolne - lepiej zamiast przenoszenia Rows(A) użyć zaznaczenia i polecenia kopiuj excela wpisując formuły poprzez makro niż kopiować fizyczną...
Dla mnie ten kod jest troszeczkę pogmatwany i też jestem za tym aby na wstępie stworzyć poszczególne kroki procedury. I tu jeszcze się zapytam co ma być jak ta sama osoba występuje parę razy. Rozumiem, że wtedy w Arkuszu2 będzie lista danych (parę wierszy) -zaczynając od 13 wiersza. Ale jeżeli procedura później usunie tylko jeden wiersz w arkusz1 (tylko...
W 'Workbook_BeforeClose' kopiujesz zakres, otwierasz 'główny', określasz pierwszy pusty wiersz 'Cells(Rows.Count, "A").End(xlUp).Row + 1', wklejasz, 'Me.Save'.
To już wiem, niestety nie mam pojęcia o makro... próbowałem bazować na kilku plikach z tego forum (były wątki o przenoszeniu danych) ale nic z tego. Nie ma podobnego przypadku który idealnie podpasuje do mojej wizji.
Długo nikt nie odpowiada, więc chyba coś tu nie jest jasne. Excel może działać (upraszczając nieco) poprzez formuły lub poprzez makra. Formuły nie mogą niczego przenosić, mogą jedynie "kopiować", a ściślej zwracać wynik tam, gdzie wcześniej wpisano formułę, pozostawiając dane źródłowe bez zmiany. Formuły działają automatycznie, przeliczają się same,...
Po pół godzinie wczytywania się załapałem (chyba) o co chodzi. Po pierwsze czy aby na pewno nie będzie interesowało cię za co klient zapłacił? Bo czyszczenie danych i przygotowywanie do kolejnego "wpisu" zlikwiduje szczegóły (składowe) danej wpłaty. Druga rzecz związana z brakiem sumowania. Może jest błędna formuła (nie uwzględnia wszystkich komórek)...
Chcę uzyskać przeniesienie całych wierszy z Arkusza1 do Arkusza2 jeśli zostanie spełniony określony warunek. Jeśli w kolumnie stan pojawi się wartość "Zakończony" to całe wiersze mają być przeniesione do Arkusza2, natomiast w Arkuszu1 wykasowane. W załączniku plik Excel Cześć! Rozumiem, że chcesz, aby wiersze z Arkusza1, które spełniają określony warunek...
Usuń dane i wstaw arkusz z makrem. Będzie łatwiej pomóc
Nie rozumiem czemu ma to służyć. Masz 5 komórek do wypełnienia zarówno po lewej, jak i po prawej stronie rysunku, Zablokuj pierwszy wiersz arkusza "BAZA" i wpisuj bezpośrednio w nim. Prosto i bez problemów. Jeśli jednak wolisz coś ambitniejszego, to poszukaj na forum. Potrzebujesz znaleźć Nr ostatniego wiersza w arkuszu "BAZA", dalej proste przypisanie....
... jak masz zamiar je wybierać? ... z tym mam problem ... Nie masz żadnego - po prostu w dodatkowym arkuszu ("konfiguracyjnym") w pewnym zakresie komórek (np. kolumny "A") wpiszesz sobie jeden pod drugim owe nagłówki do wyszukiwania. Makro będzie pobierać nazwy nagłówków (z tego zakresu) i wyszukiwać je w pętli po pierwszym wierszu arkusza z tabelą...
adamas_nt, to co podesłałeś jest idealne :) Kwestia sformatowania tabelki to już pikuś, zrobi się to na piechotę :) Ale jeśli piszesz, że poprawiłeś jakieś "byki" to już zerkam na poprawiony załącznik :) Dodano po 7 hmmm... Tylko zauważyłem, że jeśli z Arkusz 2 skopiuję całą tabelę do Arkusz 1 i odpalę Twoje makro to gdzieś giną dane z wiersza 49 i...
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...
Hmmm, Poradziłem sobie następująco, natomiast nie wychodzi mi zaszywanie dodatkowego warunku w tym kodzie. Obecnie makro przegląda arkusz źródłowy wyszukując jednego sprzedawcy (Agnieszka). Natomiast jak próbuję wcisnąć tam kolejną pętlę, aby wyszukał "Andrzej" i przeniósł wiersze do Arkusz3, "Basia" - do Arkusz4, "Iza" do Arkusz 5 itp, polecenie i...
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, działa mniej więcej ale są problemy: - wiersz...
Bardzo szybko robi się to ręcznie. Filtr, zaznaczasz, Ctrl+c, Ctrl+v (możesz nawet nagrać makro i je wykorzystać). Klasycznie: w pętli + instrukcja warunkowa (If) oraz licznik wiersza zakresu docelowego.
Warunek jest taki żeby wstawiało te dane w pliku STATYSTKA biorąc pod uwagę datę przyjęcia czyli jeżeli w pliku STATYSTYKA w komórce C2 mamy datę 2023-01-30 to żeby kopiowało z pliku DANE tylko te pozycje które mają taką samą datę jak ta wcześniej wymieniona. Makro miałoby przenosić z jednego pliku do drugiego dane żeby przyspieszyć pracę i nie dublować...
Wszystko powinno być dobrze jeżeli pozbędziesz się kropki przy liczbach (a przynajmnierj przy ostatniej - największej). Innymi słowy jeżeli w pozycji Lp będą liczby jako liczby "moje" makro wstawiając kolejną pozycję będzie powiększać maksymalna liczbę Lp o jeden i wpisywać ją w pierwszej komórce wklejanego wiersza. (W kodzie makra za to odpowiada zmienna...
Dziękuje. Problem rozwiązano, makro działa idealnie.
(at)Lanzul Zaznaczanie do kopiowania/przenoszenia/itp. bez używania tzw. zmiennych. Jesteś zwolennikiem spiskowej tendencji nie używania tzw. zmiennych? Może to jakaś programistyczna klątwa... Mnie uczono, że wielokrotne wywoływanie funkcji obniża wydajność kodu.
Moje rozwiązanie - nieco inne, aby wygenerować zawartość drugiego arkusza ("Zamowienie") trzeba uruchomić Makro. [syntax=vb]Sub Makro1() ' ' Const R1 = "A1" ' pierwsza komórka nagłówka tabeli Const W = 6 ' szerokość tabeli Const Q = 5 ' kolumna z ilością produktów Const FixLP = True ' ustawić False jeśli ma kopiować LP z produktu Dim OF As Integer OF...
Witam Potrzebuje pomocy z napisaniem makra ale nie za bardzo wiem jak się za to zabrać. Jeśli ktoś mógłby pomóc byłbym wdzięczny. Mianowicie chodzi mi o makro , które wyszukuje w wierszu komórki o wartości np: 100, 200 i 300, jeśli znajdzie w wierszu wartość 100 przechodzi do pierwszej kolumny tego samego wiersza i wpisuje np "aaa", jeśli znajdzie 200...
Dziękuje bardzo za szybką odpowiedz :) Super makro przenosi i zmienia nazwę, czy jest możliwość aby makro zmieniło nazwę w wszystkich wierszach, a nie tylko w jednym.
Cześć, sprawdziłem i działa. Jest jednak małe ale ... stosuję formułę =WYSZUKAJ.PIONOWO(C6;A6:B100;2;FAŁSZ) i przeciągam w dół tak jak sugerowaliście. Przy pierwszym wierszu jest ok kłopot jest w następnych bo wyglądają =WYSZUKAJ.PIONOWO( C7;A7 :B100;2;FAŁSZ) itd. Oznacza to że wiersz c6 nie jest już przeszukiwany co może spowodować pewne pominięcia....
Ok, dziękuję - właśnie o to mi chodziło. Mam jeszcze pytanie jak zrobić, aby po naciśnięciu na "tak" nie przechodził mi kursor automatycznie do zakładki podsumowanie tylko zostawał na swoim miejscu w arkuszu info? W tym makrze co napisałeś niestety mi się przenosi.
No więc tak. Nagałam sobie makro, aby zobaczyć jak przeniść samą wartość. Sęk w tym, że na początku przenosiło wartości, tyle że do innej komórki. Potem się zorientowałam, że moją zmienną nie są kolumny, tylko wiersze. Po poprawieniu tego makro przenosi mnie do drugiego arkusza, ale nie wyrzuca wartości. Podsyłam plik.
Jestem już coraz bliżej :D Ustawiłem sztywny zakres i działa tak jakbym chciał czyli jak dodaję nową kolumnę to zakres przesuwa się o jeden w dół i dodaje się nowy wiersz. ws1.Range(ws1.(Cells(2, iCol - 1), ws1.(Cells(5, iCol - 1)) .Copy Cells(3, iCol) Jeśli natomiast ustawiam kopiowanie do samego dołu to tak...
Co ma wspólnego makro do zaznaczania aktywnego wiersza z funkcją, której nagłówek pokazujesz? Jak i do czego używasz tej funkcji? Zaznaczanie aktywnego wiersza masz zrobione formatowaniem warunkowym z formułą: [syntax=text]=KOMÓRKA("ROW")=WIERSZ()[/s... z tym są dwa. Pierwszy - należy właściwie zaznaczyć zakres komórek, w którym to formatowanie...
Witam, jeżeli ktoś mógłby pomóc będę wdzięczny. Mam w kolumnie od A1 do A60000 powtarzające się wyrazy co 4 kolumnaA 1 laptop 2 dysk 3 karta 4 obudowa 5 laptop 6 dysk 7 karta 8 obudowa itd do 60000 Jak można byłoby to przenieść czy makro czy formułą z pionu na poziom, żeby wyglądało mniej więcej C D E F 1 laptop dysk karta obudowa 2 laptop dysk karta...
Jeśli bez makr, to można wspomóc się wierszami pomocniczymi. W moim przykładzie 2-ma. Formuły, poza 1-szym wierszem, są "kopiowalne". Warunek: posortowane kolumny A:B Witaj adamas_nt Zrobiłem to troszkę inaczej, ale mocno mnie naprowadziłeś. Umieściłem to praktycznie w jednej formule ( w jednym wierszu) i działa - dziękuję Dodano po 1 A jeżeli makrem,...
Witaj. Sprawdź załącznik. Checboxy zastąpione czymkolwiek w kolumnie (może być X, może być cokolwiek poza pustym polem). Poprawność stawiania xów czy innych jest sprawdzana na bieżąco, więc jeśli spróbujesz postawić iksy dla dwóch różnych zamówień to wyjdzie błąd już w momencie stawiania. Nie jestem pewien, po co numer wiersza, wystarczy że masz w tabeli...
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...
Mam takie proste makro do przenoszenia między arkuszami wartości. Potrzebuję do tego dorzucić sprawdzanie wartości w kolumnie E jeżeli większa niż zero to kopiuje jeżeli zero pomija kopiowanie z danego wiersza. Jakoś nie mogę tego ogarnąć proszę o pomoc. Sub A_Przenies_ok() Dim x As Double, ostatni_wiersz As Double ostatni_wiersz = Sheets("lista").Cells(Sheets("lista").Ro...
Witam! Potrzebuję ustawić w załączonym pliku w karcie "dostawca B" formuły lub makro w taki sposób , aby automatycznie kolejno kopiowało wartości z odpowiednich komórek w kartach T-31, następnie z T-32... T-33, T-34 i T-35 ale tylko dla wierszy w których jako producent elementów wybrany jest Dostawca B. Dodatkowo w karcie "dostawca B" nie ma wszystkich...
Witam! Jestem tu nowa i potrzebuję pomocy bardziej zaawansowanych użytkowników, ja dopiero staram się uczyć VBA, niestety napotkałam problem jak dla mnie nie do przejścia. Próbowałam przerobić inne makro na swoje potrzeby jednak ewidentnie coś jest z nim nie tak a ja nie potrafię zdiagnozować w czym problem. Przyznam, że nie mam już siły - może znajdzie...
Wielkie dzięki za podjęcie tematu! Działa ale trochę inaczej niż potrzebuję. Dane przenoszą się do karty CCC, a chciałbym żeby pojawiały się w karcie podział na kolory, w tej w której jest lista rozwijana koloru i przycisk pobierz. Karta Constract może zostać usunięta ponieważ nie jest mi potrzebna. Dodatkowo potrzebuję aby przenosiły się wszystkie...
zamieszczać oryginalnego pliku, bo w rzeczywistości te tabele są dużo większe (ok 90 wierszy i 40 kolumn) To na pewno ci się zmieni 'step' jak i ten drugi x+ :)
może wydać się dziwne, ale w jaki sposób aktywować makro, jak podpiąć pod przycisk?
Rozumiem i postaram się pomóc w miarę swoich umiejętności ;) Widzę, że wiesz już jak wygląda edytor VBA. Otwierasz go sobie i w okienku projekt wybierasz nazwę pliku na którym będziesz pracować. Niech to będzie Twój przykładowy plik "Moje.xls". Następnie klikasz na "Wstaw >> Moduł". W nim tworzysz swoje makro: [syntax=vb] Sub Przenies() ... End...
Witam, Czy znalazła by się osoba pomocna w napisaniu makra? Chodzi o makro rozbijające komórki "etapy pracy" na kilka po napotkaniu znaku ";". Jeśli pomiędzy kolejnymi znakami jest pusta przestrzeń ("; ;") taka wartość nie powinna być przenoszona. Dodatkowo makro miało by "przesuwać" kolejne wiersze w dół. Przykład jak to ma wyglądać umieściłem w załączniku....
Witam. Ponieważ na innym forum nie uzyskałem jak dotąd pomocy to może tutaj znajdzie się pomocna ręka. Mam problem , którego ja sam nie mogę rozwiązać od jakiegoś czasu , a który nie pozwala mi spać (autentycznie - to nie przenośnia). W załączniku mam tabelkę. Arkusze "target" oraz "wykonanie" to łącza do skoroszytów , które będą ulegały zmianie. Zmiana...
Czyli są to listy, a przecież one "same z siebie" dodają sobie wiersze ... ? Planujesz wstawiać coś tylko ręcznie, czy może "jakimś mechanizmem" przenosić do listy/list coś z innego miejsca arkusza/zeszytu ?
Witam! Mam makro, które przenosi wartości wstawione w kolumnach H, I oraz J do karty której nazwa jest identyczna z wartością tekstu wstawionego w kolumnie C dla wiersza w którym w kolumnach H, I, J ma przenieść dane. Dodatkowo w momencie przenoszenia danych do odpowiednich kart, kopiują się również informacje z datą raportu, zmianą jakiej dotyczy wstawiany...
Witam! Mam taki problem z formatowaniem tekstu w Word, chce do pewnego tekstu, który liczy kilka stron (treść tekstu za kazdym razem może być rożnej wielkości) dołączyć na jego końcu pewną regułkę która liczy np 25 wierszy i jeżeli jest za mało miejsca chcę aby ta cała regułka była przenoszona na następna stronę. Jęzeli ktoś mógłby pomóc byłbym bardzo...
po poprawkach wygląda to tak: Sub Macro1() 'deklaracje tablic grup POTS,DSL,inne dopisać Dim POTS(1 To 2) As Variant POTS(1) = "0.2" POTS(2) = "0.3" Dim DSL(1 To 2) As Variant DSL(1) = "0.4" DSL(2) = "0.5" Dim inne(1 To 2) As Variant inne(1)...
Dzień dobry, mam skoroszyt w którym jest 3200 arkuszy i każdego arkusza mam do skopiowania klika wybranych danych do kolejnych kolumn kolejnych wierszy podstawowego arkusza BAZA. Usiłuję napisać makro, które z każdego z tych arkuszy by przenosiło wybrane dane, utknąłem na takim etapie jak procedura podstawowa ma wrócić po kolejne dane do tego wybranego...
Nie bardzo rozumiem na czym polega istota problemu. Czy tylko na automatycznym odświeżeniu tabeli przestawnej? To można zrobić np. makrem przy każdorazowej aktywacji arkusza z tabelą. Przykład w załączniku. Analogicznie można bez tabeli przestawnej założyć tylko filtr i ten filtr odświeżać makrem. Można też formułami, ale to bardziej skomplikowane.
Witam, Chciałbym prosić o pomoc w stworzeniu makra dzielącego dane z jednego dużego arkusza na kilka według daty w pierwszej kolumnie. Makro po uruchomieniu powinno przenosić dane (całe wiersze) do kolejno tworzonych nowych arkuszy w zależności od miesiąca (najlepiej nadając im nazwę miesiąca). Następnie sortowało dane w każdym arkuszu według popularności...
Cześć, bardzo dziękuje za pomoc :) Efekt końcowy jest prawie taki jak chcieliśmy uzyskać. Nie mam zastrzeżeń, do działania bo wszystko działa tak jak trzeba, lecz: 1. Zamienione są dane Firma 1 (t) z numerem karty. Firma 1 (t) - to wartość wyrażana w tonach, czyli MASA z dokumentu WZ Numer karty - to ta górna wartość z dokumentu WZ, nr karty/przepustki...
lanzul dziękuję za odpowiedź... jestem początkującym vba-excelowcem i powiem szczerze, moje pierwsze makro, polegające na zaznaczaniu fragmentu zeszytu i przenoszenia go gdzie indziej powstało jakieś 2 tygodnie temu. Także dopiero się tego uczę, więc stąd toporność i kompletny beton mojego kodu, bo nie wiem jak np. dynamicznie zmieniać punkty odniesienia...
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach B166 i C166 nie ma żadnych liczb. Ale zostawmy...
Witam. Jestem laikiem jeśli chodzi o makra a chciałabym trochę ułatwić sobie pracę. Mam w arkuszu1 listę wyboru w trzech wierszach jeśli chodzi o klasę i wpisuję odpowiednią powierzchnię: Klasa: (lista wyboru) np. RIIpowierzchnia:25,0000 Klasa: RVpowierzchnia:2,0214 Klasa: RVIpowierzchnia:1,6690 Chciałabym aby makro wyszukało odpowiednią klasę w nagłówkach...
Pokaże moment, który nie działa na przykładzie. Pomino tego, ze mam na liście słowo ZUS to nie przenosi mi tego wiersza. Wiesz co może być zle?
...W pliku który mi przesłałeś nie wiem czemu ale nie ma żadnych przycisków do makr ... Bo i być nie powinno ... w zamyśle miało być menu " KOSZTORYS " i takie w tych " Dodatkach " widać - w teorii, jak się je kliknie, powinno pokazać coś takiego jak poniżej na drugim obrazku - wygląd w starym excelu: 838683 838684 ... Zauważyłem, że: 1. jak dodaje...
Wpierw po pierwsze secundo jeśli chodzi o primo , to otagowałbym kod, bo jak na razie to jest wiersz typu "elegia do makaronu lewo-płasko-zaś-prawo-strzępionego" ... :) , a następnie pozmieniałbym kolejność poleceń, aby uniknąć skoków koniowatych-szachowych i zarazem aby skrócić kod. Następnie, albo lepiej bym opisał co chcę osiągnąć, albo załączyłbym...
A ja tak do tego posta się dołączę i zapytam o makro co nie zakres komórek ma przenosić tylko wybrane komórki do nowego arkusza i ustawiać je w jednym wierszu. Mam już coś napisane ale nie działa. Proszę o pomoc. Kod makra: Sub zapisdobazy() ' ' zapisdobazy Makro ' Przyjmujący_zamówienie = Range("E6") ID_zamówienia = Range("E7") Sheets("Baza").Select...
Pomocy. Mam arkusz Baza gdzie przechowuje dane o swoich urządzeniach. Potrzebuje makro które umożliwi skopiowanie do arkusza HVAC tylko wiersze spełniające warunki: BUDYNEK = IGK1 POZIOM = 0 BRANŻA = HVAC STATUT = A
Witam, jestem początkującym w pisaniu makr. Walczyłem cały dzień aby napisać makro i nie wyszło dlatego proszę o wzór. Z arkusza „dane”, aby przenosiło komórki wszystkie z wiersza oprócz komórek z nagłówkiem „Ilość etykiet” do arkusza „widok” i skopiowało tyle razy, jaka jest wartość w komórce z nagłówka „ilość...
W zasadzie wszystko działa idealnie oprócz tzw. przeksięgowania ... :D Wpisuję numer RZ w komórkę "G-1" a następnie przyciskiem "Obciąż RZ" zdejmuję liczbę podzespołów z arkusza "RZ" ... :?: mechanizm arkusza "robi" rozliczenie tak jaby wszystkie dane tabeli arkusza "Przeksięguj" dotyczyły tylko RZ zawartego w komórce "G1"... :?: Po pierwszym użyciu...
Witam serdecznie, mam problem ze stworzeniem makra a mianowicie: Mam trzy arkusze nr 1, nr 2 i dane. W arkuszu dane jest kolumna J z literkami "W" lub "O". Jeśli w komórce będzie litera "O" to dane z danego wiersza arkusza dane idą do arkusza nr 1 natomiast jeśli będzie literka "W" to dane z danego wiersza idą do arkusza nr 2. Jak to napisać? Będę ogromnie...
Przeniesienie nie wchodzi w grę, bo to nie jest jeden arkusz, tylko kilkanaście, które są powiązane ze sobą makro... Osiwieję... Dodano po 6 Chyba nic nie wymyślę, zacznę przenosić powoli wszystko. Dzięki...
W dołączonym pliku napisane jest makro przenoszące dane z arkusza "Dane" do arkuszy sklepów. Po otwarciu arkusza "Sklep x" arkusz jest czyszczony z zawartości i przepisywane są te wiersze z arkusza "Dane", które mają stany niezerowe towaru. Z rozszerzeniem kodu o kopiowanie obrazków nie powinno być problemów.
Działa ale też nie do końca tak jak trzeba - nie przenosi szerokości komórek i formatowania warunkowego. Ale spox poradziłem sobie w inny sposób. Na bazie poprzedniej procedury nagrałem sobie makro, które usuwa zbędne wiersze i zmienia nazwę arkusz i pozamiatane. Jeszcze raz wielkie dzięki za pomoc.
Chciałbym, żeby dane były automatycznie ... przenoszone do tabeli poniżej IMHO wystarczy odpowiednio zaprojektować te tabele, aby dane przenoszone były automatycznie bez żadnego przycisku i makra, a jedynie wykorzystując proste, "przeciągalne" formuły :please: 989671
Chcę napisać makro które będzie przenosiło dane o dynamicznej objętości (ilość wierszy i kolumn zmienna) z jednego arkusza do drugiego. W drugim arkuszu do przeniesionych danych chcę automatycznie ustawiać filtr dla wszystkich kolumn z danymi. Liczba kolumn będzie zmienna więc do określenia kolumn nie mogę użyć oznaczeń literowy. Problem mam z tym iż...
Korzystając z ciekawostki kolegi PRL chciałbym przestawić rozwiązanie mojego problemu z kilku postów wyżej. Chodzi o to, że po usunięciu pozycji dwuklikiem móc cofnąć operację usunięcia wiersza. Makro poniżej sprawia, że po podwójnym kliknięciu w arkuszu "szablon" w pierwszej kolumnie w danym wierszu wiersz ten zostanie najpierw skopiowany do arkusza...
Ten załącznik to arkusz w którym ma być makro. Cos podobnego znalazłem tym temacie https://www.elektroda.pl/rtvforum/topic3... Tylko tam szablon jest jeden stały. Chodzi o to aby każdy wiersz przenosiło do odpowiedniego szablonu do wiersza 100. Z tego wiersza będą podstawione w szablonie dane. I później wydruk jednostronny w odpowiedniej ilości...
Witam! temat wałkowany po tysiąckroć ale cóż począć skoro im więcej czytam tym mniej rozumiem. Proszę więc o idiotoodporną podpowiedź jak skonstruować makro przenoszące wiersz zawierający 17 wartości (17 kolumn) do nowego arkusza w tym samym układzie wg kryterium z kolumny A, wybieranego z listy rozwijanej ( pusta i dwie pozycje tekstowe). Warunkiem...
Witam wszystkich forumowiczów Jestem początkującym użytkownikiem vba i natrafiłem na problem, przez który nie mogę ruszyć dalej: Stworzyłem Userforma, który ma za zadanie przenosić wartości z textboxów do kolejnych pustych komórek. Makro działa dobrze, jednak mam problem z numeracją wiersza w pierwszej kolumnie w tej samej linii, w której wprowadzane...
Ma ktoś może jakąś propozycję jak można wybrnąć z takiej sytuacji ? W ostateczności z problemu wybrnę wstawiając odwołania bezwzględne * przyjmę że maksymalnie z jednego stanowiska będzie jakieś 30 tys wierszy czyli zrobię alokację od wiersza 1 do 30 tys a drugie stanowisku zacznę alokować od wiersza 30 001. Wtedy zadziała ale będzie problem z nadwymiarowością...
Mam takie pytanko: czy jest możliwość stworzenia takiego makra, żeby wstawiało puste wiersze, ale nie przed kazdym kolejnym wierszem jak we wzorze poniżej jest tak: 1 wrocław 2 kraków 3 kraków 4 kraków 5 warszawa 6 warszawa a chciałabym, żeby było tak: /pusty wiersz/ 1 wrocław /pusty wiersz/ 2 kraków 3 kraków 4 kraków /pusty wiersz/ 5 warszawa 6 warszawa...
Witam! Kolejny raz potrzebuję pomocy: W Pliku roboczym za pomocą power query wyciągam dane z pliku źródłowego. Plik aktualizuje się w momencie otwierania i co 60 minut. Pliki znajdują się w różnych lokalizacjach - plik źródłowy jest wrzucony na serwerze i korzysta z niego kilka osób, dlatego aby go wzajemnie nie blokować pomysł z makrem przenoszącym...
Może jeszcze raz jaśniej opiszę temat. Potrzebuję makro, które do bazy(Arkusz2) dopisze dane jakby z dwóch zakresów. Jeden zakres Tabela1(kolumna 1 do Kolumna7) - do tabeli(Arkusz2) zapisuje się tyle razy ile dopisanych zostało wierszy z danymi z Tabeli2 W Arkusz2 - efekt jaki chcę uzyskać(bez formatowania, zaznaczyłem kolorami dla lepszego poglądu)...
Witam! Mam w pliku Excel arkusz dla każdego tygodnia roku kalendarzowego o nazwach T-01, T-33, T-43 itd. W arkuszu posiadam makro do szybkiego tworzenia nowego arkusza przenoszące układ i formatowanie obecnego arkusza i dodatkowo przenoszące do nowo tworzonego arkusza wiersze dla których wartość w kolumnie J jest większa od zera. Plik służy mi do cotygodniowego...
Wszystko działa tak jak sobie wymarzyłem, dzięki koledzy za pomoc. Jeszcze jedno mam tabelę z danymi odbiorców Nazawa nip adres coś tam coś tam dane odbiorcy z tabeli są przenoszone do innych dokumentów za pomocą poniższej funkcji, dla każdego pola [syntax=vbscript] =INDEKS(Baza!E3:E200;PODAJ.POZYCJĘ(oswia... [/syntax] w...
Witam. A ja rozwiazalem to w ten sposob: [syntax=vbscript]Sheets("Sheet1").Select ActiveSheet.ListObjects("Table_Query_fro... _ AutoFilter Field:=15 ActiveSheet.ListObjects("Table_Query_fro... _ AutoFilter Field:=15, Criteria1:=Array("J50", "J51", "J52", "J53", "J54", "J55", _ "J56", "J57", "J58"),...
...działa ale dość wolno. Muszę skopiować zakres danych ok. 2500 wierszy z 60 skoroszytów do jednego. Jak mogę podrasować to makro ? W pętli: [syntax=vbscript] While Plik <> "" ... Wend [/syntax] nie należy kopiować, tylko przenosić dane z komórek 'dawcy' do zmiennej tablicowej, a następnie z tej zmiennej oddawać wartości do obszaru zdawczego...
Witam Często muszę usuwać odfiltrowane wiersze w których znajduje się tez grafika. Znalazłem gotowe makro które działa dość szybko i usuwa je, jednak robi to bez grafiki. Dodam tylko że we właściwościach znajdujących się w pliku zdjęć mam zaznaczoną opcję "Przenoś i zmieniaj rozmiar razem z komórką". Czy da się zmodyfikować to aby razem z tymi odfiltrowanymi...
Witam! Mam plik raportu do którego przenoszę dane na zakończenie pracy z pliku „plik testowy” oba pliki znajdują się w różnych lokalizacjach – w załączniku oba pliki na wzór – ogólnie przenoszonych danych jest ok. 30 wierszy z różnej ilości kolumn dla maszyny 1 i maszyny 2, ale opiszę swój problem na zamieszczonych plikach przykładowych....
Bardzo pomocny link muszę przyznać. W chwili obecnej staram się ogarnąć jak te całe makra działają ale myślę, że powinno być ok. W miarę postępu prac postaram się na bieżąco pytać we własnym wątku. No trochę móżdżyłem i starałem się rozgryźć te makra w podanym przykładzie. Opierając się na ostatnim możliwym do obejrzenia przez zwykłego usera (reszta...
Witam! Mam problem z poprawnym działaniem makra. Makro które przerobiłem z innego pliku gdzie dane były przenoszone z pierwszego arkusza do arkuszy znajdujących się w tym samym pliku. Teraz potrzebuję aby przenosiło do innego pliku z innych komórek. Niby przerobiłem je na podobę tamtego odpowiednio zmieniając adresy komórek z których ma pobierać dane...
Dobry wieczór, dla celów edukacyjnych muszę zrobić w Excelu imitację systemu księgowego, moja koncepcja: -użytkownik przesyła polecenie transakcji przez formularz Google, -transakcje zapisują się na dysku Google w zbiorczym Excelu, stamtąd są przenoszone do odpowiedniego Excela-"księgi" rachunkowej (każdy użytkownik ma swoją) na dysku Google. Zastanawiam...
Witam, mam zapytanie o makro z funkcją "złącz teksty" tzn. chciałabym, żeby w wstawionych wierszach w kolumnie "G" były przeniesione i scalone teksty z tej kolumny jeżeli... poniżej przykład: /wstawiony wiersz/29337 12183 3825 28713 6457 1327 14471 Warszawa29337 Warszawa12183 Warszawa3825 Warszawa28713 Warszawa6457 Warszawa1327 Warszawa14471 /wstawiony...
Witam, Mam problem z Excelem :cry: muszę stworzyć Makro które przenosiło by dane z kilku komórek ze zmieniającymi się danymi(np.A1 i B6) z arkusza1 do arkusza2 gdzie byłby stworzony raport w formie tabeli(przenieść A1 z arkusza1 do A3-arkusz2 i B6-arkusz1 do C12-arkusz2). Arkusz2 byłby roboczym do tworzenia kolejnych arkuszy raportów o nazwie z komórki...
Witam, mam do napisania makro vba które przenosi wartość komórek z wybranego zaznaczeniem wiersza arkuszu PIR lub podanego wiersza (okno dialogowe podaj wiersz do exportu) z arkusza PIR do arkusza zaladunek (wybieramy zamówienie i exportukemy do druku załadunku). Wartości komórek do data (zamowienia, dostawy), nazwy (nazwa klienta, opakowania, produktu)...
Witam ponownie Bardzo proszę o pomoc. Chciałbym przenieść dane z pliku excela AA do pliku excela BB. W pliku AA dane mogą być wprowadzone wyłącznie przez dodanie nowego wiersza Dane wprowadza się w dwie komórki a1 nazwa przedmiotu i a2 nazwa klienta. Plik BB ma taką liczbę arkuszy ile jest klientów. Chciałbym by nowo wprowadzane dane z Pliku AA przechodziły...
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...
makro usuwanie wiersza makro dodanie wiersza kopiowanie wiersza makro
właściwości karty sieciowej matryca ue50j6200 bezpiecznik wycieraczka tylny
phanick pegasus pomiar indukcyjności
Lampa ostrzegawcza Hörmann SupraMatic E4 - instalacja i konfiguracja Koenic KRVC 2320 RC - migająca dioda niebiesko-czerwona