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...
Witam Chciałabym prosić o pomoc w stworzeniu makra do arkusza inwentaryzacyjnego (przykładowy arkusz w załączeniu) Mam dużą bazę danych wpisywaną ręcznie przy poprzedniej inwentaryzacji jest to kilka arkuszy z kilkuset pozycjami. Wyszukiwanie przy pomocy ctrl+f jest czasochłonne. Chodziło by oto...
aby program VBA zmieniał automatycznie nazwę tabeli A próbowałeś poprzez nagranie makra ? Otrzymasz całą składnię szybko i bezproblemowo, potem tylko dołączyć do właściwości ".Name", tabeli, właściwość ".Name" bieżącego/danego arkusza.
oo dzięki wielkie :) A dało by się dołożyć do tego makra funkcję żeby od razu w nowo powstałym arkuszu wklejał całą tabelę (wraz z treścią i odpowiednimi wymiarami komórek) z arkusza o nazwie "1"?
makro będzie uruchamiane z pliku makr osobistych więc pewno inputBox Dodano po 1 z takim samym plikiem za każdym razem inny, ale ten sam model(makiet) lub tym samym plikiem ? za każdym razem inny, ale ten sam model
Potrzebuję skopiować do nowego pliku na podstawie danych z listy (Nr rejestracyjny) część arkuszy( Najprostsze rozwiązanie PPK myszy na wybrany arkusz :arrow: "Przenieś lub kopiuj" do nowego skoroszytu :idea: Jeśli znasz VBA i masz setki tych arkuszy to nagraj sobie makro takiego kopiowania...
Wielkie dzięki, o to mi chodziło. Na przyszłość najpierw nagraj makro i podejrzyj kod. Niestety, nie wiem jak nagrać makro typu: jeżeli... to... - stąd też nie mogłem nic podejrzeć. Nie jestem niestety biegły w Visual Basic i tylko eksperymentalnie mogę coś tworzyć, co mi ułatwia pracę. Stąd...
ws to zmienna tymczasowa, w której pętla for each przechowuje Worksheet z kolekcji na którym akurat jest. To makro działa na arkuszach workbooka, na którym zostało uruchomione (ThisWorkbook.Worksheets), jego nazwa nie ma nic do rzeczy...
Witam ponownie. Wrócę do tematu ponieważ mam z nim jeszcze jeden mały problem. Ogólnie to chodzi o to że teraz już wiem jak zablokować możliwość dodawania nowych arkuszy i edytowania ich nazw ale problem w tym że po załączeniu tej opcji nie działają makra które zawiera plik, ogólnie nic w tej sytuacji...
błąd nr. 13 run time error type mismatch klikam debug i podkreśla na żółto fragment który wskazałem wcześniej u mnie nie działa, może ma to związek z nazwami arkuszy?! Nie sądzę ale sam już nie wiem dlaczego nie chce odpalić
Po pierwsze zawsze trzeba kierunkować dokładniej planowane zdarzenia. Jeżeli masz komunikat że makro chce modyfikować sumę (której nie masz w zestawieniu) to znaczy że makro chce to zrobić na innym arkuszu. Dlatego dla pewności upewnijmy się że usuniemy dane w tym arkuszu w którym nam zależy. (Wprowadziłem...
Witam, Chciałbym poprosić o makro które kopiowało by nazwy wszystkich Arkuszy z pliku i kopiowało je kolejno do pierwszego arkusza. Plik zawiera wiele arkuszy od Arkusz 1 do Arkusz n (o różnych nazwach). Chciałbym aby jego lista pojawiała się się w pierwszym arkuszu "Lista"od komórki A2 do ilość...
... Spróbuj samodzielnie opanować posługiwanie się nazwą, nazwą kodową lub indeksem w odwołaniach. To naprawdę nic trudnego ... Zauważ że podałem mu rozwiązanie/przykład jak na dłoni a jednak nie zrozumiał i nawet nie raczył sprawdzić. Należało by zacząć od czytania ze zrozumieniem. No ale może...
Witam ponownie, Nie bardzo rozumiem, albo chyba coś robię źle. 1)Mam dwa arkusze zest (arkusz1), temp (arkusz2). 2)Utworzyłem trzy przyciski w arkuszu zest(arkusz1) Generuj, usuń, zapisz. 3) Mechanizm1: Generuje sobie arkusze o odpowiednich nazwach, według przykładu od 1001 do 1009 i teraz np....
Ktoś mógłby pomóc? Ok, to tylko wyjaśnij: - skąd będziesz kopiował ? czy na pewno z tego arkusza Raport gdzie są przyciski ? - gdzie chcesz wklejać te dane ? gdzie jest słownik wiążący używane kody i zupełnie inne nazwy arkuszy ? skąd makro :D ma wiedzieć gdzie Ty masz ochotę wkleić aktualne...
(Miniaturka przedstawia zrzut ekranu z mojego prywatnego pliku Excela z projektami; zrealizowany jest on metodą którą opiszę poniżej) Witajcie moi drodzy Zapraszam do lektury mojego nietypowego tematu przeznaczonego dla elektroników amatorów i hobbystów wykonujących własne projekty. Przedstawię...
Witam serdecznie. Zwracam się z wielką prośba o pomoc w edytowaniu makra. Mam folder o nazwie"aaaa" w nim jest podpięte makro o nazwie "bydło". W tym folderze mamy nazwy arkuszy: "Dane", "Ksiega", Ksiega1", "wzor ksiegi". Jak uruchomimy makro"bydło" to idealnie działa w arkuszu o nazwie...
Proszę o pomoc z makrem, dla mnie to ważna sprawa, nie znam się na makrach. Mam plik Excela o nazwie "porównywarka" . W tym pliku jest 5 arkuszy a będzie ich 10. nie stawiałem wszystkich nazw arkuszy, bo 9 arkuszy ma podobne dane. Nie ma sensu. Nazwy arkuszy zawsze są takie same jak od komórki o6...
Witam, podczas tworzenia makra natrafiłem na problem z którym nie mogę sobie poradzić. Makro miałoby za zadanie z wszystkich arkuszy o nazwie "Protokół x" zrobić zestawienie w jednym arkuszu oraz z "delikatnymi" zmianami odnośnie rozmieszczenia w kolumnach. Na chwilę obecną nie idzie źle - mam...
Witam! Nagrałem makro do sortowania danych według wartości rosnących. Makro przypisane jest do przycisku. W jaki sposób muszę je zmodyfikować aby arkusz w którym ma sortować dane wybierało na podstawie wartości w komórce B1? Obecnie ma "na sztywno" dopisany arkusz o nazwie a38, a chciałbym aby...
Cześć wszystkim, Z góry uprzedzam, ze moja wiedza w zakresie VBA jest znikoma - ogranicza się jedynie do pętli, odwołań do komórek, tworzenia mało skomplikowanych funkcji czy makr. Niektórym z was mój problem może wydać się prosty. Przeszukałem parę stron w poszukiwaniu odpowiednich makr lub przerobieniu...
Chodzi o to, aby w pliku zbiorczym znalazły się wszystkie arkusze ze zbioru plików. Nie jest ściśle określona liczba plików. Wiadomo tylko, że znajdują się w jednym katalogu, a ich nazwy różnią się 2 znakami na końcu. Nie wiadomo ile dokładnie arkuszy zawiera każdy z plików (ta ilość z czasem rośnie) ...
Witam, Potrzebuję pomocy osób obeznanych z Excelem. Mam problem: tak jak w załączniku mam plik w którym pierwszy arkusz to lista osobowa z wartościami do niej przypisanymi. Drugi arkusz to zestawienie ogólne (nieistotne dla mojego problemu) a kolejne to arkusze osobowe których nazwy to imiona...
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...
Witam wszystkich, Chciałbym zasięgnąć waszej porady ws Excelowskiego Makra które nie pozwala mi spać po nocach :( Sprawa wygląda prosto ale taka nie jest. Chodzi o to że makro po uruchomieniu powinno wyczyścić zakładkę "Dane" po czym otworzyć okienko do wskazania pliku Excel z którego ma skopiować...
Witam. Znalazłem w sieci Marko które wykorzystuje do scalania danych z wielu skoroszytów do zbiorczego. działa wyśmienicie (scala dane z pierwszego arkusza skoroszytów) ale pojawiła się potrzeba scalenia arkuszy z rożnych plików po nazwie arkusza czyli mam 10 plików źródłowych z arkuszami "Arkusz1",...
A co z nagłówkami, powtarzanymi wielokrotnie ? Ma być tylko jeden, czy ileś tam za każdym razem nowy i w wyniku nagłówkowy przekładaniec ? Edycja: Nie przyjrzałem się ... kopiujesz bez nagłówka ... Ale może przy pierwszym kopiowaniu powinien on być przenoszony jednorazowo ? Ręczie go wklepujesz/kopiujesz...
Zamiast przerabiać było napisać nowe makro, bo np. po co ci pętle. Najpierw musisz "pobrać" nazwę arkusza z A1 potem nr wiersza z B1 A potem wprowadzić dane w arkusz o nazwie zapisanej w zmiennej "nazwa" w wierszu zapisanym w zmiennej "wiersz". C1 w kolumnie 2 a D1 w kolumnie 3 Private Sub CommandButton1_Click() nazwa....
Dzień dobry, Dziękuję za wyjaśnienie w kwestii sumy liczb nieujemnych. Tak jak myślałem, chodzi o to, żeby co najmniej jedna wartość była niezerowa, więc jeśli liczby są nieujemne, właściwym kryterium jest suma. Formuły z ostatniego postu znowu nie rozumiem, bo w tej wersji, którą Pan załączył w komórkach...
Witam! Chciałbym osiągnąć następujący efekt. Mam plik excel o nazwie "tygodnie" w którym kolejne arkusze nazywają się T-1, T-2, T-3… nazwy oznaczają tydzień w roku kalendarzowym i są tworzone z tygodniowym wyprzedzeniem, czyli arkusz T-16 jest dodawany dopiero w tygodniu 15 itd. W kolejnym...
Witam! Mam w excelu arkusz "Template" i chciałbym utworzyć makro, które dodawałoby nowy arkusz ze skopiowaną zawartością arkusza "Template" i z nazwą "projekt+1". Uściślę, może o co mi chodzi w przypadku nazwy "projekt+1". Chodzi mi o to, żeby każda kolejna zakładka została nazwana jako "projekt"...
Cześć, napisałam makro, które będzie nadawać mi nazwę zakładek po kolei zadanie domowe X itp., ale nie chcę by działało na pierwszej zakładce, która nazywa się info. Jak zrobić, żeby wykluczyć z tego makra pierwsza zakładkę? [syntax=text] Sub makro_1() Dim Zakl As Worksheet 'pojedynczy arkusz Dim...
aby automat uruchamiał makro dla każdego arkusza stworzonego w Skoroszycie Umieść "ciałko" makra w procedurze modułu 'ThisWorkbook': Range("AB65").Select " jest odniesieniem nie do arkusza "TABELE", ale do bieżącego arkusza przed zaznaczeniem tegoż o nazwie "TABELE". "Wszystko" co masz bez kropki...
Witam wszystkich forumowiczów! Jestem absolutnie początkujący jeśli chodzi o programowanie w VBA w Excelu, a potrzebne mi jest makro, które (po jego aktywowaniu np. kombinacją klawiszy) wytnie jeden wiersz z jednego arkusza i wstawi go do drugiego, w pierwsze wolne miejsce. Skoroszyt będzie się składać...
Ale nie rozumiem jak jest z zapisem liczby z kalkulatora do jakieś komórki w arkuszu Jak można nie rozumieć, że ty sam napisałes? To znaczy: Z pierwszego arusza "Sheets(1)" odczytaj komórkę A1 i dodaj do niej liczbę z TextBox1 ("TextBox1.Value" = przekształć tekst na liczbę). Wynik zapisz do...
Bardzo proszę o pomoc. Muszę skopiować około 400 par arkuszy (złożonych z określonych czterech arkuszy) i utworzyć z nich 400 skoroszytów. Do tej pory nagrałem sobie takie Makro i zmodyfikowałem na potrzeby tych 400 par, ale kod makra jest ogromie długi. Chciałem zrobić pętlę, która korzystałaby...
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...
Witam, bardzo proszę o pomoc.W zakładce suma mam imiona osób. Chcę posortować całość po innych arkuszach tak aby każda osoba miała swój arkusz. Jeżeli w arkuszu suma w kolumnie A jest wpisane imię Dariusz to ta linia powinna zostać przekopiowana do arkusza o nazwie Dariusz. Aktualnie robię to funkcją...
Wyszło mi coś takiego[syntax=vb]Sub Pobierz() Dim nazwa As String Dim ark As Worksheet Dim wrs As Long, j As Integer, i As Long nazwa = "Arkusz2" 'nazwa arkusza docelowego 'tutaj 2 dla porównania z 1 ThisWorkbook.Activate 'gdyby nie był Sheets(nazwa).Range("A2:H65536")....
Witam, Mam problem z modyfikacją makra, które zapisuje mi każdy arkusz jako oddzielny plik .xlsx nazywając go jednocześnie nazwą arkusza, mianowicie potrzebuję przeróbki tego makro, aby zapisywało mi pliki w formacie .pdf. Poniżej skopiowany kod z VBA, bardzo proszę o pomoc :) Sub przeniesienie_arkusza() ...
To makro będzie w miarę proste, wystarczy w pętli sprawdzać kolejne komórki w pogrupowanej kolumnie, a jak dwie kolejne się różnią - skopiować zakres od...do: [syntax=vb]Private Sub CommandButton1_Click() On Error GoTo myErr Application.ScreenUpdating = False Set wsdane = ThisWorkbook.Worksheets("dane")...
Witam Część mojego makra w pętli otwiera pliki, kopiuje z nich kolumny, wkleja i wkleja do arkuszy w pliku z makrem [syntax=vbscript] For i = 1 To .SelectedItems.Count Set wkb2 = Workbooks.Open(.SelectedItems(i)) 'TU wytępuje ostatni raz With wkb1.Sheets(tblArkusze(i - 1)) .Visible = True End With With...
Zrobiłem nagrałem makro które automatycznie odświeża 3 tabele (co 5 minut). Nie do końca. Makro "start" odświeża 3 tabele i planuje jednorazowe uruchomienie makra "button3". Żeby działało co zadany czas musisz wywołać procedurę "start" w "button3". Co może być nie tak? makro czasem działa, czasem...
Ja zaproponuję jeszcze coś innego (oczywiście cały czas mówimy o możliwościach bez wykorzystania VBA [makr]). Zaznacz wszystkie kolumny. Ukryj je. Włącz ochronę arkusza z hasłem odhaczając wszystkie opcje. Najedź na nazwę arkusza kliknij ukryj. Nawet jak ktoś odkryje arkusz będzie widział szarość...
Nie potrafisz przerobić jednej linijki? Potrafię, we wcześniejszym wpisie chciałem zaznaczyć o co mi chodzi - jak się okazuje nie udało mi się ;) Spróbuję objaśnić na podstawie pliku, który załączyłeś: 1. po wykonaniu makra uzupełniają się arkusze kryterium1, kryterium2, kryterium3. 2. w arkuszu...
Dzień dobry, Nie wiem dokładnie co to makro miałoby robić, jeśli odwołuje się do obiektów z docelowego arkusza to można całość objąć instrukcją With: With Worksheets("Arkusz2") 'tu nazwa docelowego arkusza ' .... kod makra End With W kodzie makra nazwy tych obiektów, które odnoszą się do...
Witam. Mam napisaną aplikację w Excelu służącą do „pełnej” obsługi małego zakładu szklarskiego. Czyli pozwala na spisanie i wykazanie materiałów oraz prac wykonanych dla klienta, w oparciu o te dane – wystawienie faktury, pozwala na prowadzenie gospodarki materiałowej, archiwizuje faktury,...
Nie wiem czy dobrze zrozumiałem myśl użytkownika "krzys.kas" Znawcy vba pewnie mnie wyśmieją za kod poniżej: Dodano po 1 Coś ala Nie mam drukarki. Jutro sprawdzę twój kod. Jestem przekonany że będzie działał. :D Dodano po 7 Zapomniałem podać że wartość TAK będzie zmienna. Nie jest...
Witam, Potrzebuję napisac makro ktore: 1 - stworzy nowy plik excela np. na dysku D:/ o nazwie np. "plik" 2 - z pliku z ktorego wykonuje makro, skopiuje zawartość arkusza (tylko wartosci i formaty), do nowo utworzonego pliku 3 - (ewentualnie zmieni nazwę arkusza z arkusz1 na "tabela" Początek mam...
Witam Czy ktoś miałby chwilkę i mógłby mi pomóc? (może być makro lub jeśli się da to funkcje z arkuszem pomocniczym). Mam problem z kopiowaniem wierszy i ich dublowaniem do gotowego arkusza. Mam skoroszyt, który zawiera 3 arkusze robocze: "Re_1", "Re_2" , "Re_3" oraz arkusz wynikowy "Wynik". Do...
W takim razie nie plik tylko arkusz kod to np. (w zależności od nazwy arkusza) Sheets("Arkusz2").Acti... 'aktywowanie arkusza Range("A100")... 'zaznaczenike/przejście do danej komórki nagrywanie makr jest w zakładce deweloper (excel 2007 i...
Witam, staram się napisać mój pierwszy program w VBA. Ma on za zadanie automatyzację ewidencji sprawozdań. Jedną z cech tego programu, musi być zdolność do kopiowania zawartości określonych komórek z każdego arkusza dokumentu i wklejanie ich kolejno do oddzielnego pliku. Żeby nauczyć się samej pętli...
Cześć, szukałem w internecie po wielu miejscach sposobu na rozwiązanie problemu związanego z ochroną skoroszytu jednak rozwiązania nie znalazłem. Mam makra, które w odpowiedni sposób chowają, odkrywają arkusze oraz zabezpieczenia do tych arkuszy za pomocą hasła tak aby nikt nic nie zmieniał....
Przekopiuj sobie załączony plik do katalogu z plikiem źródłowym i uruchom makro. Założenia: - plik do którego dane są pobierane jest w tym samym katalogu co plik źródłowy, w innym przypadku należy przypisać do zmiennej sPath ścieżkę dostępu do pliku źródłowego - plik źródłowy nazywa się "czerwony.xlsx",...
Mam prośbę o kod dla nazwy arkusza danych - z komórki zmieniającego się pola Kombi. Chodzi o to- by nazwa wyszukiwanego numeru faktury - automatycznie (dynamicznie) zmieniała nazwę arkusza do momentu kiedy tej faktury nie zapiszę w określonej bibliotece w formacie PDF. Niestety przerasta to moją wiedzę...
To jest tak jakbyś wpisał formułę do komórki zawierającą odwołanie do innego pliku i w zmiennej a masz wartość z tej komórki jeśli chcesz pobrać więcej danych to musisz napisać pętle pobierającą dane do tablicy lub zakresu. Ale jeśli masz jeden duzy plik do którego wszyscy wpisuja dane, a nie powinien...
Dzień dobry, Rozumiem, że oczekuje Pan makra w Visual Basicu, bo w samym Excelu byłoby to dość trudno zrobić. W załączniku ma Pan propozycję rozwiązania w postaci makra uruchamianego przyciskiem z arkusza ALL. Przyjąłem następujące założenia: 1. Plik zawiera tylko arkusze z danymi i jako ostatni arkusz...
..Najprościej nazwać arkusze i odpowiednio ustawić je na pasku zakładek.. Myślałem o tym rozwiązaniu ale zmusza ono do pilnowania pewnego porządku. Autor problemu nie określił, będzie tylko on używał arkusza, czy inne osoby też. W przypadku większej ilości użytkowników istnieje konieczność pilnowania...
Witam Mam w arkuszu nr 2 takie oto makro Sub Sort1() ' ' Sort1 Makro ' ' Range("F607:J617")... ActiveWorkbook.Worksheets("Arku... ActiveWorkbook.Worksheets("Arku...
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)...
Dzięki bardzo ale mógłbyś wyjaśnić czy mam to umieścić na początku kodu? [syntax=vbscript]Rows(Target.Ro... 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, Nie wiem dlaczego skoro poprawnie odczytuje nazwę arkusza... ktoś podpowie gdzie jest problem? Oto moje makro: Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) Dim ShtName As String ShtName = Left(Target.SubAddress, InStr(1, Target.SubAddress, "!") - 1) Sheets(ShtName).Visible...
witam, czy ktoś pomoże mi w takim oto problemie. mam dwa pliki excella, w jednym mam dane sprzedaży dla danych osób a arkusze są nazwane jako data, w drugim pliku robię podsumowanie dla tej sprzedaży, kopiuję dane z pierwszego pliku do drugiego za pomocą kopiowania adresu ścieżki, ale żeby skopiować...
Można zdefiniować tablicę z nazwami arkuszy w których mają być dokonywane zmiany i przejść pętlą po arkuszach wpisanych do tej tablicy: [syntax=vb]Sub zz() Dim tblArkusze() Dim i& Dim rngTmp As Excel.Range tblArkusze() = Array("I L", "II L", "III L") 'nazwy arkuszy w których mają być wykonane...
Tak na szybko spróbuj : Sub Makro1() arkuszdane = InputBox("podaj nazwę arkusza z danymi") kol = CInt(InputBox("Podaj kolumne z danymi")) wier = CInt(InputBox("Podaj pierwszy wiersz z danymi")) ile = CInt(InputBox("Podaj...
Skoro próbuje Kolega coś sam pokombinować, to trochę pomogę... ;) Nie wiem na ile dobrze zrozumiałem całą ideę, więc będziesz musiał trochę dostosować kod do swoich potrzeb. Zacznijmy od tego, żeby umieścić kod makra wewnątrz takiego fragmentu kodu (fragment dla makra umieszczonego w zdarzeniu kliknięcia...
Z którego miejsca arkusza "Podwykonawcy" ma to być pobierane? Z kolumny K, czy D? Czy nie prościej byłoby każdemu podwykonawcy wydzielić osobny arkusz i odwoływać się do tych samych zakresów (ADR.POŚR z podstawioną nazwą arkusza=podwykonawcy)? Jaka wersja Excel'a? Sądząc po próbach z SUMA.WARUNKÓW,...
ActiveCell.FormulaR1C1 = "=" & wsh.Name & "!RC[-2]" działa przy nazwie arkusza, np"570". Nie chce niestety zadziałać przy nazwie, np. "570-2013-10-08". Zadziała, kiedy usunę "-" i zmienię nazwę na "57020131008", ale chcę zachować nazwę arkusza "570-2013-10-08". Jak to zrobić?
Ale zawsze idąc ze skrótu zatrzymuje się w miejscu, które wskazałem na początku. Makro z reguły zatrzymuje się w jednej linii kodu ze względu na generowany w niej błąd (np. zła nazwa arkusza, zła nazwa pliku, próba otwarcia otwartego pliku itp) - nie wskazałeś tej linii, a mnie (po drobnych modyfikacjach...
Witam, nie wiem czy trafiam w dobry dział, ale zdaje mi się, że nie ma nic bardziej pokrewnego. Szukam chętnego do pomocy w stworzeniu specyficznego arkusza kalkulacyjnego. Arkusz musiałby spełniać kilka założeń. Poniżej lista rzeczy, które musiałby generować: Arkusz 1 zawiera bazę danych klientów...
Np filedialog: .Filters.Add "Pliki Excel", "*.xls" Można i bez otwierania. Spróbuj coś z makr Excel4 arg = "'" & p & "[" & f & "]" & s & "'!" & Range(r).Range("A1"... , xlR1C1) ExecuteExcel4Macro(arg&...
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ę...
Zakładając, że makro uruchamiasz przy aktywnym arkuszu wynikowym, konstrukcja powinna wyglądać mniej więcej tak ostWrs = tu szukamy ostatniej niepustej komórki w arkuszu wynikowym For Each sht In ThisWorkbook.Worksheets If sht.Name <> "tu nazwa arkusza wynikowego" Then ostWrsArk...
Witam To teraz pytanko: Czy calość powinna być w arkuszu(nazwa arkusza) czy w poszczególnych modułach. To moje pierwsze takie dzieło, więc proszę o wyrozumiałość.. :D. pozdrawiam Dodano po 40 Witam A teraz już ogarnąłem. Wszystko działa, tzn, start/stop. Dziękuje za pomoc raz jeszcze. Pozdrawiam...
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...
Może użyj z odniesieniem do konkretnego arkusza, np Worksheets("Sheet1").Cells(i, 1).Value Chcę, żeby to działało na każdym skoroszycie jaki otworzę. Dlatego też nie mogę na sztywno określić nazwy arkusza w kodzie
Chyba się nie da. Musisz albo zrobić makro na arkuszu 2009, albo wejść w edytor VBA (ALT+F11), otworzyć po lewej Module1 albo coś w ten deseń, tam odszukać nazwę makra które Ci tworzy wykres i popatrzeć, w którym miejscu jest zakodowane 2008. A potem przerobić to - sposób zależy od kodu.
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 ...
Witam, Mam 2 problemy z jednym z arkuszy (plik załączam): 1) Aby nazwy przewoźników kopiowały się z nazw arkuszy w kolumnie "Przewoźnik" (lista rozwijana -> Przew. A, Przew. B, Przew. C). 2) Druga sprawa nieco bardziej skomplikowana. Wybieram trasę, wybieram przewoźnika i chciałbym, aby wartość z...
I teraz jest wszystko jasne :) Stworzyłem makro, dla którego na sztywno wpisałem zakres komórek, w których będą nazwy arkuszy do ukrycia/odkrycia. [syntax=vb]Sub Pokaz() For Each ark In ThisWorkbook.Sheets(1).Range("A1:A2") For Each sh In ThisWorkbook.Sheets If sh.Name = ark.Value...
Tylko czemu wynik jest dopiero od 435 wiersza? Najprawdopodobniej masz jakieś puste wiersze, które makro widzi jako puste wartości. Spróbuj dopisać klauzulę WHERE. przypuśćmy,że mam jeszcze jedną tabelę tylko z dwoma kolumnami: material no( z nr komponentów-nie powtarzają się) i stock( ze stanami...
Witam , Posiadam wiele takich samych plików które zawierają harmonogramy z wierszami zawierającymi status, operacje i czas. Dane znajdują się w zakresie od H14 do BA312 tak jak w załączonym pliku. Potrzebuje zebrać ze wszystkich plików dane do jednego pliku w Formie Sumy czasu dla danej operacji która...
Makro nie musi otwierać skoroszytu Szybsze (w działaniu) rozwiązanie tj bez otwierania i zamykania plików może wyglądać tak: [syntax=vbscript]Public Sub wypisz() Set a = ThisWorkbook.Sheets(1) x = a.Cells(Rows.Count, "A").End(xlUp).Row + 1 Set objFSO = CreateObject("Scripting.FileSystemObject...
Dzieki bardzo za pomoc raz jeszcze. Probowalem pokomilowac co niec i zrobilem sobie arkusz z dwoma przyciskami. Kod wyglada nastepujaco " Private Sub CommandButton1_Click() Dim sciezka As String With Application.FileDialog(msoFileDialogOpen... .AllowMultiSelect = False .Filters.Clear ...
Worksheets("nazwa arkusza") Taki zapis będzie stosowany do istniejącego arkusza o nazwie 'nazwa arkusza', którego zapewne nie ma w skoroszycie.
Bez pliku ciężko pisać kod. w "Spis końcówek lotów" jako ZŁOM Domyślam się, że 'spis końcówek...', to nazwa arkusza. Ale co to 'złom', to nie mam pojęcia.
Witam, - w czasie epidemii koronawirusa, w czasie robienia zapasów artykułów spożywczych, pomyślałem, że dla zinwentaryzowania tego co w lodówce, na regale w spiżarni i wszystkiego co może się zmarnować - bo mija data przydatności do spożycia, napiszę żonie makro. Myślę, że może się przydać, tym bardziej,...
Witam, mam ogromna prosbe czy mógłby ktoś mi pomóc/podpowiedzieć w zmodyfikowaniu makr. 1. W załączonym skoroszycie jest jeden arkusz główny <BAZA> i kilka arkuszy pomocniczych np <SM_S_M>, (ich liczba lub nazwy moga się zmieniać). Do każdego z "Arkusza pomocniczego" podpiete są makra które...
Dziękuję z góry wszystkim za chęć pomocy. Potrzebuje pomocy w edycji prostego makra, ktore dziala w Excelu - niestety, jestem laikiem jeśli chodzi o programowanie... Moze ktos znajdzie chwile i pomoze? Moj problem wyglada tak. Mam plik excela w którym w kolejnych arkuszach są dane dla kolejnych dni...
Wynika to z utworzonego wcześniej arkusza, który sobie rozwijam. Jest to arkusz gdzie jest lista "tematów" pod tymi "tematami" kryją się zewnętrzne arkusze dla których wykonywane są dodatkowe makra. Do tej pory miałem "na sztywno" przypisane te dodatkowe makra do poszczególnych "tematów" w makrze...
Tu trzeba już więcej wiedzy z VBA i czasu (którego niestety na chwilą obecną nie mam - gdyż makra znam na poziomie podstawowym i trzeba by było szukać i nagrywać a później wnioskować i wykorzystywać to co potrzebne). Jednak przedstawię pewien tok który może ci pomoże (bo o większość rzeczy już się...
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...
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....
Do kolegów i koleżanek zwracam z prośbą o pomoc. Exel 2010 jaki używam. Mam zeszyt o nazwie "Wzor program do składnic". W tym zeszycie są arkusze o następujących nazwach: "Informacja", "DANE", "ZASTĄP", "SCALANIE", "DATY_SKRAJNE", "SPIS". W tych arkuszach znajduje się wiele funkcji, które miały...
Plik csv można "klasycznie" otworzyć w Excelu poleceniem 'Workbooks.Open', skopiować potrzebne dane i zamknąć. Jeśli nazwy arkuszy w plikach WZ.xls oraz PZ.xls są pobierane z A2 odpowiednich dokumentów (csv), to można w pętli otwierać je kolejno, sprawdzać czy istnieje arkusz o nazwie=A2 i jeśli nie... Postąpiłbym...
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ą...
Witam. Potrzebuję rozwiązać dwa problemy. 1. W skoroszycie, pierwszym arkuszem o nazwie "lista" jest lista nazwisk umieszczona pionowo w kolumnie "A". W kolejnym arkuszu o nazwie "001" muszę wczytać zawartość komórki A1 z arkusza "lista", w kolejnym arkuszu o nazwie "002" wczytać ma się zawartość...
Zamykając temat. W pierwszym poście tego tematu jest kompletny kod pod EXCEL 2003 i XP (sprawdzony) Poniżej przedstawiam kod sprawdzony na EXCEL 2007 ( w większości opisane co i jak) [syntax=vb] Sub OperacjeHurtowe() 'makro dla excel 2007 'nazwa pliku startowego start2.xlsm i jest umieszczony...
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...
Witam, Mam problem z edycją Makra (poskładanego z kilku znalezionych, nieco edytowane). Makro tworzy już dodatkowe arkusze zmieniając ich nazwę. Wybiera i zapisuje dane od 2 wiersza w nowych arkuszach. Chciałbym jednak by zaciągał również pierwszy wiersz z arkusza "OPIS" jako nagłówek. Zależy mi...
barwa dźwięku uszczelkę silikonem drukarka sieciowa ricoh układy ne556 reset komputera citroen odchylanie tyrystorowe przerywa ładowanie laptop tempomat skoda octavia instrukcja supramatic przerywa czasie jazdy pralka indesit migające diody wentylator czarny ekran hydrofor dobijanie powietrza