ma byc sh.Shapes(1).Select
Pomogę w ten sposób: Tak przypisujesz nazwę z danej komórki Nazwa_z_komorki = Worksheets("KON").Cell... 1).Value i podobnie ilość Ilosc_z_komorki = Worksheets("KON").Cell... 2).Value Do powyższego cells(nr wiersza,nr kolumny) dodanie arkusza: Sheets.Add Nadanie nazwy arkuszowi: ActiveSheet.Name...
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...
Co zrobić żeby w przypadku gdy plik o danej nazwie już istnieje Jestem za tym, żeby sprawdzić obecność takiego pliku przez: If Dir(Thisworkbook.path & "\" & nazwa)<>"" then ... i podjąć dalsze działania (zapisać plik, podać komunikat, itp.)
Wstawiłem tabelę, włączyłem rejestrator makr, zmieniłem nazwę w 'Narzędzia tabel'. Nagrało się m/in: https://obrazki.elektroda.pl/2689543600_... Odpowiedź: Tak, można
A nie lepiej (szybciej) jest zrobić kopię pliku abc.xls i go tylko inaczej nazwać? Przecież na to samo wychodzi. Na kopiowanie pełnych arkuszy z formatami nie ma funkcji. Da się to zrobić jedynie za pomocą makra [tylko nie wiem po co - patrz kopiowanie pliku]. No ale ludzie różnych chcą rzeczy. Dodatkowe pytanie do głównego "zadania" czy jest ustalona...
Musisz dodać jeszcze pętle sprawdzającą nazwy arkuszy. A co jak klikniesz makro w danym dniu 3x razy?
[syntax=vbscript]Sub Zawiera() Sheets("Arkusz1").Select a = InputBox("Podaj tekst do szukania: ", "Wyszukaj") ow = Cells(Rows.Count, "A").End(xlUp).Row y = 1 For x = 1 To ow If InStr(1, Cells(x, 2), a) > 0 Then Range(Cells(x, 1), Cells(x, 2)).Copy Sheets("Arkusz2").Range("A" & y) y = y + 1 End If Next End Sub [/syntax] Poniżej bez rozróżniania wielkości...
Witam. W arkuszu mam utworzone makro do odznaczania pola wyboru Sub czyszczenie_komórek() Worksheets("wydatki").CheckBoxes.Value = False End Sub Problem pojawia się gdy chcę zmienić nazwę arkusza (lub wykonać jego kopię - co również powoduje zmianę nazwy). Wówczas makro przestaje działać, bo w kodzie makra jest odwołanie do nazwy arkusza, która przecież...
Oczywiście, przy założeniu, że wiesz co znaczy "ostatni dodany" i "następny". Jeżeli masz wyłącznie arkusze nazwane: 2020, 2021, ... to wszystko jasne, ale jeżeli są też Arkusz1, itp. to sam widzisz. Musisz zatem napisać procedurę wyznaczającą ostatni arkusz: przeglądasz wszystkie i (ewentualnie pomijasz niepasujące do wzorca - metoda dowolna, nawet...
W wolnej chwili wyklikałem na klawiaturze kilka linijek. Wydaje mi się, że wygodniej będzie Ci przystosować mój krótki kod. [syntax=vb]Sub Podziel() Dim a As String, a1 As Worksheet Set a1 = Sheets("Arkusz1") ow = Cells(Rows.Count, "D").End(xlUp).Row f = True Sheets("Arkusz1").Select For x = 5 To ow a = a1.Cells(x, 16) If f Then y = x f = False End...
Dzięki bardzo ale mógłbyś wyjaśnić czy mam to umieścić na początku kodu? [syntax=vbscript]Rows(Target.Row).Copy Sheets("Inny").Cells(nw, 1)[/syntax] Czy tutaj zamiast "Inny" ma być nazwa arkusza czyli Venture Capital i ma to być powtórzone dla wszystkich trzech arkuszy (z wyjątkiem arkusza "All")?
Witam, wiem że był podobny temat, jednak tamten mi nie pomógł a ciężko znaleźć jakiekolwiek informacje w internecie. Od kilku dni męczę się z tym kodem, chciałbym aby po kliknięciu przycisku dodawał się nowy arkusz z nazwą pierwszego + kolejny numer po prawej stronie według kolejności, mam makro tworzące kolejny arkusz, lecz pusty oraz mam makro kopiujące...
Nagraj makro (kopiuj arkusz i zmiana nazwy) i pod nazwę podstaw 8 od lewej & 1 od prawej + 1 nazwy aktywnego.
Trochę nieścisłości jest w tym Twoim opisie. Piszesz, że w kolumnie E arkusza Brudnopis po wyczerpaniu nazwisk będą błędy #N/D. Tymczasem w pliku przykładowym są puste teksty. To jak w istocie będzie? W załączonym kodzie są uwzględnione oba warianty. Gdy już się zdecydujesz jak ma być, możesz sobie ten kod troszkę uprościć. W sprawie tworzenia nowego...
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. Jestem nowym użytkownikiem trochę początkującym w makrach i VBA w Excelu aczkolwiek mam problem: Chciałbym napisać makro kopiujące kolumnę komórek z pominięciem pustych do NOWEGO pliku (ścieżka stała, nazwa zależna od 1 komórki w arkuszu) .xls Nawet nie wiem czy potrzebna jest pętla czy wystarczy sprytne makro. Proszę o przykład na...
Tu zaczynają się cuda. To może podrzucę kanister z wodą? :) Poważnie: Umieść oba makra w module i precyzyjnie "wskaż" Excelowi, którego arkusza dotyczy kod. Przykład z kopiowaniem[syntax=vb]With Sheets("Arkusz3") .Activate .Range("F8:M8").Copy .Range("F86").PasteSpecial Paste:=xlPasteValues 'pozostałe mają ustawienia domyślne Application.CutCopyMode...
Witam, Proszę o pomoc w rozwiązaniu problemu z makrem. W pliku Excel 2010, w "Arkusz1", w komórce A1 będą pojawiały się nazwy dnia tygodnia. Chciałbym, aby w zależności od tekstu jaki pojawi się w tej komórce, dane z tabeli umieszczonej w "Arkusz1" kopiowały się do wcześniej utworzonych, w tym samym pliku, arkuszy, nazwanych odpowiednimi dniami tygodnia,...
Witam, Proszę o pomoc w napisaniu Makra. Informacje: Docelowy plik posiada 10 arkuszy z nazwami miast (załącznik4) Założenia: Makro powinno kopiować nazwiska z arkuszy z nazwami miast (kolumna H) wybierać unikaty, oraz kopiować je do co drugiej kolumny arkusza "Podsumowanie" począwszy od wiersza 9 (czyli pierwsza kolumna od A9, duga od C9 itd.) Przykładowy...
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....
Jeśli liczysz na konkretną pomoc :?: - to winieneś załączyć swój przykładowy plik z odpowiednio opisanym arkuszem źródłowym i arkuszem docelowym :idea: Wcześniej możesz przeanalizować zasoby naszego forum w zakresie importu lub eksportu danych z jednego arkusza do drugiego :idea:
Witaj. Arkusz7 - to jest Nazwa programowa lub na arkusz etykiety(w zasadzie może zbiegają się ) Być może lepiej użyć typ notacji Sheets("Arkusz7") p.s. Jeśli widzisz w redaktorze VBA, jako Sheets7(Arkusz7) następnie trzeba Sheets7.Range("S1") i t.d. lub Sheets("Arkusz7").Range("S1") i t.d. lepiej jeszcze przykład załączyć
Akurat to jakoś skomplikowane nie jest, jeżeli tylko arkusze nazwiesz kolejnymi nazwami miesięcy, to możesz odwołać się do skoroszytu przez jego nazwę z F3. A do wyszukiwania Janusza użyć jednej z licznych funkcji wyszukujących, np. Find [syntax=vbscript]Set w = Sheets(Range("F3").Value).Columns("A").F... lookAt:=xlWhole) Sheets(Range("F3").Value).Cells(w.Row,.....
szablon.SaveAs Filename:=sciezka Proponuję użyć SaveCopyAs. Ale nie wiadomo, czy makro (jego nazwa sugeruje tworzenie arkuszy), czy też ma tworzyć nowe pliki.
Excel-pliki(tam de rożne osoby wypelniają własne dane ) mają tylko jeden arkusz? jako makro musi znać nazwę "źródła". "Źródło" w tym samym folderze co reszta plików?
Witam, Proszę o pomoc, jestem bardzo początkujący i nie wiem czy w ogóle jest możliwe zrobienie czegoś takiego w MS Excel: Posiadam plik roboczy A zawierający listę z nazwami plików (XYZ) w innej lokalizacji (kilkaset plików). Plik A jest edytowany na bieżąco - dane zmieniają się w wierszach do momentu zamknięcia sprawy (jedna sprawa - jeden wiersz...
Dzień dobry, mam skoroszyt w którym jest 3200 arkuszy i każdego arkusza mam do skopiowania klika wybranych danych do kolejnych kolumn kolejnych wierszy podstawowego arkusza BAZA. Usiłuję napisać makro, które z każdego z tych arkuszy by przenosiło wybrane dane, utknąłem na takim etapie jak procedura podstawowa ma wrócić po kolejne dane do tego wybranego...
Witajcie, Czy ktoś pomoże mi stworzyć makro, które wyszukuje wszystkie listy rozwijane w pliku Excel (wszystkie arkusze) a następnie kopiuje do nowej zakładki każdą wartość z "listy" oraz dodaje nazwę range. Przykład w załączeniu... Dzięki.
Witam. Chciałem zrobić plik exela który pomoże mi w rozliczaniu projektów. O ile z formułami w komórkach dałem sobie rade to z makrem już nie bardzo. Tak naprawdę pierwszy raz z niego będę korzystał. Prosiłbym o pomoc w stworzeniu takiego makra które w zależności od danych wejściowych skopuje odpowiednie komórki do drugiego arkusza w pierwsze wolne...
Czekam na kogos kto sie zlituje
Witam potrzebuję pomocy z makrem, które bardzo ułatwi mi pewną pracę :) Mam dwa pliki excela, w jednym (nazwijmy go 1) jest jeden arkusz w którym zapisuje się wszystkie nowo przyjęte rzeczy (wpisuje się nazwę firmy, nazwę przedmiotu i jego nr np firma X przedmiot x nr 001). Drugi(nazwijmy go 2) ma kilka arkuszy z nazwami firm, w arkuszach tych są naturalnie...
Tak, oczywiście jest możliwe. Najprościej używając funkcji Dir w pętli Do Until , jednocześnie zmieniając nazwy kopiowanym arkuszom wg. aktualnie otwartego, pliku źródłowego.
Witam Chodzi o to podam przykład działania makra Z Arkusza kraje1 program kopiuje nazwę jednego kraju z listy- pierwszego i wstawia nazwę tego kraju w komórkę J1 w arkuszu Dane1, następnie kopiuje dane do 2 arkuszy , następnie przechodzi do następnego kraju z listy drugiego i wstawia nazwę w komórkę J1 (kasując poprzednia) dane się przeliczają dla drugiego...
A Twoje makro mi nie poszło, mam info "subscript out of range". Masz otwarte obydwa pliki? Nie zmieniałeś ich nazw, ani nazw arkuszy?
Masz rację, zmieniłam na kopiowanie od 2 wiersza. Docelowo w kolumnie I w pliku bazowym będą wagi, w jaki sposób mogę podsumować kolumnę I w każdym aktywnym arkuszu- od arkusza o nazwie"1" do ostatniego?
Linia Set ws = Worksheets(Worksheets.Count) w nawias wpisz nazwę w cudzysłowie lub indeks arkusza.
Dzięki, makro jest bardzo dobre. Niestety przeszukuje tylko ten arkusz w którym je uruchomię. Bardzo proszę o jeszcze jedną modyfikację: Aby makro przeszukało arkusz pierwszy o nazwie 2010, później arkusz drugi o nazwie 2011 i arkusz trzeci o nazwie 2012. Po przeszukaniu każdego arkusza niech kopiuje wiersze jeden pod drugim do arkusza o nazwie RAZEM,...
hallo, tak próbowałem dziękuje... pokazuje błąd w zapisie "Selection.AutoFill Destination:=Range("A" & pw & ":A" & pw + ow - 1), Type:=xlFill" Kopiuje tylko nazwę 2 arkusza.
Wielkie dzięki Marcin, makro działa :) W trakcie prac nad plikiem pojawił mi się nowy problem. Plik NOWY zawiera nową wersję jednego z arkuszy znajdujących się w pliku STARY, kopiuję ten arkusz (ze zmienioną nazwą) do pliku STARY, makro dostosowuje mi m.in.formuły w innych arkuszach pliku STARY do aktualnej wersji, ale... problem polega na tym, że nowy...
Może. Makra mogą być w kodzie arkuszów, kodzie modułów, formularzów i klas Może być wiele, ważną rzeczą jest mieć różne nazwy.
Mam problem z makrem, które będzie kopiowało dane z kilku arkuszy (kolejnych, nazwy nieznane) do jednego SREDNIA i będzie wyliczało w nim średnią. Mam już makro które liczy mi ilość arkuszy. Nie wiem jak odwoływać się do kolejnych arkuszy. Public Sub Policz_Arkusze() Dim ileArkuszy As Integer ileArkuszy = Sheets.Count - 2 MsgBox ("Ilość arkuszy w skoroszycie:...
Pytanie oczywiście o makro. Czy istnieje możliwość powiązania komendy 'kopiuj' z przejściem do arkusza o konkretnej nazwie? Chodzi mi o to aby działo się tak: - mam otwarty skoroszyt A.xls oraz B.xls - kopiuję pewną liczbę (komórkę) do schowka ze skoroszytu A.xls - w tym samym momencie w skoroszycie B.xls Excel przechodzi natychmiast do arkusza o nazwie...
Jeśli nagrasz rejestratorem makr kopiowanie arkusza do nowego pliku, nadanie mu nazwy, zamknięcie itd; po czym wkleisz nagrany kod do kodu skoroszytu (Thisworkbook) przy zdarzeniu "BeforeClose", to uzyskasz efekt bardzo podobny do opisywanego. Aby nabrać pewności warto byłoby zajrzeć do tego pliku...
To bardzo bym poprosił o jakieś przykłady makr w tych dwóch przypadkach, z kopiowaniem z ukrytego arkusza i drugie z pobieraniem z komórki części nazwy pliku i go zapisaniu. Z góry wielkie dzięki.
Post pod postem, ale jakoś chcę zwrócić uwagę autora :) Tak z niedzielnych nudów zacząłem kombinować z tymi pętlami. A jak już jest (prawie) gotowe, to wrzucam. Może się przyda... Warunkiem jest umieszczenie pracowników w odpowiednich wierszach zgodnych z Nr ewidencyjnym i Lp. tzn jeśli Pani Monika ma NrEw. 2 i jest w 4 wierszu (Lp 3), to tak musi być...
Nie do końca chyba rozumiem: 1. Chcesz mieć w każdym arkuszu w kolumnie E w ostatnim wierszu zsumowane powyższe wiersze z kolumny E? i Np wypełnienie czerwone? 2. Chcesz, żeby dane z filtrowania "księgowość" i "inne" były zapisane w aktualnym arkuszu w różnych zakładkach, natomiast dane z filtrowania po "wdrożeń" i "elita" były zapisane do oddzielnego...
Po kliknięciu komórki np. C16 ma się utworzyć arkusz o tej nazwie tj. "C16"? Czy raczej arkusz z nazwą projektu? Jeżeli to drugie, to zamiast używać tabeli przestawnej proponuje: 1. utworzyć arkusz z polem/formantem kombi dla którego źródłem danych będzie pole (kolumna) "nazwa" z arkusza Dane. Po wybraniu elementu z listy zwraca się pozycję tego elementu...
Moja propozycja wygląda tak - klikasz dowolną komórkę w rzędzie opisującym dane zlecenie, klikasz przycisk. Makro kopiuje wszystkie cztery pozycje z aktualnie wybranego rzędu do arkusza o nazwie formularz w odpowiednie miejsca.
Nie widzę potrzeby stosowana makr. Formuły i formatowania powinny wystarczyć. Ad.1. Poprawność danych > lista Ad.2. WYSZUKAJ.PIONOWO z argumentem (nazwa arkusza) podstawianym przez ADR.POŚR
Stosujesz złe nazewnictwo. Arkusz, zakładka... i być może dlatego wszystko Ci się myli. Poczytaj o podstawach, hierarchii i nazwach obiektów i sposobach odwołań. Spróbuj nagrać makro kopiowania pomiędzy arkuszami na początek. Spróbuj następnie podstawić inne argumenty. Na Twoim miejscu zrezygnowałbym jednak z Select-Copy-Paste na rzecz prostego przypisania....
Najprościej pominiesz kolumnę robiąc nie jedno ale dwa kopiowania. Oddzielnie kawełek przed pominiętą kolumną, oddzielnie po. Pomiędzy jednym a drugim kopiowaniem trzeba przesunąć np. offsetem początek obszaru docelowego o kilka komórek w prawo, żeby dobrze trafiało. A żeby skopiować za jednym razem to rzeczywiście trzeba trochę przerobić. Makro powinno...
Formułą tego nie zrobisz. Pozostaje makro. A filtr po nazwie nie spełnia potrzeb? Zakładasz filtr, CTRL+A, kopiuj, przejść do innego arkusza stanąć na A1, wklej .... i po 10 sekundach masz wszystko rozdzielone. Powyższą czynność możesz nagrać makrem i podpiąć pod jakiś przycisk.
Dzięki za szybką odpowiedź. Podsyłam spakowany plik z kilkoma przykładowymi wpisami i makrem. Dane w arkuszach mają być dodawane jako kolejna linijki. Tak jak to jest w przykładzie w arkuszu Transaktionen. Po każdym uruchomieniu makra dodawana jest nowa linia z wpisem z Makra (bądź kilka linijek zależnie od ilości wpisanych danych).
Na podstawie tego opisu i makra "do przerobienia" nie sposób odgadnąć co asia.asia ma na myśli i co ma być skopiowane. Same nazwy plików/arkuszy nie wystarczą (wystarczy "zapisz jako") lub copy. MAM PLIK EXCELA - DED i nazwa arkusza "DED" z którego są kopiowane dane. Kopiowanie odbywa się do pliku "DEDD1" nazwa arkusza "DEDD1". Kopiowanie do nazwy...
Jasne. Spakowane pliki w załączeniu. Plik musi niestety zmieniać nazwę, bo jest tworzony nowy co miesiąc. Jeśli ją zmienię czy kod może się automatycznie uaktualniać? Nazwy arkuszy i układ są bez zmian we wszystkich plikach Zlecenie prac na formie wtryskowej matryca. Dziękuję!
Witam! Jestem dość nowy jeśli chodzi o VBA ale staram się jak mogę. Nie mogę jednak dojść do rozwiązania jednego z moich problemów. Muszę skopiować kolumnę danych z drugiego arkusza do pierwszego, jeśli nagłówek kolumny w arkuszu drugim zgadza się z nagłówkiem kolumny w arkuszu pierwszym. Czy istnieje możliwość aby makro po prostu szukało po komórkach...
Witam, jestem całkiem zielony w arkuszach kalkulacyjny jeśli chodzi o makra i potrzebuję pomocy. Utworzyłem skoroszyt w którym są trzy arkusze. Pierwszy to tabela przestawna, drugi to arkusz zbiorczy a trzeci to raport o nazwie '01'. Potrzebuję napisać następujące makro po włączeniu którego wartości z komórek od AS5 do BU5 z raportu będą kopiowane do...
Witam ponownie mam jeszcze jedną prośbę jak zrobić takie makro, postaram się wytłumaczyć. Ogólnie mówiąc chciałbym żeby na początku makro sprawdzało czy w arkuszu 1 w komórce C2 znajduje się wartość jeżeli tak to tworzy nowy arkusz z tą nazwą i kopiuje zawartość z Arkusza 2 od A1:H7. Następnie skopiowane wartości porównuje - Arkusz 1 wartości od A3...
Witam, prosze o pomoc w utworzeniu makra, które bedzie kopiowało zakres danych z arkusza X do dowolnego arkusza np Y. Problem w tym że zakres danych z arkusza X jest przefiltrowany - dwoma warunkami po nazwie sklepu i po miejscowości. Chciałbym aby makro przekopiowało zakres już przefiltrowany do nowego arkusza Y. Moje makro kopiuje zakres danych ukrytych...
Przedstawione makro nie do końca tylko "zapisuje jako" plik. Ono tworzy nowy plik kopiuje odpowiednie dane (arkusze) zapisuje go pod pewna nazwa i go zamyka. Przy czym, ponieważ jest wyłączony "podgląd", nie widzisz wszystkich kroków. Też tak chcesz stworzyć plik? Czy wystarczy ci "zwykłe" zapisz jako - czyli plik nazwijmy go źródłowym, na którym włączysz...
Cześć, Chciałbym utworzyć makro które skopiowaloby wybrane arkusze np 4 arkusze o konkretnej nazwie (kopiowanie wartości i formatu z całego arkusza) do nowo utworzonego pliku o określonej ścieżce (this.workbook.path & ”/” ) i o nazwie w komórce C11 z akrusza o nazwie “informacje”. Z góry dzięki za pomoc ! Rafał
Jeżeli zamiast przycisków ActiveX mogą być zwykłe Excelowe, to możesz tak przerobić makro, które Ci podałem w poprzednim poście: 1. Przerób usuwanie obrazków na obrazki i przyciski: [syntax=vb]For Each s In wsdest.Shapes If s.Type = msoPicture Or s.Type = msoFormControl Then s.Delete End If Next s[/syntax] 2. Do swojego projektu wstaw moduł (Insert->Module)...
Tak, próbowałem i wszystko byłoby ok, tylko że w nim jest wskazana nazwa otwartego przez makro pliku, a teoretycznie jej nie znam.
coś poszło nie tak Jak widać na zrzutach :please: ja załączyłem i opisuje plik ProtUpBase.xls , a koleżanka otwiera jakiś plik (po nazwie sądzę, że też mój :D ) ProtTablica.xlsx , który żadnego makra rzeczywiście nie zawiera :cry:
Jak już pisałem, plik zrobiony był jakiś czas temu. Dzisiaj pewnie bym to uprościł. Zapuść krokowo Np makro "Filtr1" i obserwuj co się dzieje. Kluczowe jest kopiowanie listy z kolumny AA do ukrytego arkusza "Arkusz3" gdzie odbywa się "układanie" list i przypisywanie do nazwy. Fakt, trochę by tam trzeba pozmieniać.
Witam Zastanawiam się czy jest możliwość, aby makro skopiowało mi tyle arkuszy ile jest wypełnionych wierszy w arkuszu głównym. Dokładnie chodzi o to, że mam arkusz "Dane", w którym są podane pewne informacje dot. klientów (1 klient=1 wiersz) oraz arkusz "1", w którym są formuły pobierające dane z arkusza "Dane" z 3 wiersza (dane 1 klienta). Po dopisaniu...
Bardzo bardzo dziękuję! Praktycznie o to mi chodziło. Natomiast jeszcze 2 pytania: 1) Czy duża byłaby zmiana w kodzie gdyby dla braku nazwy czy braku numeru w arkuszu config, makro nie wyświetlałoby komunikatu tylko pozostawiało stare wartości w kolumnie z nazwą? (Arkusz1) Po prostu żeby wtedy przechodziło dalej do kolejnej linijki nic nie robiąc.....
1) niestety nie działa :-( Dodano po 9 2) chodziło mi o to, żeby np. dla portfela P001 w skoroszycie P001 oprócz arkusza nr 1 (teraz Arkusz1 -. powinno być "Dane" jak w pliku źródłowym) pojawił się arkusz nr 2 o nazwie "syntetyka" (jak w pliku źródłowym) z danymi właśnie z arkusza "syntetyka", ale tylko dla portfela P001
Jaka jest kolejność działań? Zakładam że: 1. dostajesz raport w innym pliku. 2. kopiujesz arkusz do pliku roboczego i nadajesz mu stałą nazwę . Np "TEMP". 3. Uruchamiasz makro. Tu pod zmienną w linii 3 makra FILTRUJ1 NAD_OK = "Jakaś nazwa nadawcy" należy podstawić wartość wybraną z pola listy lub kombo. Tak?
Witam, mam taki problem. Mam kilka arkuszy, których ilość może się zmieniać natomiast struktura będzie zachowana. Każdy arkusz zawiera dane osoby, projekt i ilość godzin przepracowanych na danym projekcie. Liczba projektów jest zmienna w miesiącu maksymalna wartość 30. Chciałbym żeby do arkusza wynikowego skopiować nazwisko, nazwę projektu, ilość godzin...
Odwołanie, tak aby przy zmianie danych w kolumnie pierwszego arkusza, zmieniały się dane w komórkach A1. Nazwy arkuszy: Arkusz pierwszy: "zestawienie" w tym są dane do kopiowania kolejne arkusze: 9A 01, 9A 02 itd do 9A 120. Czy tworzenie takiego makra nie jest bardziej pracochłonne od ręcznego wstawiania odwołania w każdym arkuszu?
Witam, Mam do napisania makro, które będzie kopiować dane z pewnego arkusza (nazwa arkusza nie zmienia się, ilość danych również) z dużej ilości plików o zmiennej nazwie (liczba skoroszytów może się zmieniać). Pierwszy problem polega na określeniu ostatniego niepustego wiersza w każdym z tym plików (określenie kolumn nie jest konieczne gdyż ich liczba...
wydaje mi się że chodzi ci o to: =Nazwa_arkuszu!nazwa_komórki i to wpisujesz w każdym arkuszu do którego chcesz skopiować (i obejdzie się bez makr ;) )
Zamknęłam tamto zadanie a mam jeszcze 3 pytania extra do makra, które stworzył (at)prl . Post dokleiłem do wczesniejszego wątku i odblokowałem go. W przypadku chęci kontynuowania zamkniętego wątku zawsze można zgłosić go do moderacji (raportując którykolwiek z postów w nim) z prośbą o ponowne otwarcie. 1. Makro dzieli skoroszyt na osobne skoroszyty...
Czyli po prostu wg matematycznej zależności... Zmyliło mnie to, bo przecież to się wzorem opisuje :) For I = 1 To 400 Sheets("Zduńska Wola K.").Select Cells(I, 7).Copy Sheets("Arkusz3").Sele... Cells((I - 1) * 63 + 18, 3).Select ActiveSheet.Paste Link:=True Cells((I - 1) * 63...
Ja chce kopiować komórki pomiędzy arkuszami Umieść kod w module (nie w kodzie arkusza)...
Witam, Potrzebuje napisać makro, ktore bedzie mialo dwie pętle. Pierwsza pobierać nazwy z nagłówka kolumn, kopiować je, przechodzic do nastepnego arkusza, tam druga pętla bedzię szukała wartośc pobranej z pierwszego arkusza, czyli nazwy kolumny. jesli znajdzie taką samą nazwe kolumny to kopiuje nagłówek z całą zawartością kolumny i wkleja ją do pierwszego...
Dziękuję za pomoc. Problem rozwiązałem w ten sposób, że Twój plik z makrem zastosowałem jako taki szablon, do którego będę kopiować zbiorczo arkusze z innego skoroszytu i dopiero wtedy zostaną prawidłowo rozdzielone do odrębnych plików z nazwą arkusza. Jeszcze raz serdecznie dziękuję.
Jesli ktos bedzie mial podobne pytanie odsylam do innego zrodla. 2 dni sie meczylem i mi pomoglo w dosyc podobnej kwestii: http://www.techonthenet.com/excel/macros... Niestety ale nazwy poszczegolnych arkuszy i dane z kolumny do makra wstawialem recznie. Jesli jest sposob na kopiowanie + tworzenie nowego arkusza o nazwie skopiowanej...
Źle się wyraziłam - dwukrotne kliknięcie w dowolny wiersz w kolumnie "Adres" w Arkuszu 'Baza' uruchamia makro, w związku z czym nie wiem jak edytować adres :)
Hej, Odnośnie VBA - znam podstawy, ale się uczę cały czas :) Ad.1. Tak w jednej kolumnie i tak jak pisałam kolejność przeglądania A1, B1, A2, B2 ... i to co będzie odpowiadało warunkom kopiujemy do jednej kolumny, jedno pod drugim. Ad.2. Nowy arkusz będzie zdefiniowany (nazwa - PORÓWNANIE).
Witam Po raz kolejny zwracam się z prośbą. Potrzebuje zrobić makro które będzie mi kopiowało wartość komórki A35 z pierwszego arkusza o nazwie "Pierw" do pierwszego wolnego wiersza w arkuszu o nazwie "Po za" Jednocześnie potrzebuje też makro które będzie wyszukiwało komórkę w arkuszu "Po za"( i kasowało ją) o takiej samej zawartości jak komórka A35...
Chciałbym mieć formułę lub makro, które pozwoliłoby mi wyszukać w kolumnie A prawidłową nazwę przedmiotu na podstawie czterech pierwszych znaków w innym arkuszu
LibreOffice Calc miałem, nie ruszyło. Chyba czas się przesiąść na Offica Makro ładnie działa w Excelu, tylko że w momencie jak wpiszę cokolwiek w drugim arkuszu pliku, to już nie hula :/ Jak ograniczyć zakres tworzonego przez makro zestawienia tylko do pierwszego w kolejności arkusza, lub arkusza o konkretnej nazwie jeśli w każdym pliku nazwy arkuszy...
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...
Cześć. Na początku chciałbym poinformować,że nie dawno odkryłem VBA czy tow Excelu czy Wordzie. Tym samym jestem zielony w tym temacie. Pocieszam się tylko tym że nie na wszystkim muszę się znać. Jak domyślacie na VBA nie znam się w ogóle :cry: . W związku z powyższym do osób które znają w tym temacie mam gorącą prośbę. Potrzebuję makra,które będzie...
Takie proste makro powinno załatwić sprawę: [syntax=vb]Application.ScreenUpdating = False Set wssuma = Worksheets("Suma") ost_wiersz_sumy = wssuma.Cells(wssuma.Rows.Count, 1).End(xlUp).Row For i = 2 To ost_wiersz_sumy With Worksheets(wssuma.Cells(i, 1).Value) ost_wiersz_arkusza = .Cells(.Rows.Count, 2).End(xlUp).Row .Range("B" & ost_wiersz_arkusza +...
Przedstawione makro kopiuje drugi wiersz arkusza "Schell" z każdego pliku umieszczonego w podrzędnym katalogu o nazwie "xls" do pierwszego pustego wiersza arkusza o indeksie 1. Nie można skopiować pliku do pliku. Natomiast można skopiować całe arkusze lub wyznaczone zakresy poszczególnych arkuszy. Opisz stosując właściwe nazwy obiektów. Lista plików...
Cześć, serdeczna prośba o wskazówki do makra, które będzie kopiować dane z innego pliku excel. Dane do skopiowania będą znajdować się zawsze w tym samym miejscu w arkuszu (zakres będzie zdefiniowany), ale pliki będą miały zmienne nazwy. Z góry dziękuję za pomoc.
czy da się za pomocą jakiegoś makra pobierając dane tak jak teraz kopiować pliki o takich nazwach jak wartości z tabeli? Raczej tak. Chodzi o skopiowanie arkusza do pliku o nazwie wpisywanej do komórki na samej górze (Np "P3.xls")? Nagraj rejestratorem. Ale jeśli już makro, to "przy okazji" zamiast formuł w komórkach (łącz w nowym pliku), lepiej przypisać...
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...
Dzień Dobry, zakładam temat bo w sieci to co znalazłem nie potrafiłem wykorzystać. W załączniku plik. Piszę makro, które będzie kopiowało mi z Arkusz2 do Arkusz1 wtedy, gdy będzie spełniony warunek. W Arkusz1 mam nazwy kontrahentów według wykazu alfabetycznego, w Arkusz2 są kontrahenci w różnej kolejności. Pętlą For w Arkusz1 schodzę po wierszach w...
Wierszy by było około 5tys. i są to podobne wartości (raport kasowy) Jeżeli wszystkich 5 tys wierszy to nie ma sprawy. Excel ma w jednym arkuszu 65.635 wierszy w każdej kolumnie. Jeżeli w każdym arkuszu masz po 5 tys to razem 600.000 wierszy więc jeżeli już to trzeba to będzie rozdzielić na parę kolumn. Kolumn jest w 2007 do IV czyli 256. A tak już...
Teraz OK. A jak zmodyfikować linijkę If key = 6 Then Arkusz3.PrintOut Copies:=1 żeby poszło na drukarkę inną niż domyślna Nazwa drukarki do XEROA5 PS. Modyfikacja załącznika nie potrzebna. Ja i tak kopiuję kod VBA i wklejam do swojego makra.
Mam makro, które kopiuje ze wskazanego pliku kolumny A:N i wkleja do odkrywanego arkusza w pliku z makrem. Takich plików, z których są kopiowane kolumny może być do 9 (może być mniej). Arkusze do których są kopiowane kolumny mają nazwy 'I L", "II L" itd do "IX L". Jak zrobić, żebym nie musiał każdorazowo uruchamiać makra do każdego pliku. Chodzi mi...
Dziękuje o właśnie takie makro mi chodziło, mam jeszcze jeśli mogę pytanie te makro przenosi do drugiego arkusza tego samego skoroszytu, co gdybym chciał przenieść z tego skoroszytu do całkiem innego skoroszytu np. o nazwie "Archiwum" , do "Arkusz1", który sobie stworze.
Makro zrobiłem poprzez zarejestruj makro. Ale zawsze była jakaś zmiana, Oprócz arkuszy A i B utworzyłem dwa tymczasowe. Sprawdzam czy nazwa A i B są jednakowe, jak tak kopiuję do C, jak nie zostawia puste. Później kopiuję ręcznie pozostałe dane. Wyciągam niepuste wg nazwisk. Kopiuję do arkusza D i nadaję pojedyńcze numery
Witam Wszystkich; Za pomocą komendy Workbooks.Add tworzę nowy plik, chcę skopiować wszystkie arkusze z poprzedniego do nowo utworzonego. Próbuję zrobić to tak: [syntax=vb]Sub PRSONALZapisCustomerFile() ' Zapisuje plik estimate 'deklaracja zmiennych Dim wiersz As Long Dim z1 As Long Dim z2 As Long Dim myName As String Dim myPath As String Dim sh As Worksheet...
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ą...
makro kopiujące nazwy arkuszy makro arkuszy
plastik spray 700ma prąd ładowania kangoo deska rozdzielcza
nierównomierne ogrzewanie tulejek prasa parafin
Jak rozebrać żelazko Philips Azur Performer Plus? Brak dźwięku w Ford Focus MK3 - radio i zestaw głośnomówiący