No tak... W #1 jest Cells(2, 3), czyli C2. Ja użyłem C3, a w ostateczności Ty użyłeś C1.;)
Może to Ci pomoże. Makro, dla podanej "szukana" przeszukuje każdy wiersz. Jeżeli znajdzie szukaną to kopiuje cały wiersz i przenosi do innego arkusza Dodano po 3 jeszcze raz bez zbędnych żeczy :) [syntax=vb]Sub Szukaj() Dim wiersz As Integer, kolumna As Byte, szukana As String, NumerWiersza As Integer Dim lastRow As Integer With ActiveSheet lastRow...
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...
Witam. W której części wiersza? makro które kopiuje wybrane wiersze z innego arkusza Jak go zobaczyć?
Cześć, Zwracam się z prośbą o pomoc, ponieważ potrzebuję napisać makro, które kopiowałoby wybrany wiersz, od pola B2 w Arkuszu1 (to wiem jak to zrobić) a następnie wklejałoby go w następne. Tu zaczynają się schody, ponieważ nie chcę na sztywno wpisywać zakresu wklejania. Warunek ma być następujący, jeżeli w kolumnie A (NAZWA DOSTAWCY), nie ma żadnej...
Zobacz, czy o to chodziło. Makro do kopiowania: [syntax=vbscript]Sub Kopiuj() Dim b As Worksheet Dim ow As Long Set b = Sheets(ActiveSheet.Index - 1) ow = b.Cells(Rows.Count, "A").End(xlUp).Row - 1 Dim CopyRng As Range, PasteRng As Range b.Range("A4:B" & ow).Copy ActiveSheet.Range("A4").PasteSpecial Paste:=xlPasteValues b.Range("N4:O" & ow).Copy ActiveSheet.Range("N4").PasteSpecial...
w pierwszym wierszu dla kolumny jest słowo "Tak" Dla tego trzeba jedna linijka[syntax=vb] Sub kopia() If ActiveSheet.Range("A1") = "Tak" Then ActiveSheet.Copy End Sub[/syntax]
No jak chcesz koniecznie kopować: Sub Kopio_aktyw_wiersza() ' ' Kopiowanie danych z aktywnego wiersza kol. A do D ' aktywny = Selection.Row kolumna = 1 ostatnia = Cells(Rows.Count, kolumna).End(xlUp).Row ' bez selekcji od razu kopiowanie wybranych komórek : Range(Cells(aktywny, 1), Cells(aktywny, 4)).Copy 'kopiowanie danych z aktywnego wiersza zakres...
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
Nie wiem co dokładnie chcesz osiągnąć ale może wystarczą zwykłe formuły excela. Poniższa np sumuje wszystkie komórki B2 znajdujące się w arkuszach od 1 do 6 (Suma arkuszami wizualnie widzianymi na dole ekranu, czyli jeżeli między arkuszem 1 a 6 będzie jeszcze arkusz o nazwie "jakiś" on też zostanie uwzględniony w sumie.) =SUMA(Arkusz1:Arkusz6!B2)
Czyli tak. Wpisuje nową datę np. w I4, następnie naciskam ctrl+n co powoduje że wiersze od I4 do P4 przesuną się na pozycję J4 do Q4. Czy tak? Jeszcze nie wiem o co ci chodzi z kopiowaniem.
(at)speedy9 , w temacie napisano wyraźnie - makro. EDIT: W dalszej dyskusji podałem rozwiązania za pomocą formatowania warunkowego zaproponowanego przez (at)speedy9 ale z nieznanego mi powodu zostało to wycięte. Więc podaje tu: =ORAZ(CZY.PUSTA(1:1))... Ot tylko tyle dla wiersza 1, dalej można sobie formatowanie kopiować.
Z arkusza1 robię raporty w osobnych arkuszach Efekt taki jak na zrzucie 1041538 automatycznego kopiowania wyfiltrowanych danych z arkusza1 do kilku arkuszy :idea: (z nazwami arkuszy wg filtrowanych danych :D ) można zrealizować przykładowo tak jak w załączonym pliku. 1041541 Makro można uruchomić skrótem klawiaturowym ctrl+r :!: , dla dowolnej (jeśli...
Witam, Jako, że to dopiero moje początki w VBA proszę o pomoc. Potrzebuję stworzyć jak najprostsze makro żeby po kliknięciu przycisku kopiowało wybrane komórki (zawsze będą one w jednym wierszu) z Arkusza1 do Arkusza2 w kolejny pusty wiersz zaczynając od wybranej przeze mnie komórki i dodając przed całym tym ciągiem kopiowanym kolejnej liczby porządkowej....
.. a czy jest sposób na "zero", potrzebuje aby aktualne dane z ostatniej godziny (cały wiersz, kilkanaście kolumn) przenosiły się na koniec tabeli, będe bardzo wdzięczny za pomoc, pozdrawiam.. hmm może przy aktualizacji makro mogłoby sprawdzać dane z wybranej kolumny >0 i kopiować cały wiersz..
W przyszłości nie trzeba pisać skoroszyt zamiast arkusz(z określonymi numerami) Skoroszyt to jest plik(w każdym razie tak to było do tej pory). Ponieważ nie wiadomo, czy te same struktury arkuszy, liczbę wierszy i kolumn, kopiowanie, możesz zrobić tak: [syntax=vb] Sub kopie() 'makro w pliku(skoroszycie) A, plik B jest otwarty 'kolejne 3 linie dopasuj...
Tu jest szukanie ostatniego, niepustego ActiveSheet.Paste , to wcześniej powinieneś wybrać (Select) lewą, górną komórkę obszaru, lub cały, o tym samym rozmiarze zakres. Nie mam Twojego pliku docelowego, więc pisze wszystko "na czuja". Musisz analizować otrzymany "materiał do przemyślenia" i sygnalizować co, w której linijce nie działa prawidłowo.
Pętlę możesz utworzyć na różny sposób, np. Sub Kopia_co_5() Application.ScreenUpdating = False Dim x As Long For x = 1 To 1000 ' na początek wstaw np. 50 zamiast 1000 Sheets("Arkusz1").Select Rows(5 * x).Select Selection.Copy Sheets("Arkusz2").Select Rows(x).Select ActiveSheet.Paste Sheets("Arkusz1").Select Next x Range("A" & x).Select Application.CutCopyMode...
Witam Proszę o pomoc. Potrzebuję proste makro, które skopiuje określone komórki z wybranego przeze mnie wiersza do innego arkusza. Chciałbym żeby to wyglądało tak: okno dialogowe pyta: "Podaj numer wiersza do skopiowania", podaje np wiersz nr 5 i wtedy komórka np A5 B5 D5 G5 z arkusza1 są kopiowane do komórek odpowiednio A1 A2 A3 A4 arkusza2. Nie znalazłem...
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.
Nie wiem, czy mogłoby to ułatwić temat, bo właśnie skończyłem manualne obrabianie tego pliku. I wiem, że dane z poszczególnych wierszy można kopiować np w ten sposób: Dane z pod wierszami A1-G1 do wierszy G2-N2 i da sie kilka takich potrzebnych wierszy wpisać jako stała. Lecz potrzebne byłoby sprawdzenie, czy nazwy danych nie uległy zmianie tzn wiersze...
https://www.elektroda.pl/rtvforum/viewto... jest to przykład jaki by mnie interesował ze zmianą. Potrzebuje kopiować wybrane kolumny ( tz. trzy określone po nazwie zawartej w pierwszym wierszu) bez konieczności ręcznego ich określania w oknie. Pobieranie kolumn dobrze by następowało z pliko tylko do odczytu. z gory dziękuje Z...
Dzień dobry, mam taki problem. Zrobiłam w Excelu przycisk, do którego przypisane jest makro kopiujące i wklejające 3 ostatnie wiersze. W jednej kolumnie są scalone 3 wiersze do jednej komórki i jest w niej lista rozwijana. Gdy włączę ochronę arkusza (na wybrane komórki, nie na tę z listą rozwijaną) to ta lista nie kopiuje się do kolejnego wiersza. Kopiuje...
Witam, Rzeczywiście w Arkusz2 jest szablon(formularz), który ma być wypełniany z wybranego wiersza Arkusza1 i następnie drukowany. Kol. E celowo została pominięta. Dane z tej kolumny (i kilku innych) są kopiowane do innego arkusza, ale do wierszy. Tzn. dane z wybranych kolumn konkretnego wiersza są kopiowane do innego wiersza, tu nie ma problemu bo...
Witam serdecznie! Potrzebuję stworzyć makro, które kopiuje zawartość kolumny do wierszy, które nie są obok siebie. Na ten moment stworzyłem makro dla 10 ciu wartości z kolumny A2. Kopiuję jedno po drugim i wklejam do wybranych wierszy jednak sprawa dotyczy 1000 wartości. Czy można ten kod skrócić? [syntax=vbscript] Sub kopianum() ' ' kopianum Makro...
Pewnie można, ale to już dłuższa historia... :) Najprościej - jeżeli plik-źródło jest w tej samej lokacji - wstawić kwerendę wybierającą dane (Dane->Importuj dane zewnętrzne->Nowa kwerenda bazy danych, wybrać Excel Files * i OK, wskazać plik-źródło (można zaznaczyć "Tylko do odczytu"), a dalej z kreatora" wybrać zakładkę, rozwinąć ją krzyżykiem, wybrać...
"Podświetlam" tzn zmieniam kolor czcionki? Nie ma tu nic typu "Selection", natomiast warunkiem jest kolor wypełnienia =Range("L4"). Rozumiem, że makro ma sprawdzać co już jest skopiowane, kopiować tylko wybrane (jak? kolor tła, zaznaczenie) rekordy i zmieniać kolor czcionki na jakiś inny niż poprzednio. Można warunkować kolor na podstawie ostatniego...
Witam, Kopiowanie i wklejanie odbywałoby się na poziomie jednego wiersza. Chodzi o makro, które wklejałoby komórki w kolumnach od A-E w taki sposób, że 1) komórki od A-D wklejałby się normalnie 2) Komórka w kolumnie E wklejałby się specjalnie (jako wartości) Czyli jestem w skoroszycie pierwszym, z jakiegoś wybranego wiersza kopiuje sobie komórki z kolumny...
Zaimportowałem plik raportu miesięcznego magazynu do Arkusz1 , mam w nim trzy kolumny : nr dokumentu, nr zlecenia i wartość. W pliku występuje co losową ilość wierszy podsumowanie danego zlecenia. Potrzebuję makro wyszukujące wiersz w którym w komórce (pierwsza kolumna) wystąpi tekst „Razem konto” a następnie zostanie wykonane kopiowanie...
Odwrotnie. Tak szczerze mówiąc to nie wiem jak się za to zabrać, a dokładnie żeby była zwracana zmienna o danym numerze z każdego wiersza następnie żeby został wybrany właściwy katalog o tej zmiennej. Jestem bardzo początkujący jeśli chodzi o VBA. Z góry dziękuję za pomoc.
Ja proponuję trochę inaczej. Poszukać w komórce pierwszego znaku nowego wiersza oraz drugiego znaku nowego wiersza i wybrać fragment tekstu a później go zliczyć (by zapełnić czwarty wiersz wprowadziłem długość tekstu - by "łatwiej" było kopiować te cztery wiersze w dół) . Z tym że w takich metodach trzeba pamiętać że spacja to też znak (nie wspomnę...
Przepraszam, faktycznie podałem mało informacji, ale pisząc post zakładałem, że problem jest już rozwiązany, nie szukałem pomocy, chciałem osobom, którym Excel sprawi podobne kłopoty zasugerować, co może pomóc. A to ma sens na dużym poziomie ogólności, wątpię, żeby kod tu wiele pomógł, zwłaszcza mało zaawansowanym użytkownikom makr, takim jak ja. Do...
Ten pomysł z kopiowaniem każdego wiersza osobno jest niezbyt trafny, chyba że kolejność wierszy ma być za każdym razem inna. Ale i tak lepiej zamiast przycisków zastosować pola wyboru, żeby było widać, które wiersze zostały wybrane do skopiowania (lub już skopiowane). Teraz można się łatwo pomylić i albo skopiować któryś wiersz dwa razy, albo o którymś...
Witam prosiłbym o podpowiedź do kilku nurtujących mnie pytań - lista - interesuje mnie coś na wzór listy z tym że nie chcę wybierać opcji z menu rozwijalnego tylko wpisywać np trzy pierwsze litery w jakiejś komórce i aby pojawiły mi się wiersze zawierające wprowadzone litery - przyciski - mam proste makro przypisane do obrazka i po jego naciśnięciu...
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...
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 Chodzi konkretnie o tabele z notowaniami spółek w której znajduje się ponad 400 wierszy czyli spółek giełdowych mnie interesuje zaledwie 30 z nich. Stworzyłem więdz makro działające tak => filtruj => przy nazwie spółki wchodziłem w filtry tekstu => równa się i wpisywałem nazwę interesującej mnie spółki następnie kopiowałem w jednym wierszu kolejno...
Witam! Potrzebuję pomocy przy kopiowaniu danych wyfiltrowanych. A dokładnie jest tak: jest tabela z danymi, z autofiltrem. Po zastosowaniu filtra (wybraniu kilku kryteriów w kilku kolumnach) mam widoczne np. 10 wierszy. Jak w automatyczny sposób skopiować te wyfiltrowane 10 wierszy do innego arkusza? Chodzi mi oczywiście o to, żeby nie robić tego tak,...
Witam! Potrzebuję pomocy z poprawnym wstawieniem lub modyfikacją obecnego makra. Aktualne makro po aktywowaniu kopiuje wybrane wartości z kilku różnych kart w kolejności alfabetycznej kart, jeśli w kolumnie C jest konkretny dostawca. Teraz w załączonym pliku potrzebuję w ostatniej karcie "podział na kolory" wstawić (lub przekształcić obecne) makro,...
Chcę aby moje makro kopiowało wybrane dane z dokładnie 4 arkuszy do innego arkusza. Arkusz docelowy: W docelowej zakładce w wierszach znajdują się nazwy danych a w kolumnach daty generowania tych danych Arkusze źródłowe: 1. Są zapisane w tym samym folderze 2. Różnią się tylko końcową datą (rok-miesiąc) 3. W wierszach znajdują się nazwy danych a w kolumnie...
Potrzebuję pomocy przy stworzeniu makra do kopiowania zakresu komórek z Arkusza1 do Arkusza 2. Wybieram np. komórkę Arkusz1:D7. Makro kopiuje komórki C7, D7,E7,F7,G7 i H7 i wkleja je do Arkusza2(C15, H15). Wybieram drugą komórkę np. Arkusz1:D25 i makro wkleja zaznaczony obszar do Arkusza2 w kolejny wiersz(C16, H16). Makro powinno działać tylko przy...
Witam 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...
Witam, Mam takie pytanie mam takie makro które przeszukuje wybrana kolumnę E2:E8 i sprawdza czy wartości są różne od zera jeżeli tak to zaznacza wiersz od A do E mam prośbę żeby przekopiować dane z tych komórek ale same wartości to co mam na teraz to Sub zaz() Dim wiersz As Integer, i As Integer i = 0 For wiersz = 2 To 8 If Cells(wiersz, F) <>...
Cześć, Jestem tutaj pierwszy raz i będę wdzięczny za pomoc. Mój problem polega na tym, że szukam marka, które zrobi tak: 1. W arkuszu 2 mam komórkę w której będę wpisywał wartość odpowiadającą liczbą w arkuszu 1, kolumna A. Obok komórki będzie przycisk do makra. 2. Po wpisaniu liczby, makro musi pobrać dane odpowiadajace poszczególnym komórką z wiersza...
kopiowanie pojedynczych wierszy może być baaaardzo niewydajne. Zastanów się czy nie lepiej posortować tabelę i skopiować tylko wybrany kawałek. Schemat kopiowania pojedynczego kawałka (przykład praktycznie używany, przy pewnych założeniach): Workbooks(S).Activate Range("A2:A" & Range("A2").End(xlDown).Row).Copy ThisWorkbook.Activate Sheets("Arkusz1").Range("A2").PasteSpeci...
Witam serdecznie Kolegów. Mój problem polega na stworzeniu makra do excela, który kopiuje konkretne komórki do nowego arkusza. Nie są to całe wiersze czy kolumny, ale wybrane według pewnego algorytmu. W pierwszym arkuszu (cennik) znajdują się kolumny: A-nazwa usługi B-cena netto C-ilość szt. z VAT 8% D-ilość szt. z VAT 23% Załóżmy, że w wierszach znajdują...
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...
Witam, Bardzo proszę o pomoc, potrzebuję zrobić makro, które skopiuje z arkusza "wydruk" komórki z kolumny C (numer księgowy) i przeniesie je do arkusza "Zobowiązania" do kolumny F (numer księgowy), ale posegreguje wpisy zgodnie z kolumnami "numer faktury". W obu arkuszach są te same dane w wierszach ale w innej kolejności, w arkuszu wydruk nadawane...
Dzięki za odpowiedź ,ale podaj mi więcej wskazówek co mam z tym zrobić bo nie bardzo rozumiem jaki mam wybrać tok postepowania . Zwróciłem uwagę na to , że gdy najadę kursorem na jakąkolwiek komórkę i wybieram 'wiersz" to zawsze kursor ląduje na komórce wiersz N1 . Plik waży trochę więcej niż ten który załączyłem czy zaszyte jest w nim jakieś makro...
Cześć, ,mam problem jak napisać makro które skopiuje tylko wybrane kolumny w zależnosci od danych wpisanych w wierszu 6, jest tam zawsze numer miesiaca i występuje kilka razy, (raz w 6 kolumnach raz w 12, zawsze jedna po drugiej) . Marko miałoby znaleźć własciwy miesiąc (czyli liczbę z zakresu 1-12) podany np w inputbox a potem skopiować wszytskie właściwe...
Jeżeli chodzi o kopiowanie kolorów, to najpierw na początku porządnie wyczyść arkusz celu z kolorów: [syntax=vb]wscel.Range("A2:E65536").Clea... wscel.Range("C2:E65536").Interior.ColorI... = xlNone[/syntax] Sam kolor jest zaszyty w zmiennej Range(...).Interior.ColorIndex, zatem kopiuj go razem z danymi w ten sposób: [syntax=vb]wscel.Range("C"...
Witaj. Bez względu na to, co potem już liczbą będzie tekstem(1,5s)? Makro należy znać nazwy arkuszy i werszy-kolumny źródłowe i docelowy. w przeciwnym razie sam cos takiego: [syntax=vb] For r=pierwszWersz To OstatWersz If Cells(r,2) >1500 then ' Tu kopiowanie, dzieląc wartość przez 1000, a przypisanie s. End If Next [/syntax]
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...
Bardzo proszę o pomoc w napisaniu makra, które będzie kopiowało dane z wybranych komórek arkusza „Zadania” do wybranych komórek arkusza „Plan zadań”, tzn.: Z arkusza „Zadania” z komórki: z komórki "Temat" do komórki "Zadania" ze "Data rozpoczęcia" do "Data od" z 'Data ukończenia" do "Data do" z 'Data wykonania" do...
Witam. Potrzebuję pomocy z importem wielu plików txt do excela. Pliki txt mają podobne rozłożenie różnią się jedynie wartościami oraz liczbą wierszy. Potrafię stworzyć makro na kopiowanie z wybranego pliku txt określonych kolumn od np 20 wiersza. Dziś potrzebuję stworzyć makro do importowania wielu plików txt znajdujących się np: "c:/a/". Znalazłem...
Hej, Bardzo dziękuję za szybką reakcję! Jednak nowe makro za każdym razem zwraca info 'brak ulicy XXX' nawet jeśli wpisuję całą nazwę dokładnie tak, jak jest w Arkuszu "Baza". Nie mam pojęcia o VBA i nie umiem również zmienić kodu tak, żeby wyszukiwał również po fragmencie nazwy, np. 'bieża' dla 'Bieżanowska 78C', a w przypadku 2 lub więcej rekordów...
Spróbuj np. tak - najpierw zaznaczasz dane w wybranej (pojedynczej) kolumnie, potem wykonujesz makro. [syntax=vb]Application.ScreenUpdating = False For w = Selection.Row To Selection.Row + Selection.Count - 1 Step 2 Cells(w + 1, Selection.Column).Value = Cells(w, Selection.Column).Value Next w Application.ScreenUpdating = True[/syntax] PS. Takie rzeczy...
Chcesz aby przy kopiowaniu pomijal wiersze, gdzie juz wpisano recznie w kolumnie X? Nie dokładnie o to mi chodziło, ale już znalazłem swój błąd w rozumowaniu. Szukałem makra aktualizującego, a to już dużo roboty, bo opórcz jednej kolumny identyfikującej dane reszta jest specyficzna i unikalna. Dokładnie chodziło mi o to żeby makro sprawdzało, które...
chciałbym pobierać listę indeksów i nazw z zewnętrznego pliku excela Nie kombinował bym tu zbyt dużo. Kopiuj-Wklej (makrem lub ręcznie) do arkusza pomocniczego i mamy dane w zasięgu. Z zapisywaniem podobnie - nagraj makro kopiowania arkusza do nowego pliku i dostosuj (czyt. posprzątaj po rejestratorze). jak zrobić aby po kliknięciu ok w formularzu...
Po przefiltrowaniu, wiersze mają właściwość Hidden = false lub true. Wtedy, Np [syntax=vbscript]ostW = Range("A" & Rows.Count).End(xlUp).Row licznik = 2 Sheets(2).Unprotect Password:="elektroda" For i = 2 To ostW If Not Rows(i).Hidden Then Sheets(2).Cells(licznik, 1) = Cells(i, 1) licznik = licznik + 1 End If Next Sheets(2).Protect Password:="elektroda"[/syntax]
Witam! Głowię się już na pewnym problemem z GPW od pewnego czasu i jakoś nie wychodzi. Algorytm wygląda następująco: 1. Pobieram dane z strony parkiet.com (to działa ;)) 2. Później chcę stworzyć X nowych arkuszy (każdy nazwy jako wybrana spółka) 3. Każdego dnia pobierać do wiersza=numerowi dnia odpowiednie dane (np. do arkusza PKO BP, pobieram dane...
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...
Jestem początkującym użytkownikiem VBA Mam następujący problem: Chciałbym skopiować wybrane wiersze plików excela do jednego zbiorczego excela. Pliki Excel z którego chce pobierać dane mają zawsze taki sam format. Chce kopiować wszystkie niepuste wiersze które znajdują się pod stałą wartością w konkretnej komórce. Makro, które zasysa lokalizację plików...
Czyli dzielimy arkusz na 3 cześci 1. Zlecenie - wybrane komórki kopiują się do karty pracownika (Nr. Zlecenia,Data przyjęcia,Zlecenie,Dział,Osoba zlecającaUWAGI + 2 ukryte - chyba że będzie możliwość dodania kolumn, jeśli nie kopiują się do pracowników i je ukryjemy) 3. Grupa interwencyjna - zawiera możliwośc wyboru max 5 pracowników do jednej czynności...
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...
Przeglądałem, ale jakiś czas temu, po rejestracji (kilka miesięcy temu, z tego co pamiętam) :) Korzystam z forum po raz pierwszy. I mocno przeceniłem swoje umiejętności pisania makr w Excelu, a także okazuje się że również definiowania problemów :/ Dodano po 18 zamotałem się trochę :/ mam makro, które po wciśnięciu Przycisku CommandButton dodaje arkusz...
witam :) Próbuje napisać mały programik jednak cały czas mam jakieś błędy, a na niektóre rozwiązania brak mi pomysłów. To mój pierwszy program, dotychczasowe wypociny opieram na tym co wyczytałem w internecie. Chciałbym stworzyć makro w Excelu, miałby to być wykaz uwzględniający wszystkie informacje z pozostałych zakładek (które edytowane są ręcznie)....
kopiowanie funkcji chodzi mi o przeniesienie do arkusza1 gotowego wzoru bedacego w komorce w arkuszu3, z tym ze, wzor liczy np. mnozac 4 komorki przez siebie w ustalony sposob - czyli wzor. Wzor moze ulec zmianie i zmieniam go w arkuszu3. Dlaczego ? Dlatego ze w arkuszu3 beda inne wartosci 4 kolejnych mnożonych komórek. W arkuszu3 wyliczam sobie współczynnik...
Cześć! W VBA moje umiejętność są szczątkowe i raczej używam nagrywania Makro w Excel jeśli zajdzie taka potrzeba i ewentualnie modyfikuje powstały kod w miarę możliwości i porad z internetu, niemniej nie potrafię znaleźć rozwiązania na następujący problem. Potrzebuje Makro, które wykona określoną czynność w danej kolumnie, a gdy skończy przeniesie się...
Witam serdecznie, Mam drobny problem (dla was drobny), chcę aby w moim zleceniu po zapełnieniu przez użytkownika wszystkich przygotowanych pozycji mógł on dodać kolejną odpowiednio skonfigurowaną. I tak nagrałem makro które kopiuje mi przygotowane pola, odnajduje w arkuszu pierwszy wolny wiersz i wkleja mi to co przygotowałem. Jest jeden problem chciałbym...
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...
Kopiowania i wklejania, tudzież opcji odwrotnej nie polecam. I tak w efekcie końcowym po wklejeniu wierszy (w trybie projektowania ma się rozumieć) trzeba ręcznie zmienić właściwość LinkedCell na właściwą. W tym momencie makro działa prawidłowo. Po usunięciu wierszy też makro działa właściwie. Dalej drukuje zaznaczone. Można oczywiście w VBA napisać...
Cześć, mam makro, które wkleja mi konkretne wartości z różnych kolumn z pliku Dane do nowego pliku. Niestety nie umiem przerobić tego makra tak, żeby otwierać ten plik z którego wklejam tylko raz. Bo teraz za każdym razem przy kopiowaniu z kolumny A muszę otworzyć plik, a potem jak kopiuję z kolumny C znowu otwiera mi się okienko w którym muszę wybrać...
http://obrazki.elektroda.pl/7823846400_1... http://obrazki.elektroda.pl/6238284000_1... http://obrazki.elektroda.pl/1959204700_1... http://obrazki.elektroda.pl/5977726900_1... Witam Proszę o pomoc, niestety nie mogę sobie poradzić z napisaniem makra. Nie potrafię ściągnąć plików do Excela,...
Oto rozwiązanie jest ono gotowe. Myślę, że o to chodziło. W ekselu nie ma zmiennej ani instrukcji for chyba, że ktoś napisze makro. Ale można wypełnić komórki danymi trzeba najpierw w pierwszej komórce wstawić początkową wartość (w tym wypadku 1) a następnie menu>edycja>wypełnij>serie danych... i dalej wypełniamy odpowiednio pola. Wykonanie tego polecenia...
Witam Mam pewien problem z makrem. Załączyłem plik zeszyt1.xls. w którym są dwa arkusze: raport i temp. Zabawa polega na tym, że chcę z arkusza TEMP przekopiować dane do arkusza raport wg konkretnego nadawcy. Zrobiłem makro które to kopije poszczególne komórki tylko w wierszach z wybranym nadawcą ale nadawcę muszę zdefiniować ręcznie w kodzie makra,(np....
Dobudowałem trochę - ale mimo kilkugodzinnych prób nie wyczaiłem gdzie w makrach są odpowiednie odnośniki aby coś pozmieniać. Pod przyciskiem OK formatki Świetnie działają przejścia i chciałem aby jeszcze w arkuszu WPIS w kolumnie D wpisywało cyfrę znajdującą się przy wybranej pozycji z SŁOWNIKA (kol A). W zależności od tej wartości wpłata będzie wpisywana...
Witam, Jestem wręcz zielony z VBA, a próbuję napisać makro które kopiowałoby dane z wygenerowanego poprzednio arkusza który wygląda tak: https://obrazki.elektroda.pl/1632067000_... do arkusza który wygląda tak: https://obrazki.elektroda.pl/1639209600_... No i tu mam kilka problemów. Dane które do mnie przychodzą i po...
Witam, byłbym wdzięczny za pomoc. Potrzebuję makro, które pomogło by w poniższym opisie. W arkuszu Arkusz1 jest całość artykułów widniejących w systemie ( ok. 40 tys ). Do arkusza Arkusz2 będę wklejał dane artykułów, które będę kontrolował pod kątem jakości. Plik powinien szukać identycznych artykułów w kolumnie D w arkuszu Arkusz2 z tymi z arkusza...
Witam! Mam w arkuszu dane w komórkach od A do E a w kolumnie G mam wpisaną formułę =JEŻELI(E3>0;D3&" na "&B3&" w ilości "&E3&" szt. Celem reklamacji do firmy CCC";" ") która przenosi wartość komórek D i E z dodatkowym opisem jeśli komórka E jest większa od 0 https://obrazki.elektroda.pl/5068862300_... Potrzebuję dla załączonego pliku...
Może to dlatego, że w takiej formie jak to podałeś teraz, funkcja aktualizuje dane tylko z otwartego arkusza o takiej nazwie. Żeby aktualizować dane z arkusza umieszczonego w jakiejś konkretnej lokalizacji, powinieneś podać pełną ścieżkę do niego. Spróbuj przerobić kod w podobny sposób jak przykład poniżej (zwróć uwagę na zmianę nazwy arkusza na pełną...
PRL: nie ukrywam, że moja wiedza na tym etapie się kończy, stąd moja prośba o pomoc w dopasowaniu skryptu do mojej tabelki. Chciałbym, żeby kopiowały się całe wiersze zachowaniem formatowania (scalenia itp)
Nie mam wielkoego pojęcia o probramowaniu, będę wdzięczna za pomoc Mam plik który zawiera 75 arkuszy. 5 akruszy jest "stałych" (zawierają m.in. dane do których się odwołują pozostałe arkusze), a pozostałe mają taką samą sktrukturę ale inne dane Muszę: 1. utworzyć 70 nowych plików, gdzie każdy zawiera 5 "stałych" akruszy i jeden zmienny 2. Zapisać nowy...
Cześć. Jako typowy human mam niestety problem z elementarnymi rzeczami informatycznymi. Ostatnio sen z powiek spędza mi import danych z wybranych kolumn. Wstyd przyznać, ale na razie robię to na zasadzie kopiowania pojedynczych kolumn i wklejania do nowego arkusza. I tak dwa razy w tygodniu. Sposób jest bardzo skuteczny ;-) ale zapewne można go znacząco...
Rozwiązałem swój problem w nast. sposób: Sub drukowanieprawidlowe() ' ' drukowanieprawidlowe Makro ' ' Dim i As Integer i = InputBox("Numer wiersza") Workbooks.Open Filename:="C:\Users\Dominik\Desktop\Zesz... Application.Left = 1 Application.Top = 1 Application.Width = 720 Application.Height = 780 Windows("Zeszyt1.xlsm").Activate Cells(i, 1).Select...
Nie mam zabardzo czasu na siedzenie nad tym problemem, ale w zamian podaję parę różnych przydatnych rozwiązań do tego programu. Myślę że sobie poradzisz, analizując pewne chwyty w VBA. Uwaga! podane przykłady nie są rozwiązaniem problemu, są tylko fragmentami mozliwymi w większej lub mniejszej części pomóc w pracy nad arkuszem. 1. Przepisuje na bieżąco...
Witam! Potrzebuję pomocy z odpowiednim zaprogramowaniem makra. Opisuję dokładnie czego potrzebuję - mam w pliku 2 arkusze : "m-ki" gdzie w kolumnie A mam kolejno wypisane materiały a w kolumnie B do każdego materiału mam przypisany index "karta wadliwe" jest to karta finalna, do której chciałbym aby po podwójnym kliknięciu w wartość z komórki A w karcie...
Prace nad kodem makra posunęły się naprzód :D . W chwili obecnej jest już gotowe wpisywanie ścieżki dostępu i wpisywanie zakresu danych do kopiowania. Pozostaje jeszcze problem, że musze wpisywać zakres danych do kopiowania dla każdego pliku osobno (zakres danych do kopiowania mam taki sam we wszystkich plikach). Chciałbym aby raz podany zakres danych...
Super. Działa tak jak powinno tylko z małym szczegółem po skopiowaniu wiersz nie znika z pierwotnego arkusza
Witam. Poniższy kod z VB Excel potrzebuję przerobić na C# tak by wyświetlał się w datagirdview. Zadaniem kodu jest zliczanie wierszy o takiej samej nazwie w kolumnach A:B, sumowanie wierszy w kolumnie D, usunięcie policzonego wiersza. [syntax=vb] Sub Makro1() ' ' Makro1 Makro ' Makro zarejestrowane 2011-09-22, autor sidsysunia ' ' Klawisz skrótu: Ctrl+q...
[syntax=vb] Sub kopiarka() Dim kom() As Variant ReDim kom(22, 1) As Variant Dim MyDir As String Dim CurrentFile As Variant Dim i As Integer Dim ChosenFile As String ChosenFile = Application.GetOpenFilename(FileFilter:=... Files (*.xls), *.xls", Title:="Wybierz jeden dowolny plik z katalogu źródłowego:") If ChosenFile = "False" Then Exit Sub Workbooks.Open...
Witam, próbowałem już kilku sposobów na rozwiązanie mojego problemu, ale niestety nic konstruktywnego nie udało mi się stworzyć. O co chodzi: pragnę stworzyć makro które kopiowałoby wybrane elementy z Arkusza1 Przykład: 1) mamy Arkusz1 z ID klienta (powiedzmy, że mamy 1000 pozycji) , przypisany mu wiersz chce uzupełnić o date logowania się np. na koncie,...
Witam Potrzebuje pomocy z excelem, mecze się już parę dni i nie mogę sobie poradzić, przeczytałem juz wszystkie posty i nic. Mam dwa skoroszyty - jeden z nich nazywa się Baza/Arkusz1 i znajdują się w nim dane do skopiowanie do innego skoroszytu (bieżacy arkusz Menu). Jednak kopiuje tylko wybrane komórki (które spełniają odpowiednie warunki). Ponizej...
Witam, Jestem początkująca. Póki co potrafię rejestrować makra, czy staram się modyfikować znalezione kody makr. Mam 2 problemy. 1 to taki, że kod, który znalazłam działa, ale tylko na plikach, które nie są chronione. Nie wiem jak nie chronić pliku już na poziomie kodu VBA, gdy wybierane są pliki do scalania. W sensie- aby nie trzeba było ręcznie otwierać...
Ja na Twoim miejscu przeprojektowałbym zupełnie ten plik, ograniczając go do 3-4 zakładek. Nie piszesz jak wygląda "proces" wprowadzania zamówień, czy to jest pełen asortyment oraz lista sklepów, czy tylko wycinek, ale to co sprawdza się przy 10 sklepach może zacząć być problemem, jak sklepów będzie 50. Moja propozycja jest taka: 1. Wszystkie informacje...
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...
---> 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...
Wstawiłeś 2x .Find, a za drugim razem powinno być .FindNext. Ta całą pętla For powinna wyglądać tak: [syntax=vb]For r = 1 To UBound(szukaneTabl) 'przepisanie wartości tabeli wscel.Range("A" & wstaw) = szukaneTabl(r, 1) wscel.Range("B" & wstaw) = szukaneTabl(r, 2) Set c = wsbaza.Range("A1:A" & ost_wiersz_bazy).Find(What:=szukaneTabl(... 1),...
Najważniejszy jest arkusz "Paliwo Zużycie za 2013" zasadniczo wszystkie zmiany jakie będą dokonywane w skoroszycie są/będą wprowadzane w tym arkuszu. W pozostałych arkuszach będą (mogą być) zmianiane tylko dane mające znaczenie kosmetyczne bardziej niż powodujące działanie funkcji. Ogólny zamiar jest taki aby z arkusza "Paliwo Zużycie za 2013" po dopisaniu...
Hej Mam lekko zmodyfikowane makro, które pozwala mi specjalnie nazwać pliki w pierwszej kolumnie „xyz” która się potem kasuje z plików podzielonych więc może mieć plik inną nazwę niż zawartość docelowej 1-wszej kolumny, ale kurczę potem mam wąskie kolumny i muszę w każdy plik wchodzić i je poszerzać ręcznie do szerokości „zawartości” mimo, że w pliku...
makro kopiować wiersz kopiować wiersz makro excel makro kopiować wiersz
centrala alarm 433mhz wałka laserowej zbiornik wyrównawczy ciśnieniowy
korad ka3005d elektrownia wiatrowa
Jak zablokować wyskakujące okienka na ekino i furher.in? Parametry zasilacza-testeru ZTR-80A