Zadanie polega na tym żeby skopiować z arkusza nr 1 (Data), tylko te kolumny z którymi pokrywają się nagłówki znajdujące się w arkuszu nr 2 Zadanie polega na tym czego nie dopowiedziałeś. Czy kopiowane mają być wszystkie, czy tylko wyfiltrowane wiersze, jak np. te według "Kolekcja/Seria", wyfiltrowane po "Casual" ? Wyfiltrowanych jest 4 062, a nie...
Zamień w odpowiednim miejscu kod na poniższy: [syntax=vb] If b Like "[ ][ ]333" Then p4 = InStr(a, " 4") p7 = InStr(a, " 7") If p4 > 0 Then x4 = Mid(a, p4 + 1, 5) Else x4 = "" If p7 > 0 Then x7 = Mid(a, p7 + 1, 5) Else x7 = "" t = t & x4 & ";" & x7 & vbNewLine End If [/syntax] Wynikiem jest: 11406;42005;70005 11414;42005;79999 11423;44013;70001 11433;;70000...
Dzień dobry, proszę o pomoc w napisaniu makra (pod przycisk Kopiuj), które kopiowałoby wartości z z kolumn B , AD oraz AE od wiersza 4 poprzedniego (poprzedzającego) arkusza do takich samych kolumn aktywnego. Excelem zajmuję się od niedawna i wszelka pomoc mile widziana.
Koledzy dobrze radzą, ale to trzeba wdrażać od początku projektu. Więc na przyszłość trzeba to zaplanować inaczej. Tymczasem jednak potrzebne jest rozwiązanie doraźne, polegające na kopiowaniu tego co jest. Na razie to jest ilość danych, z którą Excel sobie poradzi, ale jak danych będzie przybywać, to kopiowanie będzie trwało coraz dłużej. Ponieważ...
A jak kopiujesz nie używając skrótu klawiaturowego, a prawego przycisku myszy?
Chciałbym napisać makro No właśnie. Jeśli wiesz jak zajmie Ci to 5 minut. Chcesz się dowiedzieć, czy dostać gotowca (w takim przypadku wrzuć plik z przykładem)? Po mojemu trzeba zadziałać przy pomocy dwóch, zagnieżdżonych pętli, znając ilość kolumn (End(xltoright).column), Nr pierwszego wiersza z nazwiskiem i Nr pierwszego wiersza w arkuszu docelowym....
fragment: [syntax=vbscript] .Cells(Ow - 1, 6).Copy .Range(Cells(Ow, 6), Cells(Ow + Nw - 2, 6)).PasteSpecial _ Paste:=xlPasteFormulas[/syntax] zastąp tym: [syntax=vbscript].Range("F" & Ow - 1 & ":F" & Ow - 1).Copy .Range("F" & Ow & ":F" & Ow + Nw - 2).PasteSpecial _ Paste:=xlPasteFormulas[/syntax] i zmień nazwy kolumn w zakresie....
Witam Dlaczego petla? :) [syntax=vb] m = Month(Date) Range(Cells(2, m), Cells(Cells(Rows.Count, m).End(xlUp).Row, m)).Copy Destination:=Range("N2") [/syntax]
Narzędzia -> ochrona -> chroń arkusz/nie chroń arkusza Jeśli autor ustawił hasło na ochronę arkusza zastosowanie mają dywagacje w powyższych postach.
Piszesz taką formułę =Dane!C1 I kopiujesz ją w bok i dół Jeżeli o to chodzi. Strasznie banalne rozwiązanie, ale generalnie o to chodziło Dzięki! :) Dodano po 38 kopiowanie całych (wybranych) kolumn
Witam, proszę o pomoc w rozwiązaniu następującego problemu. Mam cztery kolumny, a i b w arkuszu 1 oraz c i d w arkuszu 2 które chce porównać ze sobą w następujący sposób. Dla komórki w kolumnie a arkusza 1 chcę znaleźć taką samą komórkę w kolumnie c arkusza 2. Jeżeli nie ma takich samych komórek to wynik = BRAK. Jeżeli znajdzie się odpowiednik to dla...
Analizowałeś to makro? Przyjrzyj się co przypisujesz do zmiennej "multi" i to przed otwarciem pliku źródłowego. Nie powinno być With DoSkop.Worksheets("AKKO"&#... Set reg1 = .Range("a2:a41000")... itd Jeśli filtrujesz, to ustal maskę: fileFilter:="Pliki Excel (*.xl*),*.*," Po mojemu: Albo zostaw to (poprawione) kopiowanie...
Temat zamykam. Wykorzystałam kod luzika z postu Excel Vba - Kopiowanie kolumn po nagłówkach z filtrowanych danych Działa :) Dodano po 1 Excel Vba - Kopiowanie kolumn po nagłówkach z filtrowanych danych
No ale to co przedstawiłeś ma błąd. Wg mnie nie do końca zrozumiałeś przykład przedstawiony przez kolegę adamas_nt . Zauważ że "druga linia"/drugi przypadek liczony jest błędnie (dla ilości 266 sztuk, danej paszy, pomijając jej typ, starczy do 2011-04-09 a nie do 06) gdyż w zamierzeniu kolegi adamas_nt nie było zwielokrotnienie wyników (Przykład był...
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 np. j dla wiersza arkusza-celu, czyli: j = 1 for...
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 pojedynczo ze wszystkich 7 kolumn - czas 36.8 - 37,18 s ....
Wiesz, ja nadal nie jestem pewna, czy dobrze Cię rozumiem, ale wyszło mi coś takiego jak w załączniku. Po uruchomieniu makra pod przyciskiem - wstawia daty, uzupełniając puste komórki. Choć nie odmienia nazw miesięcy przez przypadki - czyli np. 2 wrzesień, a nie 2 września itd.
Wydaje mi się, że lepiej będzie jak "załapiesz" o co chodzi. Pierwotna wersja pętli For Each kom In Selection If Left(kom.Address, 2) = "$G" Then If kom.Value = 1 And kom.Offset(0, 1).Value = "tak" Then ActiveSheet.Rows(kom.Row).Copy Sheets(1).Rows(ostWrs) ostWrs = ostWrs + 1 End If End If...
Dziękuję za pomoc. Najlepszym rozwiązaniem okazało się zrobienie makra, które kopiuje automatycznie zawartość pierwszych trzech kolumn do nowego arkusza.
Dzięki. Dokładnie tak samo próbowałem to zrobić ale trochę to myliłem i do złych kolumn mi wklejało dane.
Jedyne operacje jakie są planowane na tym pliku to: - dodawanie usuwanie i ukrywanie odkrywanie wierszy - kopiowanie wierszy poprzez zaznaczenie całego i wklejanie w ten sam sposób wartości do nowego dodanego wiersza (tutaj wiem już że skopiowane wartości z zaznaczonego całego wiersza i wklejenie ich do nowo utworzonego nie są zapisywane w historii...
W jaki sposób okiełznać tryb zgodności. Są arkusze Excel 2007 - xls w ktorych jest ileś tam danych - ręcznie je przepisać to za dużo roboty i czasu mi nie starczy - musze do jutra skończyć. I jest sobie Excel 2010 którym otwieram te cholerne pliki XLS , nawet zapisałem to cholerstwo pod formą XLSX. I sprawa wygląda tak , z plików xls kopiuję 1 kolumnę...
W załączniku.
Proszę o pomoc, jestem początkujący (bardzo) i mam następujący problem Mam dane w akruszu1 kolejno w kolumnach od A do D 31.05.202113:581020 31.05.202113:587564 ... Potrzebuję skopiować wszystkie wiersze z arkusza1 dla liczby >=31 z kolumny 3 (C) do drugiego arkusza2. Najlepiej jakby skopiowane...
Czyli kolumny B,C z jednego pliku mają być skopiowane do kolumn D, E drugiego? Kolumna A ma pozostać bez zmian (czas i data są różne w obydwóch plikach)?
Tak, w każdym pliku jest jeden skoroszyt o tej samej konstrukcji - sporo wierszy, kilka kolumn wypełnionych danymi. W plikach może być różna ilość danych. Całość chcę kopiować do jednego pliku (dane z jednego, później kolejne wiersze z drugiego, itd.)
O rety, ale mam zaskok :) W załączniku rozwiązanie z kolumną pomocniczą.
Witam Jestem zupełnie zielony jeśli chodzi o makra i potrzebuję pomocy szanownych kolegów. Mam w arkuszu dane, dużo kolumn i dużo wierszy. Prosiłbym o pomoc w napisaniu makra, które sprawdza wartości w jednej z kolumn np BT i jeśli w aktualnie sprawdzanej komórce występuje jakaś wartość (komórka nie jest pusta) kopiuje cały wiersz do innego arkusza,...
Plik spakowałam, bo nie pozwalało mi dodać pliku z rozszerzeniem *.xlsm. Nazwy Arkuszy w moim zapytaniu podałam przypadkowe, nie będą tak się nazywać. Tworzę plik na własne potrzeby, który ma ułatwić rozliczanie pracowników z wykonanej pracy. Pracownicy mają bardzo podstawowe umiejętności z excela. Każde zlecenie składa się z kilku etapów. Zleceń jest...
Tak. Tyle, że w zależności od poziomu zabezpieczeń może być monit lub przy wysokim poziomie może nie działać makro/makra.
nanTye , jeśli to jest Twój cały kod, to z zakresu źródłowego wklejasz tylko szerokości kolumn, a jeśli wklejasz pod spodem, to de facto nic nie zmieniasz, bo szerokości kolumn są i tak jednakowe. Musisz określić, co dokładnie chcesz wkleić z zakresu źródłowego i użyć odpowiedniej stałej w PasteSpecial, a jeśli chcesz skopiować wszystko, to wystarczy...
Witam. Ja może dokładnie po kolei odpowiem na pytania, które mnie zaskakują, bo nie wiedziałem i nie wiem, że można takie rzeczy robić. Teraz już jestem pewny, że biorę udział w "koncercie życzeń" - to niesamowite. Nie będę się dziwił, że informatyk napisał program po swojemu, bo jak widzę, to będzie to lepsze, a ja nie miałem nawet odwagi o czymś takim...
Faktycznie nie precyzyjnie. Oczywiście cały czas mam na myśli nowy skoroszyt. Mówiąc typ, mam na myśli listę którą rozwijam w filtrze. Piszę ogólnie, bo makro po przeróbkach przydałoby mi się do kilku czynności które wykonuję w pracy, i zdecydowanie by mi ją usprawniło. Generalnie chodzi o filtrowanie po kolei to co mam na liście w kolumnie E, kopiowanie...
Dzień dobry, Na wstępie chciałabym zaznaczyć, że jestem zupełnym laikiem jeśli chodzi o bardziej zaawansowane działania z wykorzystaniem formuł EXCEL. Przejrzałam tematy wydające się być podobne do tematyki mojego problemu, jednak nie znalazłam konkretnej odpowiedzi. Mam następujący problem. Chciałabym, aby po wprowadzeniu określonej wartości w Arkuszu...
[syntax=vbscript]Sub NowaKolumna() nk = Cells(60, Columns.Count).End(xlToLeft).Column + 1 Range("H60:H80").Copy Cells(60, nk) Application.CutCopyMode = False End Sub [/syntax]
Jak masz już zapamiętany w zmiennej numer kolumny, to możesz odwołać się do komórki w trzecim wierszu przez [syntax=text]Cells(3, numer_kolumny)[/syntax] Jeśli potrzebujesz się odwoływać za każdym razem do innej kolumny, to: [syntax=text]Cells(3, ActiveCell.Column)[/syntax]
Przyszło mi jeszcze do głowy coś takiego. Jeśli ilość słów jest znana (powiedzmy max 10), to: - zamienić ręcznie wszystkie separatory na spację (edycja -> zamień), - wybrać poszczególne słowa w osobnych kolumnach (kolumna X słowo 1, kolumna Y słowo 2, itd): http://www.ozgrid.com/Excel/extract-word... - potem w kolejnych 100 kolumnach zrobić wyszukaj.pionowo...
Czy wiesz, że w "Arkusz2" prawdopodobnie w wyniku kopiowania, wklejania a następnie usuwania wierszy jest ponad 500 przycisków o nazwie "CommandButton1"? Kiedyś był już podobny temat poruszający ten problem. Kopiowanie i wstawianie wiersza z przyciskiem działa OK, ale usunięcie wierszy powoduje układanie się obiektów w stosik, z których widoczny jest...
Może coś w numerach kolumn się poprzesuwalo... Jak będzie problem, to podeślij kawałek tego arkusza. Napisz też jeśli chcialbys, zeby zliczal to bez uzupelnionych nazw w arkuszu podsumowania .
Witam. Nie mogę uporać się z kopiowaniem zmiennego zakresu z jednego arkusza do drugiego. Sytuacja wygląda następująco. Z arkuszua1 kopiuję zakres np. A2:M20 (ilość kolumn jest zawsze stała, ilość wierszy się zmienia) i musze go wkleić do arkusza2 od kolejnej niepustej komurki w kolumnie A. Z góry dzięki za wszelką pomoc. Pozdrawiam MałyLesiu
... jak powinien wyglądać kod? 1. Deklaracje planowanych zmiennych/stałych pracujących w procedurze 2. Przypisania wstępne/wyjściowe do powyższych 3. Pobranie danych o nagłówkach - do tablicy lub bezpośrednio, w locie ... np.: PRL , do wyszukiwania w pierwszym, nagłówkowym wierszu arkusza z tabelą ... np.: [syntax=vbscript] With .Range(.Cells(1, 1),...
Witam, Posiadam plik z ok 30 akruszami, w których dane posortowane są w identycznych kolumnach zaczynających się od komórki O12 we wszystkich arkuszach. Jedna z kolumn np. S12 sortuje dane w systemie 0-1. tzn 1 dane spełniają dany warunek, 0 dane nie spełnią warunku. Jak w łatwy sposób można doprowadzić do sytuacji w której dane z 30 arkuszy pojawiają...
Cześć, Mam plik z danymi, który zawiera 2 arkusze. Chce, aby makro: 1. w arkuszu 1 odfiltrowało unikatowe wartości z kolumny 4 i wartości z tablicy z kolumny 5 2. utworzyło nowe skoroszyty dla każdej unikatowej wartości z kolumny 4 i wkleiło tam dane i zapisało plik 3. przeszło do arkusza 2 4. odfiltrowało dane w arkuszu 2 po tych samych filtrach, co...
Witam Temat niestety oklepany - na swoje usprawiedliwienie powiem, że przeszukałam forum i usilnie staram się dopasować znalezione wskazówki i fragmenty makr do swoich potrzeb. W pewnym stopniu mi się udało, ale gdzieś jest błąd którego nie potrafię namierzyć. Zależy mi na tym, żeby wyszukiwana nazwa ulicy została znaleziona w Arkuszu "Baza" a następnie...
W drugiej tabeli wpisujesz funkcję: =WYSZUKAJ.PIONOWO("RED";zakres;Nr kolumny) Jeśli szukasz tylko zmiany "RED" możesz nie zmieniając kolumn wykorzystać funkcję JEŻELI. Możesz też w arkuszu roboczym użyć filtrowania (w tabeli działa to bardzo fajnie).
czy może mi ktoś w temacie pomóc. Dostałem podpowiedż że można tutaj uzyć funkcji wyszukaj.pionowo ale nie wiem jak ja w tym wypadku zastosowac, gdyż ona fajnie działa dla dwóch kolumn a nie czterech. Obawiam sie ze tu trzeba jakieś makro napisać.
Witam, mam taki problem potrzebuje makro, które znajdowałoby mi wartość w kolumnie B - || i kopiowało imię nazwisko oraz numer do stworzonego wiersza poniżej. Jeśli w kolumnie autorzy jest jeden autor skopiować dane do kolumny powstałej C stan początkowy http://obrazki.elektroda.pl/8788959900_1... efekt jaki chce uzyskać http://obrazki.elektroda.pl/8298584700_1...
Moje rozwiązanie: - zrób kopię pliku "Budynki", - otwórz plik kopii budynków i "Analizy" - zmniejsz okna otwartych już plików tak aby były widoczne dwa na jednym ekranie - metodą przeciągnij i upuść, przeżuć zakładki które potrzeba to pliku "Analizy" To rozwiązanie nie przejdzie ponieważ ja chcę, żeby program automatycznie, po użyciu skrótu klawiszowego,...
Witam Otóż mam pytanie związane z makrami bądź też z programowaniem w VBA. Ponieważ jestem nowicjuszem ale coś liznąłem w tym kierunku. Mam do zrobienia jedną rzecz w excel'u, a mianowicie. Mam 5 kolumn z danymi, pozycji jest (wierszy) coś ponad 14000 ale to jest mało istotne. W 6 kolumnie mam dodane checkbox'y dodane przez formanty formularza(Nie wiem...
Dziękuję bardzo zaraz to przetestuję. A mogłabym prosić o makro, albo jakiekolwiek wskazówki? Dodano po 9 Makro-ponieważ to będzie też dotyczyło kolumn G i A, porównywanych z kolumną H. Dodano po 1 Dla kolumny G formuła działa super. Ale mam problem z kolumną A-porównanie wg formuły z kolumną H- ale tutaj potrzebuję by w ramach wyniku pokazał mi wszystkie...
Witam. Funkcja ta niestety MUSI mieć poszukiwaną daną w lewej ( tzn. w 1-szej) skrajnej kolumnie tablicy. Natomiast nie musi podawać danej z 2 kol. ale z dowolnej. Moja rada: zamień poprzez kopiowanie lub wycinanie potrzebne kolumny ( 2 z 1) , jezeli nie możesz , to w oddzielnej części arkusz skopiuj całą tablicę (możesz ukryć kolumny skopiowane tak...
Powstał dla mnie jeszcze jedna kwestia, powstała ona w momencie gdy jedna z kolumn w pliku źródłowym nie występuje ( np wartości opisane jako B - plik źródłowy nie generuje danych z takimi wartościami, pomija taką kolumnę ) W związku z tym czy można zmodyfikować kod wgrywania danych tak, aby dane jeszcze były porównywane po wartościach z pliku docelowego...
Witam Kopiowanie danych z arkusza do arkusza można znaleźć, mój problem jest bardziej złożony w jednym arkuszu mam tabelę o ściśle określonym wzorze, ten wzór to tabela z nagłówkiem i stopką które muszą pozostać niezmienione na każdej stronie arkusza, dane są wpisywane w 8 wierszy i 10 kolumn, tabela to jedna strona A4 na wydruku, w drugim arkuszu mam...
Skorzystałem z pierwszej opcji (makro) i działa, zmodyfikowałem już sobie makro dla wypełnienia 10 kolumn jednocześnie (w każdej inny wzór) Drugą opcję sprawdzę w wolnej chwili. Mam jednak jeszcze jeden mały problem z arkuszem. Ponieważ nie wszystkie pliki do których jest odwołanie jeszcze istnieją, (będą powstawać i mają się same uzupełniać w zestawieniu)...
Nie wiem czy dobrze orientuje się w tym co chcesz osiągnąć ale kopiowanie zawartości możesz zrobić za pomocą "&" czyli jak chcesz w kolumnę C wstawić B i E to wpisujesz =komórka_kolumny_B&" "&"komórka_kolumny_E Jeśli nie o to Ci chodzi to odpisz bardziej swój problem.
Witam, Od pewnego czasu próbuje znaleźć rozwiązanie do bardzo czasochłonnego procesu kopiowania.. Przejdę do rzeczy. Mam plik (Excel), w którym posiadam indeks kolumn, oraz wierszy, niech: A2: PH1, A3: PH2 . . itd aż do np. . A1013: PH1012 oraz (indeks wierszy) B1: c01 ; C1: c02 ... itd aż do... CZ: c... Adresy poszczególnych indeksów np. C14 jest równe...
Witam, Używam Excela 2007. Potrzebuję informacji jak skopiować dane z jednej kolumny(A) do drugiej (B), żeby informacje się nałożyły na siebie ? w jednym wierszu niektóre pola w kolumnie A są puste, a w kolumnie B uzupełnione. w innym wierszu jest na odwrót. Dlatego potrzebuję skopiować te kolumny w jedną całość do osobnej kolumny C, w której wszystkie...
Witam. Proszę o pomoc w napisaniu makra bo jestem początkujący w tym temacie. Potrzebuję napisać makro, które skopiuje dane z tebeli po wcześniejszym przefiltrowaniu przy wykorzystaniu napisanego do tego celu marka, które już mam do drugiego pliku, które to makro samo otworzy. Do tej pory udało mi się stworzyć makro, które otwiera mi odpowiedni plik...
Witam Musze przekopiować wiele pojedynczych komórek z jednego arkusza do drugiego. Kopiowanie danych musi się odbywać z zachowaniem formatowania i odniesienia do list słownikowych. Kopiowanie odbywa się po jednej komórce ponieważ makro musi być uniwersalne i pod parametry w i k, poz i kol_doc wpisywać zadane wartości. Przy poniższej operacji trwa to...
Hej, czy mógłby ktoś mi pomóc poprawić poniższy kod, który ma pobierać do Arkusza "BAZA" dane ze wszystkich pozostałych arkuszy w tym skoroszycie, jeśli wiersze zaczynają się od niepustej komórki A. Problem polega na tym że jeśli w którymś arkuszu w kolumnie A jest pusty wiersz, to makro nie pomija tego pustego wiersza idąc do następnego wiersza w tym...
Cześć to załączona moja baza danych i exel który zasysa z niej dane Szkoda kolego, że za każdym razem przesyłasz co innego i nie czytasz moich postów. Na podstawie Twojego pliku wynikowy.xlsx wyciągnąłem błędne wnioski co do poprawności budowy tabel bazy danych i możliwości ich wykorzystania do złożonej analizy danych :cry: Nie przekonwertowałeś wprawdzie...
Trzeba dołączyć nie obrazek, tylko plik Excel, a następnie można pokazać na Twoim przykładzie. W skrajnym przypadku powinny być widoczny nazwy wierszy i kolumn.
zaproponować takiej opcji: Utwórz kopię pliku źródłowego, wierszy i kolumn zawierających poufne informacje nie są cięte (jasne, Wymaż) i wysłać na mój e-mail. na innym komputerze będzie polskie ustawienia regionalne i musi doprowadzić to do końca Oryginalny plik źródłowy wygląda identycznie jak ten 20 MB plik (okład kolumn i wierszy jest dokładnie...
Ad.2 Kopiowanie wiersza z przysikiem, to żaden problem. Problemy zaczynaja sie przy usuwaniu wierszy, bo przycisk zostaje i zwykle nakłada się na następny. Po jakimś czasie może być ich mnóstwo "na kupce" Ad.1 Napisać makro wg Twojego opisu, to, na oko, żaden problem. Sugerowałbym którąś z procedur zdarzeniowych arkusza (Np Change dla kolumn H, I, J,...
Witam, Z góry proszę o wyrozumiałość, jestem początkującym użytkownikiem VBA. Mam następujący problem. Mam bazę w excelu, która składa się z kilku kolumn (klient, kolejne lata w podziale na kwartały), następnie w wierszach umieszczona jest nazwa klienta i dla każdego okresu w 4 wierszach przychody, koszty, marża (każda z tych wartości jest wyliczana...
Witam, Wiem że ten wątek się przewija co pewien czas, ale nie znalazłem tam potrzebnych mi informacji. Będę wdzięczny za jakieś podpowiedzi. Oto moje problemy: Tworzę coś w rodzaju raportu/ zestawienia podsumowującego kolejne miesiące. Aby to zrobić muszę to tego raportu zaciągnąć dane z pozamykanych plików (ok 30). Każdy z plików ma wiele pozycji (czasem...
może przykładowy plik trochę rozjaśni sytuację Z podkreśleniem tego trochę :D Jeśli w arkuszu CT umieścisz makro typu: 1022670 Zwracam uwagę na zmienne l i kol, których wartość została przyjęta dla Twojego xxxx - owego przykładu :cry: i które muszą być dostosowane do wartości rzeczywistych w pliku roboczym.
Oj. Zapomniałem, że składanie stringa realizowane jest w funkcji. Jeśli zmieniasz zakres dla Target.Range, zmień również Nr kolumn w funkcji. Kolejne poprawki trzeba wprowadzić w adresach komórek docelowych. Będzie zawsze o 1 w prawo niż w Target.Range. Np dla tabeli A:I, wynikowa to "J", czy idx 10 ( W przykładowym pliku jest 'For i = 1 To 9' dla kolumn...
A zmienić tu[syntax=vb]wiersz = wswyn.Range("a1048576").End(xlUp).Row + 1 'ostatnia wolna komórka w tym pliku[/syntax]oraz tu[syntax=vb]wswyn.Range("A" & wiersz & ":S" & wiersz).Value = wsSrc.Range("A" & nnn & ":S" & nnn).Value[/syntax]nie wystarczy?
Ponieważ miałem chwilkę czasu to pozwoliłem sobie pobawić się z rozwiązaniem. i proponuje np tak: [syntax=vb]Sub przestaw() 'czyszczenie Sheets("Tabela").Cells.Delete Shift:=xlUp 'Obliczenia graniczne ost_wiersz = Sheets("Dane_wyjściowe").UsedRange.Rows.... ost_kol = Sheets("Dane_wyjściowe").UsedRange.Colum... x = ost_kol - 7 If x <= 0 Then...
Dzień dobry, Bardzo proszę o pomoc z makrem, potrzebuje pętle które będzie miała za zadania kopiowanie i wklejanie w odpowiednie komórki między arkuszami aktualnie mam napisane makro ale niestety sam nie potrafię jeszcze stworzyć takiej pętli Dodano po 3 Mam już coś takiego ale jeszcze nie jest to co bym chciał osiągnąć Potrzebuje dla następnego wiersza...
Jest w Excelu dodatek darmowy Power Query do wersji 2010 i 2013 a od wersji 2016 jest wbydowany który potrafi to zrobić bez VBA Tu masz link jak to zrobić Pozdrawiam. https://www.youtube.com/watch?v=oAOXgHq0...
Witam, Opcja "Zachowaj szerokości kolumn źródłowych" pozwala na ustalenie szerokości kolumny, do której dane zostały przekopiowane, takiej samej, jak ta, z której dane zostały zaznaczone do kopiowania. Przykładowo: masz w kolumnie A wpisane kilka osób z imieniem, nazwiskiem, PESELEM - czyli długi tekst dla każdej komórki. Kopiujesz, wklejasz w kolumnę...
Ponieważ "kopiowanie" samego kodu towaru było zbyt proste :please: dołożyłem jeszcze wprowadzenie ilości (np. sprzedanych towarów :?: ) jak na zrzucie i w załączonym pliku :spoko: 1052538 1052540
Witaj. Zakładając, że oryginalne dane na pierwszym arkuszu, a wynik na drugi: [syntax=vb]Sub upraw() Dim bsk As Range, bsr As Range Dim rb&, rd&, cd&, cm& Set bsk = ThisWorkbook.Sheets(1).Columns(1).Cells Set bsr = ThisWorkbook.Sheets(1).Range("B:J").Rows rb = 2: rd = 2 With ThisWorkbook.Sheets(2) bsk(1).Copy .Cells(1, 1): bsr(1).Copy...
chcę to zmienić na przycisk To proponuję wykorzystanie kodu typu :spoko: : [syntax=vbscript]Public Sub Powiel() i = 2 Do Until IsEmpty(Cells(i, 7)) If Cells(i, 7).Value > 1 Then a = i + 1 b = a + Cells(i, 7).Value - 2 Range("A" & i & ":K" & i).Select Selection.Copy Range("A" & a & ":A" & b).Select Selection.Insert Shift:=xlDown Range("G" & i & ":G"...
Witam Tabela przestawna nie pasuje?
A kopiowanie formatowania nie wystarczy? Pytanie jest bardzo nieprecyzyjne. Kiedy to kopiowanie miałoby nastąpić - na życzenie, po zaznaczeniu komórek do skopiowania, czy automatycznie - gdy zmienia się coś w komórce (to jest trudniejsze)? Poza tym, czy komórka zawiera coś oprócz tego koloru, co ma być pominięte przy kopiowaniu? Czy chodzi tylko o kolor...
Ale jakich makr nie umiesz stworzyć? Ja tego nie zrozumiałem. To po kolei: 1. Do arkusza "Firma 1" wklejam dane z innego pliku od kolumny E do AB - mniej ważne gdzie to wklejasz, ważniejsze co dokładnie. Czy umiesz określić zakres do kopiowania? np. A5:Z123, albo kolumny A do Z od wiersza 5 do ostatniej wartości w kolumnie C (nie może być w tej kolumnie...
nie mogę znaleźć rozwiązania a potrzebuje go dość szybko Ale w czym problem? Wystarczy nagrać makro, ściągnąć z internetu gotową funkcję 'LastRow' lub nagrać kombinację Ctrl+strzałka w dół, podstawić zmienne i "posprzątać" po rejestratorze (tu z pewnością ktoś pomoże). Próbowała koleżanka?
Proponuję w kolumnie B arkusza 'Guest' trzymać imię i nazwisko.
Możesz wrzucić plik (jako załącznik) z przykładem? p.s. Plik od v. 2007 wzwyż spakowany ZIP-em lub RAR-em.
Jednak wtedy kopiowanie danych różniących się do "pustych miejsc" trzeba będzie dokonać "na piechotę" Jeśli w kolumnie "title" nie będą występowały powtórzenia danych (duplikaty) to całą robotę wykona proponowana formuła przeciągnięta do dołu wynikowej tabeli :-)
W kolumnach L,N,O,P masz "normalne" formuły, które odwołują się tylko do danych z bieżącego wiersza. Takie formuły można kopiować bez ingerencji w inne formuły. Excel nie ma problemu z ich kopiowaniem. Jeśli chodzi o formuły z kolumn A i C, to one zawierają odwołania do innych wierszy i przy wstawianiu wierszy (a także usuwaniu) Excel nie wie, do czego...
Skorzystaj z Union(). Przykład: [syntax=vb]Sub zaznacz() Set reg1 = Range("a1:a10") Set reg2 = Range("d1:d10") Set reg3 = Range("f1:h10") Set multi = Union(reg1, reg2, reg3) multi.Select End Sub[/syntax]
Tak "skok" to wiersz()*3 (funkcja wiersz() zwraca nr wiersza w której jest wpisana ta funkcja) w związku z powyższym: -3 i -4 to "korekta" początku Jeżeli zmienisz komórki z danymi i komórki z "wynikami" może być konieczność skorygowania właśnie tego początku i ewentualnie kolumny w funkcji adres.
Listę, prawdopodobnie, można uznać za skończoną, jeśli ilość elementów z kolumny nazwisk będzie równa liczbie elementów kolumny karty ocen, tak więc przed wywołaniem formy porównaj liczbę niepustych komórek w obydwu kolumnach i jeżeli jest równa pomiń aktywowanie formy
Jeśli dobrze zrozumiałem że trzeba, następnie zdecydowanie tak tylko za co został w A następnie formuła, może tylko numeracji?
Ręce opadają :) To co Ty właściwie chcesz zrobić? ale jeśli dane są pobierane z internetu Dane z internetu wprowadzaj od razu do "z góry upatrzonego" zakresu. lub np z innej komórki Oprogramuj tą "inną komórkę"... Co to znaczy "z automatu"? Żeby coś się zmieniło w arkuszu, najpierw musi się coś wydarzyć.
Bez VBA się raczej nie obędzie. Są co najmniej dwa wyjścia (w pętli): 1. Filtrowanie i wydruk po każdej zmianie parametrów 2. Arkusz tymczasowy (czyszczenie, kopiowanie warunkowe, wydruk) Które wydajniejsze? Stawiam na Nr.1
Witam, Mam zakres danych a1:l52, interesowało by mnie jakiego użyć kodu ażeby kopiowało mi wiersze gdzie w kolumnach od b do l są dane. ważne żeby przy kopiowaniu wiersza do nowego arkusza kopiowało również wartość z kolumny a
czy jest jakieś narzędzie w Excelu które umożliwia zmianę kolumny D na podstawie C? Narzędziem do tego celu są formuły. czyli jeśli mamy kraj GB w kolumnie C to chciałbym dopisać w kolumnie D +44 i analogicznie dla całej reszty symbol + W kolumnie E (pole E2) wpisz sobie formułę [syntax=vb]=JEŻELI(C2="GB";"+44"&D2;"+"&... A następnie przeciągnij...
Podwójne kliknięcie w kolumnie 'Klient'.
Podałeś zdecydowanie za mało informacji. Jeśli Twoje dane robocze liczą ok. 10 tys. wierszy, to przykład powinien obejmować ok. 50 wierszy w reprezentatywnym układzie. Należy to pokazać w załączonym pliku wraz z oczekiwanym wynikiem. Z przykładu, który pokazałeś nie wynika m.in. 1) czy wszystkie wartości w kolumnie A występują parami, czy mogą też być...
nie ułożonych po kolei Wtedy uzyj =INDEKS(kolumna_bazy; C1)
Z trzema kolumnami pomocniczymi wychodzi jak w załączniku. Uwaga: konieczne wstępne posortowanie danych wg. kol. "A" oraz kopiowanie formuł o jeden wiersz niżej od zakresu danych.
Przy założeniach że w arkusz1 dane w kolumnie A rozpocząć 3 wiersz, tabela na arkusz2 rozpoczyna się w 2 wiersze =INDEKS(Arkusz1!A:A;(WIERSZ()-2)*45+3)
czyli np.: =arkusz1!A1 jak przeciągnę tą formułę w bok (poziomo), to excel automatycznie w następnej komórce skopiuje dane z komórki B1, czyli =arkusz1!B1, a chciałbym żeby w następnej komórce była wartość z komórki A2, czyli =arkusz1!A2 Hmm, to jeszcze byłoby wykonalne. Jeśli kolumny po kolei w jednym wierszu, to skąd wiadomo gdzie ostatnia komórka...
No i masz odpowiedź! Wywal dolary i będzie OK! Pierwszy $ ustala kolumnę, drugi wiersz. $X$Y to stały adres komórki, nie zmieni się przy kopiowaniu.
Już w poprzednim wątku zwracałem uwagę, że dane mają być reprezentatywne. Tam nie było nic o tym, że numery bloków mogą się powtarzać i wobec tego w kodzie była wykorzystana zmiana numeru bloku w stosunku do poprzedniej. Teraz przyjąłem, że jeśli blok jest złożony z kilku elementów, to numeracja po / zaczyna się od 1. Trzeba te bloki jakoś rozróżniać....
kopiowanie kolumn excel excel makro kopiowanie kolumn kopiowanie dodawanie kolumn excel
cewka sprzęgająca singer chwytacz outlook indeksowanie
zmywarka whirpool wgranie plików rozruchu
Iveco Daily 35S13 2.8 2004 – brak działania licznika, obrotomierza, wskaźników i podświetlenia Whirlpool AFG 070E-AP – lokalizacja czujnika temperatury, kapilara termostatu, zamrażarka skrzyniowa
