Dobry wieczór, Nie znam się na SolidWorks, ale w kodzie VBA widzę przynajmniej dwa błędy: pierwszy w połączeniu Range("Q5...BJ5").Selection.Copy Powinno być rozbite na dwie instrukcje Range("Q5...BJ5").Select Selection.Copy Można też pominąć selekcję i pozostawić tylko: Range("Q5...BJ5").Copy Drugi błąd: Active.Worksheet.Paste Po pierwsze ta instrukcja...
Dlaczego nie załączyłeś pliku? Przecież na obrazku niczego nie można sprawdzić. Podejrzewam, że linie obramowania, które Ci się nie kopiują są przypisane do sąsiednich komórek. Ramka rozdziela komórki, ale nie musi być przypisana do obu, może być przypisana tylko do jednej z nich. Wtedy przy kopiowaniu trzeba zadbać o to by obramowania były przypisane...
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 pustej komórki w kolumnie C.
Sprawa jest bardziej skomplikowana niż się na pierwszy rzut oka wydaje, bo Target.Value w zdarzeniu Change będzie też przyjmowało puste wartości (przy czyszczeniu/usuwaniu komórki), a także może być zakresem Range() np. przy kopiuj - wklej do kilku komórek (podobnie przy czyszczeniu zakresu komórek), przez co makro będzie się wywalać. Trzeba ew. je...
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...
I teraz zupełnie nie wiem co mam zrobić z makrem które zrobiłeś, za duże uproszczenie. Przepraszam.. Mam je trochę skomplikować?? ;) Wydaje mi się że tutaj powinnam wstawić fragmenty odpowiedzialne za kopiowanie: Napisałaś, że warunkiem kopiowania jest: Kopiuje wartości które spełnią warunek taki że kolumna "B" zawiera "tak" do ostatniego pełnego wiersza...
Działa świetnie, dziękuję! Mam jeszcze pytanie. Jako że ten plik był testowy podałem tylko dwie dane do kopiuj/wklej. Czy jest możliwość uniknięcia efektu "migania" w chwili gdy wykonuję makro na dużym zakresie danych.
Dzięki wielki wszystko ok Jeszcze was trochę po mecze. A jak przerobić to makro tak żeby działało na zakresach to znaczy z jednego pliku kopiuje np. plik A sheets(1).range("C6:E16";"B19:B20") i żeby te zakresy wklejało mi w tym aktywnym pliku w różne miejsca np. zakres1Plik B Sheets(1).range("H6:J16";"G19:G20"), zakres2 plik B sheets(1).range("M6:O16";"L19:L20")...
1. Załóż filtr w oryginalnej tabeli (niepuste) -> zaznacz całą tabelę i wtedy dopiero kopiuj dane . Może nawet lepiej wklejać "tylko wartości" niż dane z pełnym formatem każdej kopiowanej komórki. Zrobisz to w jednym ruchu zamiast korzystać z pętli (2000 razy). Po nagraniu makra można edytować zaznaczony zakres tak, żeby najlepiej nam odpowiadał. 2....
Jestem słaby w pisaniu makr dlatego zwracam się z prośbą o pomoc w napisaniu jednego A Twój Excel 2010 odmawia Ci pomocy w tym zakresie :?: :D Wciśnij przycisk zarejestruj makro - wykonaj wszystkie operacje, które chcesz zautomatyzować :!: Potem zamknij rejestrator, sprawdź czy działa właściwie ? Jeśli nie to wtedy wrzuć tu na forum, żeby go udoskonalić...
Można wykorzystać skróty klawiszowe. Załóżmy taką sytuację: W kolumnie B ciąg jakiś danych, w C3 formuła do skopiowania http://obrazki.elektroda.pl/3064735200_1... Podręcznikowo: chwytasz za uchwyt C3 i przeciągasz w dół. Na skróty: 1. Klik w B3 2. Ctrl+strzałka w dół (przechodzę do ostatniej niepustej) 3. Strzałka w prawo (przejście do kolumny...
Cześć, Mam problem z makrem dotyczącym kopiowania kolumny A i po każdorazowym kliknięciu "przycisku" wklejania do kolejnej kolumny. Na zasadzie zaznacz całą kolumnę A i wklej (z formułami) do kolumny B, po kolejnym kliknięciu znów zaznacz kolumnę A i wklej do C itd. Byłbym mega wdzięczny za pomoc. Jestem zielony a potrzebuję takiej opcji do analizy....
Mysle ze podstawowym problemem jest: a1:iv65536 I tu jesteś w błędzie. Zbiór zawiera się w zbiorze. W drugą stronę byłoby to bardziej prawdopodobne. Czasem zdarza się, że wcześniej autor nie przewidział rozrostu arkusza i zadeklarował zmienną odnoszącą się do Nr wiersza jako Integer, ale to raczej dotyczy wszystkich wersji. Najczęstszą przyczyną "wysypywania"...
Chciałam, zeby zaznaczyło mi wiersze od 1 do n+1 :) Ewentualnie, aby zaznaczyło obszar A1:Sn+1 Jendak jak próbuje zrobić zakres zaznaczenia Range("n:n").Select lub Range("A1:Sn+1").Select, wyrzuca mnie z Excela :/
Witam Jestem jeszcze zielony w makrach excel, dlatego potrzebuję Waszej pomocy. Chciałbym stworzyć makro kopiujące dane z wielu plików excel do jednego pliku zbiorczego. Założenia: 1. Wiele plików dawców *.xls o różnych nazwach znajdujących się w tym samym folderze 2. Kopiowanie z pliku dawcy z zakresu arkusza "Tabela wyników" z komórek A2 do D51 3....
Cześć Wszystkim Proszę o zrozumienie ale dopiero raczkuję w vba i staram się sam rozwiązywać problemy ale teraz obecny problem mnie przerasta. Mam 12 tabelek, każda tabelka to jedno podejście do badań przez osobę kontrolującą . Uzupełnia wyniki i blokuje Swoją część. Ponieważ mój czysty formularz zawiera 12 takich tabelek chciałbym stworzyć takie makro...
Dzięki za szybką odpowiedź. Niestety masz rację i niedokładnie opisałem problem i nie dostałem tego czego oczekiwałem. Przepraszam. Postaram się dokładniej przedstawić całą sytuację. Co miesiąc dostaję zbiorczy plik z danymi (Raport), jeden wiersz arkusza odpowiada jednemu handlowcowi. Ponadto każdy handlowiec ma swój indywidualny plik. Pod koniec miesiąca...
Dzień dobry, Jeśli rozwiązanie ma być w Excelu to należy użyć funkcji JEŻELI np. =JEŻELI(A1>151;150;A1). Formułę można potem skopiować, aby objąć wynikami cały zakres. Można też najpierw zaznaczyć zakres, wprowadzić formułę i nacisnąć Ctrl+Enter, nie trzeba już będzie kopiować. Wyniki można zamienić na stałe, jesli to konieczne. Skopiować Ctrl+C, potem...
O takie makro mi chodzilo. W moim arkuszu mam dwie zakladki o identycznym ukladzie wierszy i kolumn. Chcialbym aby makro dzialalo niezaleznie na obu. I jeszcze jedno pytanie. Moj oryginalny arkusz jest dosc odszerny w ilosci danych tak wiec po uruchomieniu zajmuje to odrobine czasu. Czy istnieje sposob aby przyspieszyc makro/otwieranie pliku np. przez...
Otwórz plik 'zeszyt1'. Włącz nagrywanie makra. Otwórz plik H:\DANE\Dane.xlsm, wybierz arkusz 'BBB, zaznacz zakres 'A2:F2000'. Naciśnij 'kopiuj'. Otwórz okno pliku 'Zeszyt1'. Kliknij na arkusz 'AAA'. Kliknij w komórkę A2'. Kliknij 'wklej' i zapisz makro, które potem będziesz wykorzystywał.
próbowałeś z $ przy adresach komórek w formułach? wtedy przy przeciąganiu zmieniasz tylko potrzebny zakres. czasami trzeba przeciągnąć w pionie zamiast w poziomie aby otrzymać właściwe odwołania w formułach i później zrobić kopiuj >wklej specjalnie> formuły (transpozycja)
Witam. Bardzo proszę o pomoc w makrze, które przenosiłoby wartości z tych samych komórek w jednym pliku do takich samych komórek w innym pliku. Np z pliku 1.xls Arkusz1 do pliku 2.xls Arkusz2 komórek z zakresu B8:Z47; B53: Z92; B98:Z137. Nie chodzi mi o kopiuj/wklej lecz przeniesienie wartości.
Witam wszystkich Potrzebuję pomocy w stworzeniu makra działającego wg poniższego 1. w arkuszu "dane2" mamy cennik produktów 2. w kolumnie E są przyciski pod które muszę podpiąć makro; przycisk z E2 kopiuje wartość komórki C2 do arkusza "dane1"w pierwszą wolną komórkę z zakresu A3:A20; przycisk z E3 kopiuje wartość komórki C3 do arkusza "dane1"w pierwszą...
Prawie działa, tylko potrzebuję by było wklej specjalnie - wartości . Przy takim zapisie jak poniżej nie wiem gdzie to wpisać
Cześć, Potrzebuję pomocy przy napisaniu makra, które będzie kopiowało i wklejało dane - a konkretnie musi do być pętla, ponieważ tych danych jest sporo. Niestety jestem początkująca i potrafię to zrobić tylko na piechotę... Poniżej przykład kodu: [syntax=vbscript]Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets("Arkusz1") With ws .Range("K2:M2").Copy...
Witam mam problem z budową makra. Za pomocą przycisku uaktywni się makro: 1. Kopiuj Komórkę X z zakładki A 2. W zakładce B w zakresie A1; A150 znajdź komórkę Y (która jest zmienną i jest przypisana do komórki zakładce A) 3. Wklej komórkę X w wierszu komórki Y w pierwszej nie pustej komórce, która jest nie większa od 10 (ograniczony zakres) Nie wiem...
Witam, Potrzebuję zrobić przycisk, który skopiuje mi wartości z zakresu komórek i wklei je w miejscu, które jest okreslane w nastepujący sposób: Mam komórkę z daną wartością np. 4 i teraz chce aby po kliknięciu w przycisk skopiowały się komórki określone w makro i wkleiły się o dana ilość kolumn w prawo od referencyjnej kolumny/komórki. Poniżej kod,...
Witajcie, mam dość według mnie ciężki temat do zrobienia. 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 pracownika do PH1. Ilość zapisanych...
Cześć, potrzebuję pomocy. W załączonym pliku znajdziecie arkusze: - weryfikacja - firma 1 - firma 2 - kodowanie firma 1 - kodowanie firma 2 Przystępując do pracy: 1. Do arkusza "Firma 1" wklejam dane z innego pliku od kolumny E do AB 2. Uzupełniam formułę w kolumnie A 3. W kolumnę B wpisuje "F1" 4. Kopiuję kolumnę A i wklejam do arkusza "Kodowanie Firma...
dla kazdej kopiowanej komorki z pliku zleceniexxx mam zastosowac petle, ktora bedzie przenosic/kopiowac wartosci ze zleceniexxx do zestawienie_szef ?? Można i tak. Skoro jednak ustaliliśmy, że kształt zakresów jest taki sam, to znacznie szybciej będzie zaznaczyć CAŁY zakres w zleceniu -> skopiować go -> wskazać u szefa komórkę "startową" (lewy górny...
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...
Szczerze mówiąc makro które zostało wklejone zrobił automatyczny generator makr, dlatego może być tutaj dużo "śmieci". Jak najbardziej zamiast całej komórki może być kopiowana sama wartość. Formuły w arkuszu generatora cen są tak skonstruowane że jedyną zmienną jest wartość w komórce B3 na podstawie której mogę wyciągnąć ceny czyli B26. Załączone makro...
Trochę czasu wolnego się trafiło, poczytałem toiowo, i znalazłem może niezbyt eleganckie ale dosyć satysfakcjonujące rozwiązanie mojego problemu. Tylko brak mu automatyzacji i całościowego podejścia jeszcze. Są dwie kolumny, w jednej nazwa towaru po polsku (A), w drugiej ma być po angielsku (B). Część drugiej jest już przetłumaczona, więc niektóre komórki...
Witam. Domyślam się że to co potrzebuję jest bardzo proste. Mianowicie potrzebuję pomocy żeby stworzyć przycisk dzięki któremu będę mógł kopiować wartości z jednego arkusza do aktywnego arkusza (w którym znajduje się przycisk) do konkretnej kolumny z tym żeby jak będzie kopiować do kolejnego pustego wiersza. Czyli np. po naciśnięciu przycisku z arkusza...
witam, od razu zaznaczam ze laik ze mnie jeśli chodzi o vba. chciałbym sobie usprawnić excel przez kilka drobnych makr. ZADANIE: makro ma zaznaczyć i skopiować zakres C5:Q5 i wkleić go w te same kolumny tylko odrobine niżej (C7:Q7) zapisać i wyjść z excela. TYLKO PRZY KOLEJNYM URUCHOMIENIU MAKRA CHCIAŁBYM ABY WPISYWAŁO ZAKRES C5:Q5 O PIETRO NIŻEJ (C8:C8)...
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...
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....
Witam, potrzebuje pomocy dotyczącej makra. Czy wie ktoś jak stworzyć makro, które "pokroi" plik w sposób przedstawiony w załączniku tzn. wyciągnie powtarzające się ciągi znaków(nazwiska) z pierwszego arkusza wraz z danymi oraz przekopiuje każdego klienta na osobny arkusz. Zwykłe kopiuj wklej nie wchodzi w grę ponieważ zakresy(nazwy i dane) zmieniają...
Zrodla = Split( "A1,A2,...,V2:W2" , ",") Cele = Split( "C9,C10,...,L103" , ",") For i = LBound(Zrodla) To UBound(Zrodla) Workbooks(CurrentFile).Sheets(1).Range(Z... ThisWorkbook.Sheets("XXX").Range(Cele(i)... Paste:=xlPasteAll Next i Funkcja Split dzieli Twoje stringi na substringi jak widać na obrazku http://obrazki.elektroda.pl/9146429600_1...
Witam serdecznie. Jest to mój pierwszy post więc proszę o wyrozumiałość. Mam pewien problem a że VBA nie znam zbyt dobrze ( raczej jakieś podstawy) trochę mnie to przerasta. Szukałem coś nt. temat ale ciężko znaleźć jakiś podobny przykład. Do sedna: Dane: W pliku znajduje sie kilka arkuszy : arkusz1, arkusz2,arkusz3, arkusz4 itd. W 4 pierwszych arkuszach...
No i nie przeczytałeś dokładnie tego co napisałem. Indeksu użyj w pętli. W wolnym tłumaczeniu: Sheets(1).Activate Tu możesz użyć "nazwy arkusza" zamiast 1 . natomiast tu: Sheets("ZEST").Select zamiast "ZEST" wstaw i . Jest jeszcze jedno ale... musisz mieć minimum 10 arkuszy coby makro się nie wysypało. Edit: Pyta się czy zamienić...
Dzień dobry, Można również napisać stosunkowo proste makro (załącznik), które uporządkuje dane w pożądany sposób. Makro da spodziewany rezultat, jeśli adres mailowy w oryginalnych danych będzie stanowił osobny wiersz. Dane ze strony www należy skopiować w zwykły sposób do komórek. Po kopiowaniu zakres komórek jest zaznaczony, w razie czego można zmienić...
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. Takie makro można zarejestrować, nawet nie trzeba używać do tego VBA. Zwróć uwagę na to, że wciskając END a potem strzałka - skaczemy do końca(początku/następnej zmiany) zapełnionego...
Witam mam mały problem z makrem, a mianowicie chciałbym żeby to makro kopiowało tylko wartości komórek, a nie całe komórki nawet z ramką i kolorem czcionki, da się je jakoś przerobić.[syntax=vb]Option Explicit Sub CopyMultipleSelection() Dim SelAreas() As Range Dim PasteRange As Range Dim UpperLeft As Range Dim NumAreas As Integer, i As Integer Dim...
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...
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...
Witam, Wyjaśniam co robię z taką ilością danych - po skopiowaniu do już istniejącego arkusza są obrabiane przez formuły excela mające na celu powiązanie ich z innymi danymi (praca na słownikach w kilku innych arkuszach+2,3 duże tabele przestawne zawierające pozostałe dane). Zawsze robiłem wklejanie ręczne ale przy kilkunastu tysiącach wierszy jest to...
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...
Dzień dobry. Poszukuję rozwiązania za pomocą Vba . Dane są zawarte w 6 kolumnach ok 2000 linii posiadają duplikaty i nie tylko-są też pojedyncze linie w liście. Makro powinno wycinać i wklejać do Arkusza2 w oparciu o duplikaty lub pojedyncze elementy Arkusza1 z kol"A" w zakresie linii do kolumny "E" . ( w całej liście w większości to duplikat choć występują...
Witajcie, mam ogromną prośbę o pomoc w stworzeniu makra dla pliku. Męczę się z tym już kilkanaście godzin i niestety brakuje mi zwyczajnie wiedzy programowania VBA. Czy ktoś z Was mógłby mi pomóc stworzyć marko? Wkrokach opiszę co chciałbym, aby makro robiło. 1.Po naciśnięciu przycisku ( wiem jak przypisac marko do przycisku) odblokuj aktualny skoroszyt....
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: http://obrazki.elektroda.pl/9144379200_1...
Samo [syntax=vb]If Not Intersect(Target, Range("d1:e2")) Is Nothing Then Sheets("Arkusz1").Range("f5:g6").Value = Sheets("Arkusz1").Range("d1:e2").Value End If[/syntax]działa ja powinno. Możesz dodać Sheets("Arkusz1"). przed Range żeby makro działało też uruchamiane z innego arkusza. Jeżeli coś nie działa, to pewnie problem innej części kodu - po tym...
udało się rozwiązać problem, ale mam jeszcze jedno pytanie. Co zrobić żeby dane pobrane z formuły INDEX i MATCH po zapisaniu w folderze były stałe ?. To znaczy jak na przykład osoba której prześlę ten plik, a nie ma dostępu do pliku źródłowego widziała wygenerowane wcześniej dane w komórkach ? Cieszę się, że udało Ci się rozwiązać problem z funkcją...
Witam, proszę o pomoc w następującym problemie. Mam pewne koncepcje na realizację ale dopiero chcę rozpocząć naukę VBA i nie potrafię jeszcze tego oprogramować. Widziałem rozwiązania, które wydają się podobne ale nie potrafię ich zaimplementować. Założenie: 1)Istnieją dwa zbiory/foldery plików (c:\zrodlo oraz c:\analiza), 2)W każdym z nich znajduje...
Uściślij: 1. Czy pliki zostały już otwarte z danego katalogu i przebywają sobie w tle programu, co sugerowałoby to co napisałeś (" pobiera z otwartego pliku ") ? 2. Czy też pliki trzeba dopiero otworzyć z danego katalogu ? 3. Jeśli trzeba, to czy jest to katalog tylko "jednopoziomowy", czy też znajdują się w nim podkatalogi, z których też należy otwierać...
ale w tym wypadku wszystko mi wklei do kolumny E Sprawdziłeś? Widzę że wklejasz do 'E i F" Kopiując dwa zakresy wklei ci właśnie do tych dwóch kolumn.
Dziękuje za odpowiedź. Wydaje mi się, że Twoje rozwiązanie na szybsze działanie miało by sens. Nie wiedząc jak zamienić usuwanie na kopiowanie, dodałem jeszcze 4 takie same funkcje, których każda kolejna usuwała kolejną z 5 linii (w sumie jest 6, a tylko jedna z nich muszę kopiować), program niestety nie kończył pracy, działał na ok 65k komórkach a...
Próbuję stworzyć Makro kopiujące dane z aktywnego wiersza na koniec arkusza z danymi. Prośba o pomoc w kodzie Sub Kopio_aktyw_wiersza() ' ' Kopiowanie danych z aktywnego wiersza kol. A do D ' ' Range("A4:D4").Sel... 'zakres do kopiowania zawsze w aktywnym wierszu kol. A do D Selection.Copy 'kopiowanie danych z aktywnego...
Witam wszystkich, jestem początkująca w pisaniu makr i VBA i mam problem z kopiowaniem części kolumny. Może był już poruszany ten temat ale go nie znalazłam, ani nie znalazłam odpowiedzi w podobnych. Napisałam kod metodą prób i błędów ale nie działa tak jak chcę. Kopiuje wybrany zakres z kolumny ale wkleja go gdzie popadnie. Chodzi mi o to żeby zakres...
[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) kopiowanych wartości c_from_end = 7 'koniec zakresu...
Coby ułatwić Ci życie, a chętnym do sortowania je umożliwić wprowadź w swoim pliku kilka zmian. Główna to nazwanie zakresów, rezygnacja z formuł w nazwiskach i wydziałach i formuła licząca ilość szkoleń dla poszczególnego ludka. Na arkuszach zakresy zaznaczone są kolorami. Możesz je sobie dowolnie definiować pamiętając tylko, żeby były jednakowych rozmiarów....
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...
Nie ma potrzeby sprawdzania czy dane nie będą się powtarzać. Zakres kopiowany z arkusza źródłowego będzie zawsze wklejany do arkusza docelowego i nadpisze stare dane z ostatniego kopiowania a w międzyczasie wierszy przybędzie. łoj ! :) ... "ażem" se narobił roboty ... :) ... Zrobiłem makro, które sortuje dane w tablicy "niearkuszowej", tj. w pamięci...
Witajcie Szukam sposobu by skanując produkt, zaznaczyć komórkę w odpowiednim rzędzie i kolumnie. Rozkład jest taki: A1 - zeskanowany numer z "Numer porządkowy" (A4:A10) B1 - zeskanowana waga C1 - ilość tabel F1 - wierszu z porównanego kodu (A1 z zeskanowanym) Schemat przebiega tak: zaznaczam komórkę (np: A1) -> skanuje (wkleja skan) w zaznaczoną komórkę...
Witajcie, z góry proszę o wyrozumiałość bo to całkowicie moje pierwsze kroki z jakąkolwiek formą programowania. Z góry też zaznaczę, że przejrzałem mnóstwo tematów na tym i innych forach, znalazłem nawet teoretycznie pasujące rozwiązania, ale po wielu próbach nie potrafię ich zaimplementować w moim przypadku. Mam 180 arkuszy tak samo zbudowanych, z...
co może być innego przyczyną tego błędu ? Jaki masz zakres tabeli do kopiowania (?), bo z kodu: [syntax=vba] Range("H9").Select Range(Selection, Selection.End(xlDown)).Select [/syntax] można "odnieść wrażenie", że kopiujesz zakres od 'H9' w dół do ostatniego wiersza w arkuszu, tak więc kiedy chcesz ten zakres wstawić w inny arkusz:[syntax=vba] Sheets("DANE...
Dzień Dobry, potrzebuję Państwa pomocy. Jestem początkującym użytkownikiem języka VBA. Ciągle czytam tutoriale, poradniki fora, a nawet filmiki na YT. W końcu przyszło mi się zmierzyć z Makrem trudniejszym. Przynajmniej tak mi się wydaje. Do rzeczy. Mamy tabelę o zawsze stałej szerokości i nieokreślonej ilości wierszy. Potrzebuję z nieokreślonej ilości...
[syntax=vb]Private Sub CommandButton1_Click() Dim wb As Workbook Dim wbOtwarty As Boolean Dim wbNazwa As String wbOtwarty = False wbNazwa = "excel.xls" For Each wb In Application.Workbooks If wb.Name = wbNazwa Then wbOtwarty = True End If Next If wbOtwarty = False Then MsgBox "Otwórz plik (..\excel.xls)!", vbOKOnly Exit Sub End If If TextBox1.Text =...
Witam, Tak worksheet to to samo co ws - dzięki za zwrócenie uwagi, po prostu po czasie dopisywałem ten fragment i jakoś pominąłem, że ws został juz określony przez DIM. W załączniku wrzucam plik, po ściągnięciu trzeba zmienić rozszerzenie z *.jpg na *.xlsm - wyskakiwał błąd poczas dodawania pliku z roszerzeniem excela, że nie można załączać plików z...
ten InputBox nawet nie jest tu konieczny bo zawsze z każdego pliku źródłowego z tego samego arkusza i tej samej komórki będzie spływała jakaś wartość do tej samej komórki w arkuszu UZYWANE. Więc muszę i tak wpisać ręcznie Array. Problem pojawia się wówczas gdy chciałbym nie tylko kopiować ze wszystkich Arkuszy1 do Arkusza1 w UZYWANE. A jeżeli w plikach...
Witam, Bardzo proszę o pomoc, gdyż dwa dni próbuję zmienić makro aby poprawnie wyszukiwało i kopiowało komórki do odpowiedniego Arkusza... Obecnie wyrzuca mi błąd: "Metoda PasteSpecial z klasy Range nie powiodła się", przeszukałem internet, jednak rozwiązania nie znalazłem...:/ Makro sprawdza czy w pliku "wnioski_2016" jest w kolumnie B odpowiedni wniosek...
W załączeniu Twój plik przerobiony. Jak chcesz go użyć jak jest to wklej twoje dane do arkusza dane i syntetyka. Odpalenie makra Ctrl + Shift + t. Albo wejdź do VBA (lewy Alt + F11) i Pierwsze makro. Kod powinien się wykonać szybko. Można z powodzeniem użyć do naprawdę dużych ilości wierszy w tabelach źródłowych. Kod: (nazwy modułów kodu arkuszy zmienione...
Poradziłam sobie w taki sposób, ponieważ Wasze rozwiązania ciągle wywalały mi błędy:/ Sub CopySheet() ActiveSheet.Select ActiveSheet.copy Before:=ActiveSheet ActiveSheet.Select Range("G17:AA22").... Selection.ClearContents Range("G32:AA37").... Selection.ClearContents Range("B40:I47").S...
Witam! Mam problem z poprawnym działaniem mojego makra. Zadaniem makra jest skopiowanie zakresu danych z arkusza "faktura" do innego skoroszytu o nazwie rejestr2 arkusz "Rejestr". Kopiowane dane mają być wklejane do pierwszego wolnego wiersza. Poza tym trzeba sprawdzić czy faktura o danym numerze już istnieje w rejestrze. jeżeli istnieje to ma się wyświetlić...
Przetestuje. Z tego co rozumiem to funkcje będą przeliczane do wskazanego zakresu a pozostałe nie będą przeliczane? Zobaczę czy to przyśpieszy działanie makra. Jeżeli tak to spróbuje wyrzucić z kalkulatora zbędne funkcje. i pozostawić niezbędne do wyliczania komórek AE4:AE15 Dodano po 57 Makro ma pozwolić na przeliczenie danych z np. 20-30 osobnych...
W przykładzie użyłem kolumny pomocniczej. Tu podpowiem: w komórkę E2 wklejasz formułę =LICZ.JEŻELI(A$2:A2;"Razem konto") i przeciągasz w dół do końca zakresu. Na wynikach w tej kolumnie opierasz całą resztę. Najpierw funkcja PODAJ.POZYCJĘ, gdzie argumentem "wartość szukana" jest funkcja WIERSZ(). Jeśli komórka wynikowa ma być w...
Dzień dobry, Niestety nadal jestem mocno początkująca w VBA :-( Nie ma pomysłu, jak rozwiązać następujący problem używając oczywiście makra. W "Arkusz1" mam tabelę z 3 kolumnami: PZ, Nr zakupu i Ilość. Co jakiś czas muszę tę tabelę uaktualniać - dodawać nowe rekordy i uaktualniać już istniejące (może zmieniać się Ilość) z tabeli w "Arkusz2". Najłatwiej...
Witam Chciałbym Was bardzo prosić o pomoc w napisaniu algorytm/sposobu, który wydaję się w miarę logiczny i prosty do wykonania…Szukałem rozwiązania jednak nie mogę znaleźć nic podobnego. Poza tym moją wiedza z zakresu VBA jest chyba zbyt skromna. Dane, którymi muszę się zając to kilkaset wierszy wpisów w tabeli. Dane źródłowe wyglądają jak w...
---> kolumny automatycznie się dostosowywały do zawartości (tutaj chyba użyteczna będzie Columns ("1:18").AutoFit); ---> włączenie opcji zawijania tekstu . ---> Każda komórka była obramowana jak w pliku źródłowym ---> kolumna R zsumowała wartości z kolumn L, N, O i była zapisana w formacie księgowym. Kolumna E i F – format daty (dd-mm-yy). Jak...
Sorki, że tak namieszałem, ale do końca nie wiedziałem jaki ma przybrać ostateczny kształt mój projekt. Dodatkowo problem polega na tym, że w domu operuję nowszą wersją excela i często coś co próbuję w domu nie zawsze wychodzi w pracy gdzie mam starszą wersję. Postaram się opisać jak wygląda mój problem. Chodzi o to, że w pracy dostaję codziennie spakowany...
Witam. Proszę o pomoc w przerobieniu makra z Excela 2003 na makro pod Excel 2007. Wywala w linii z : Application.FileSearch ponieważ Excel 2007 nie obsługuje tej komendy. [syntax=vb] Sub OperacjeHurtowe() Dim wbkSkoroszyt As Workbook Dim i, wiersz As Long Dim sciezka As String dato = Range("B3") ' nazwa folderu z plikami do pobrania danych sciezka =...
Witam raz jeszcze, wszystko sie udalo i dziala SUPER, jeszcze raz wielkie dzieki!!! mam jednak inny Problem z innym makrem (jestem lamus jesli chodzi o makra) POMOCY! makro pyta o zakres komorek do kopiowania (a nie ma pytac...) kopiuje je i wkleja do pliku txt. Makro wyglada tak: [syntax=vb]Sub export_txt() Dim wb As Workbook Dim saveFile As String...
Cześć, Chciałbym stworzyć makro, które pobiera pewien zakres danych i wkleja do jednego pliku. Chciałbym, żeby to odbywało się automatycznie, gdyż dziennie takich plików jest około 120. 1. Pliki mają zawsze datę na końcu, czyli z dzisiaj było by ...31.10.2011.xls 2. Pliki zawsze są umieszczane w jednym folderze - np. c:\dane\ Zrobienie makra, żeby otwierał...
W 'Workbook_BeforeClose' kopiujesz zakres, otwierasz 'główny', określasz pierwszy pusty wiersz 'Cells(Rows.Count, "A").End(xlUp).Row + 1', wklejasz, 'Me.Save'.
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...
oto co wielki Mikroszit o tym mówi: Konwertowanie liczb przechowywanych jako tekst na liczby Cały zakres jednocześnie W pustej komórce wprowadź liczbę 1. Zaznacz komórkę i w menu Edycja kliknij polecenie Kopiuj. Zaznacz zakres liczb przechowywanych jako tekst, które mają być konwertowane. W menu Edycja kliknij polecenie Wklej specjalnie. W obszarze...
Witam Poszukuje wsparcia w utworzeniu odpowiedniego makra. Posiadam dwa skoroszyty. W pierwszym "A" znajduje się arkusz z tabelą w którą chcę z automatu wprowadzać dane. Jedna cześć danych będzie narzucona i automatycznie wpisywana przez narzucony schemat w makro Druga cześć danych będzie kopiowana z tego samego skoroszytu " A" , tylko z innych komórek...
Cześć, mam 2 pętle, ale niestety nie działa to tak jak trzeba. Chce brać z zakładki pierwszej konkretne komórki co 50 wierszy i wklejać je do innej zakładki co 31 wierszy. Niestety tak jak jest teraz kopiuje mi się tylko jeden zakres danych i wkleja do drugiej zakładki powtarzając się 332 razy. Wiem, z czego to wynika, ale nie mam pomysłu jak inaczej...
Tak jak widać na załączonym screenie - mam tabelę, w której wiersze mi się same generują w momencie dodania nowego klienta i usług jakie chce otrzymać w tej przykładowej myjni. Mam też podobny arkusz z wydatkami, w którym też jest kolumna "data". I w kolejnym arkuszu chciałbym zrobić takie zestawienie zysków i strat. Chciałbym, aby właściciel myjni...
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...
Nie wiem, ale z Twojego pliku widać, że można tutaj zastosować bardzo prosty trick rozwiązujący ten problem - wprowadzenie na początku tabeli dodatkowej kolumny z identyfikatorem (numerem) trasy Umożliwi to dokładne wychwycenie wszystkich wierszy z określonym identyfikatorem Powiem szczerze nawet o tym myślałem, ale po pierwsze arkusz generowany jest...
Witam, Chciałabym stworzyć makro, które wyszukiwałoby w drugim arkuszu po kolumnach komórkę zawierającą te same dane i kopiowało określoną ilość wierszy znajdujących się w tej samej kolumnie pod tą komórką. Konkretnie: W arkuszu "metryka" w komórce M8 znajduje się nazwa sekcji, którą trzeba wyszukać w arkuszu "profil geologiczny" w pierwszym wierszu....
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 serdecznie, potrzebuje pomocy w stworzeniu makra służącemu skopiowaniu określonego zakresu komórek (zawsze inny) w jednym arkuszu i specjalnego wklejenia (jako zdjęcie)do drugiego arkusza. Zdjęcia będą trzy ( z trzech różnych arkuszy) zawsze zakres zaznaczonych i kopiowanych komórek zawierał będzie się od komórki A1 do komórki o wartości słowo...
Cześć, Nie mam żadnego doświadczenia z VBA i dopiero zaczynam się go uczyć. Próbuję zautomatyzować sobie pewien raport (dane do raportu pobierane są z zewnętrznej bazy danych i by je zdobyć muszę najpierw przerobić sobie je do odpowiedniej formy za pomocą funkcji Transpose. Utknąłem na dość prowizorycznej rzeczy: Kroki raportu wyglądają następująco:...
Witam wszystkich - to mój pierwszy post i miło mi znaleźć się na tym forum. Mam problem następującej treści. Codziennie eksportuję dane do pliku .csv, np. eksport.csv. Dane zapisywane są w 3 kolumnach. Stworzyłem drugi plik (np. drukuj.xls), który ma konkretnie wyglądać - mieć zmienioną orientację strony na poziomą i powiększoną czcionkę, ale te same...
makro kopiuj wklej kopiuj wklej makro kopiuj zakres
antena ogrzewanie tylnej szyby twingo kontrolka silnik skrzynia automatyczna dodge
elektronika baterie parkside elektronika baterie parkside
Czerwona pionowa kreska na monitorze ASUS - przyczyny i rozwiązania Nierówna praca silnika 2.0 TDI 170 KM - przyczyny i diagnostyka