W załączniku rozwiązanie. Nie wiem, czy to wszystko. zeby sie pojawialo zestawienie na najblizsze 3 miesiace Jesteś w stanie przygotować wzór tego zestawienia?
Witaj. Da się nawet bez makro - można stworzyć pomocniczą kolumnę pozycja, wypełnić ją odpowiednią formułą i posortować według wartości w niej wygenerowanych. Na koniec można usunąć pomocniczą kolumnę. Na lenia można to w rejestrator makr upakować. A można też napisać poprawne makro (nieco je optymalizując). Ale na początek najprostszy sposób - bez...
Dla mnie by wystarczyło... Niestety, osoba, która zażyczyła sobie wykonanie takiego arkusza w Excelu powiedziała, że ma być posortowane.
to o czym piszesz to dla mnie czarna magia Jaka tam czarna. Sprawa jest dość prosta i spokojnie obędzie się bez różdżki, szklanej kuli, czy czapki Merlina :) Makro najpierw sortuje, następnie zmienia wartości na tekst w kolumnie D. Przycisk po prawej służy tylko testom. Pozostaje sformatowanie gotowej tabelki (można dopisać stosowną procedurę). Pewnie...
Rzecz w tym, że rozpiska musi być w pionie, jedna grupa pod drugą. Żeby nie wpisywać ręcznie (trochę tego dużo się zrobiło), dorobiłem kolumny pomocnicze i teraz można przeciągać formuły w dół. W tej chwili potrzebne nam do w/k 35/15 Uwaga w S1 jest wyjątek. "Kopiowalne" jest dopiero od S2 (tak mi się dopasowało z MOD).
Na początek proponuję skorzystać z rejestratora makr (dla każdej czynności osobno), połowa pracy będzie z głowy. Pozostanie tylko odrobinę "posprzątać", podstawić zmienne i określić ich wartości (zamiast sztywnych zakresów, nagranych przez rejestrator) i poskładać wszystko do kupki.
j.w. Jedynym pseudorozwiązaniem jest "zamknięcie" sortowania i/lub grupowania pod przyciskiem z kodem makro który na wstępie wyłączy ochronę a po wykonaniu działania znów ją włączy.
Nie jest to sortowanie, ale może wystarczy ci dodać kolumnę z rankingiem. (w przypadku dwóch takich samych wyników będzie np dwóch z nr 3 ale nie będzie 4 tylko od razu 5) Można dodać jeszcze formatowanie warunkowe i "kolorować" złotem pierwsze miejsce sredbrem drugie i brązem trzecie. (tego nie ma w załączniku ale myśle że to nie problem) W innym przypadku...
Sheets("DRUKI SORTOWANIE").Select Range("A1").Select Selection.Copy Sheets("KP").Select Range("V28:W28").Select ActiveSheet.Paste Taki fragment można zapisać krócej tak: Gdzieś na początku makra: [syntax=vb]Set wsSort = Sheets("DRUKI SORTOWANIE") Set wsKp = Sheets("KP")[/syntax] a dalej: 1. jeżeli chcesz skopiować tyko wartości, bez formatów: [syntax=vb]wsKp.Range("V28:W28").Value.....
Wpadłem na taki sposób, wklejam wszystko poziomo (transpozycja) i czy da się teraz zrobić tak, żeby szło to poziomami? Np. Wklejam tak: 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 Chcę otrzymać tak: 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 I już by mnie to zadowoliło w 100%. Poziomo czy pionowo zdaje się, że to dalej będzie przekładaniec... W załączniku moje próby i pod...
Poszukaj informacji na temat sortowania bąbelkowego. Tak się składa, że w VB litery i łańcuchy też można porównywać. "b">"a", "Alicja">"Ala" itd Musiałbyś kopiować dane ze wszystkich kolumn wiersza do tymczasowej tablicy, co pokazałeś że potrafisz już robić. Sumowanie najlepiej zrobić funkcją SUMA.JEŻELI. W VB Aplication.WorksheetFunction.SumIf(argum...
można to zrobić w 3 etapach 1. Przejdź do lokalizacji (ChDrive, ChDir) 2. przy pomocy funkcji Dir i FileDateTime zrobić listę plików 3. Sortuj listę malejąco po Data-godzina pierwszy na liście będzie plik, którego szukasz
Zamiast używać dodatkowej funkcji końcowej, wystarczy posortować tabelkę liczba-ilość wystąpień wg. ilości wystapień, malejąco. To tylko 10 niezmiennych pozycji liczb ... To wiem, tylko jeżeli coś się zmieni w tabeli trzeba będzie znowu sortować Co prawda można to zautomatyzować przez makro - ale to już makro :) do autora topiku chodzi o zwykłe sortowanie...
na komputerze z wersją 2003 poniższe makro działa bez problemu to samo makro na komputerze z excelem 2010 Chyba jest raczej odwrotnie, to na 2003 makro z ".Sort.SortFields" nie będzie działać. Excel 2003 obsługuje co najwyżej składnię ".Sort Key1:=, Order1:=, Key2:=, Order2:=, Key3:=, Order3:=, Header:= ..." Excel 2010 obsługuje zarówno powyższe ,...
Zauważ, że arkusz niue nazywa się "mm.dd.yyyy" tylko ma konkretną datę jako nazwę więc lepiej w ten sposób: select.end ale tak też można. I druga rzecz. Ta funkcja też ma pewien błąd. Trzeba podać datę początku i datę końca. Nie wiem co chciałeś osiągnąć chyba że jakimś kodem którego akurat ja nie stosuje/nie znam. [syntax=vb] Range("H2").FormulaR1C1...
ale zobacz: Posortuj najpierw... Albo nagraj makro sortowania i dopisz na początku procedury kolegi PRL
Scalanie to nie jest - moim zdaniem - właściwa droga. Raczej trzeba wypełnić wszystkie wiersze w kolumnie A, posortować, w końcu usunąć zbędne wpisy. Nie jest z tym tak dużo roboty, gdy czynność trzeba powtarzać wielokrotnie, można ewentualnie napisać makro. Można to zrobić tak: 1) w kolumnie A w pierwszej wolnej komórce (arkusz ANG - PL, komórka A3)...
Spróbuj wyłączyć odświeżanie: Application.ScreenUpdating=False za linią z Windows(rap).Activate. Włącz na końcu =True Jeśli nie zadziała można przerobić kod tak, żeby nie było potrzeby "biegania" po arkuszach (bez activate, select, etc)... Np fragment z sortowaniem (nie odwołuj się do okna instancji, tylko do konkretów). W przykładzie przypisanie i...
Ale, ale. U mnie zmienna 'test' "pokazuje" posortowane, bez względu na kolejność zaznaczania.[syntax=vbscript]With fd .InitialFileName = Environ("HOMEPATH") & "\Desktop\" .Filters.Clear .Filters.Add "Pliki Excel", "*.xl*; *.xls*" .AllowMultiSelect = True .Show For i = 1 To .SelectedItems.Count test = .SelectedItems(i) Next End With[/syntax]Może toto...
wielkie dzięki
Jeśli chodzi o pobieranie danych i ich sortowanie, to można by to tak zrobić jak w pliku poniżej (jeden z wielu wariantów): 964013 W kodzie praktycznie brak obsługi błędów, więc bierzesz odpowiedzialność za rzetelność swoich danych, będą chińskie albo złe formaty daty, makro się wywróci, będziesz sabotować własne działania w obróbce danych, makro się...
A tu wyłapuje nazwiska bez duplikatów (imiona mogą być różne, porównuje tylko nazwiska). Jeżeli nazwiska z kolumny A bez pary mają się pokazywać też na dole listy, to należy przesunąć blok "sortowanie" przed blok "znajdowanie w kolumnie A nazwisk bez odpowiedników w B". Program nie sortuje też niedopasowanych nazwisk z kolumny B. Aby uruchomić program...
Makro poniżej przesuwa nazwiska w prawo o wartość numeru grupy+1, a następnie usuwa puste komórki w obszarze danych. Nazwiska nie są posortowane. Jeżeli jest potrzeba. sortowania to na początku makra dopisać sortowanie.[syntax=vbscript]Sub Przepisz_Nazwiska() Dim Tab_Opis As Variant With ActiveSheet Tab_Opis = Array("Grupa 1", "Grupa 2", "Grupa 3",...
Wykorzystaj kolumnę pomocniczą, w której umieść liczby poprzedzone dowolnym znakiem tekstowym (Np ="a"&A1) i sortuj wg tej kolumny.
Witam Potrzebuję pomocy w przerobieniu tego makra (załącznik). Chodzi mi o to że teraz marko sortuje według liczb przed znakiem / a później po nim. Chciałbym zrobić tak żeby makro sortowało mi tak, że przed znakiem / jest numer dokumentu a po rok np: 754/10 999/10 123/11 124/11 wtedy makro sortuje najpierw po prawej stronie / następnie po lewej
Nie, może być wpisana w makro lub np. mozna zrobic zapytanie aby podać ścieżkę gdzie znajdują sie foldery do sprawdzenia
Ten plik, który załączam na forum, jest przykładowy. Tamten właściwy jest bardziej rozbudowany. Tak, dane się dublują w kilku arkuszach, ponieważ formuła została rozbudowana o dodatkowe kolumny, a wyświetlane mają być różne w zależności od arkusza. Dlatego potrzebuję takiej samej listy z hiperłączami w kilku arkuszach. Próbuję zastosować funkcję pętli,...
Można zastosować sortowanie bąbelkowe, jeśli nikt nic lepszego nie wynajdzie. Makro uruchamia skrót Ctrl+e, należy ustawić odp. operator w kodzie (< lub >). Wykorzystałem Arkusz3 jako temp.
Przepraszam, że odświeżam tak stary temat ale mam podobny problem, a zasugerowane w wątku rozwiązanie nie jest skuteczne. Chodzi mi o to, że mam zakres danych, który chciałbym podawać do makra parametrem (makro umieszczone w komórce nad zakresem), a makro miałoby sortować zakres za każdym razem gdy ktoś wprowadzi do niego dane. Makro postaci: Function...
Witam, mam problem z sortowaniem liczb w wierszu, do których przypisana jest formuła LOS(). Próbowalem nagrać makro, ale nie rozwiazało to mojego problemu. Trochę jestem za "cienki w uszach" w te klocki. Szukam takiego rozwiązania (formuła/makro) , które umozliwi za każdym razem automatyczne sortowanie liczb w wierszu. Proszę o pomoc.
Witam, mam takie pytanie mam sporo arkuszy w jednym pliku, chciałbym je posegregować według następującej formuły: arkusze od największej różnicy między F10 i G10 do najmniejszej różnicy Przykład: a) F10 - 1250 G10 - 1500 b) F10 - 1250 G10 - 1600 1-b 2-a Myślę o zastosowaniu makro z komendą: For Each a In Worksheets
Kod w tym skoroszycie, uruchamiany skrótem kalwiszowym Może po kolei : - mam plik csv -wrzucam go do arkusza 1 przez dane\z pliku\tutaj zamienia mi pomaga już excel automatycznie rozdzielając " ; " średniki w tekscie. i tutaj dopiero uruchamiam makro które sortuje nazwisko a-z i daty a następnie wkleja posortowane dane do arkusza 2 i tam są dalsze czynności...
Z braku odpowiedzi można wnioskować, że Święta tuż, tuż :) Widzę 2 rozwiązania: 1) Arkusz pomocniczy z funkcjami wyszukiwania. 2) Makro. Kroki w obu przypadkach: - sortowanie wg kodów - lista bez powtórzeń - wyszukiwanie i składanie ciągów tekstowych (zamienniki) Nie rozumiem tylko do czego potrzebna druga i czwarta tabelka. Żeby znaleźć kod wg zamiennika...
podejrzewam że najlepszym wyborem było by próbować w vba Czytając Kolegi opis problemu prawie nic nie rozumiem. Moje podejście do VBA na podstawie domysłów z Kolegi opisu i rozwiązania Kolegi Prajz w załączniku. Makro osadzone jest w module w skoroszycie, będzie działać na wersji Excela 2003 i wyżej. Makro udostępnia w arkuszu funkcję Q (byłem leniwy...
Witaj. Musisz napisać proste makro, które wykona taką operację. Standardowe sortowanie raczej nie poradzi sobie z takim problemem.
Problem w tym, że nigdy nie uda Ci się wpisać innej liczby porządkowej przy tej postaci kodu (nawiasem pisząc, zdała by się pętla). Zanim makro "wyprostuje" numerację musiałbyś zrealizować kopiowanie... Czyli odpowiedź brzmi: Tak, jest do zrealizowania.
Nagraj makro sortowania i umieść je w kodzie arkusza przy zdarzeniu Worksheet_Change. Możesz ograniczyć aktywny zakres do jednej kolumny.
Czyli jednak sortowanie, lub makro szukające "od końca"... Czy VBA wchodzi w rachubę? Ewentualnie zapisuj datę z godziną (dla formuły z MAX). Szybka kombinacja: Ctrl+; spacja Ctrl+Shift+;
Wygląda to trochę inaczej niż założenia o jakich była mowa w pierwszym poście, tematy się powtarzają. Dla filtra potrzebna będzie lista unikatowych nazw tematów, realizowana w arkuszu przez wstaw>wklej specjalnie i dalej jak w moim przykładzie. Lub makro (uruchamiane np przy aktywacji arkusza "Menu") z wykorzystaniem tablicy, jeśli ma to działać automatycznie...
Nie mam za dużo czasu a akurat do tego przydało by sie makro. Wesz co a może zrób sumy częściowe. TZN Zaznacz całą tabelę i W menu dane wybierz sortuj , wciśnij ma wiersz nagłowka i w sortuj wg kolumny: nr ewidencyjny. daj Ok Następnie w menu dane wybierz sumy częściowe. Dla każdej zmiany w: zaznacz numer ewidencyjny Użyj funkcji wybierz suma Dodaj...
Wiadziałem w innych topikach że trochę kumasz VBA więc czego sam nie dołożysz sortowania? Przecież to nie jest trudne. Jak czegoś nie rozumiesz to nagraj makro i przeanalizuj jak jest zbudowane. Wprowadź swoje poprawki i ... tadam ... :) proste :) Poniżej dołożyłem sortowanie po A i po E Po E bo chyba o to głównie chodzi - gdyż funkcja w kolumnie B...
Kolega marek003 zapewne ma jakiegoś asa w rękawie ;) Ale po mojemu nie ma co zajmować się formułami, bo przeliczanie arkusza zrobi się nieznośnie uciążliwe przy tej ilości wierszy. Zrobiłbym tak: makro z filtrem zaawansowanym >'tylko unikatowe', 'kopiuj w nowe miejsce' dla obu list. Podstawiając odp. argumenty mamy wszystko w jednej kolumnie. Dalej...
Faktycznie problem jest jak znaleźć zdarzenia okna podczas sortowania. Można spróbować użyć Api HOOK, ale jest to powierzono nieprzewidywalne zachowanie programu Excel. Dlaczego dla sortowania Zaznacz całą kolumnę, ładna komórka i rozszerzenie zostanie automatycznie. Napisz marki myszy.
No to albo kolumna pomocnicza z filtrem (wtedy masz tylko jeden "klik"-wybierasz 0 ) albo makro. Ponizej z kolumną a makro za chwile podrzucę.
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ć...
Jest :D Użycie sortowania i zapisania jako makro. Kiedy będzie potrzeba znaleźć powtórzenia uruchamiasz makro... i gotowe :D
Bardzo proszę o pomoc w naprowadzeniu jak zrobić to makro W takim układzie (dwie tabele, które mogą być sortowane identycznie wg nr detalu :!: ) nie potrzeba żadnego makra :not: wystarczy prosta, przeciągana formuła jak na zrzucie :spoko:
Metoda dookola zrobilbym tak: 1. Licze srednia arytmetyczna 2. Sortuje - metoda zalezna od ciebie - standartowa instrukcja excel lub piszesz makro 3. Wybierasz ostatnich 90 studentow (30% z 300) 4. Teraz mozesz posortowac oceny od min. do max. 5. Kombinacja funkcji JEZELI sprawdzasz najwyzsza ocene 6. Referujesz wyniki
Sprawdz to makro Sub sortowanie() Range("b2").Select Range("a2:Z7000").Sort Key1:=Range("b2"), Order1:=xlAscending, Header:= _ xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End Sub
Formuły są dużo bardziej skomplikowane. Specjalnie dałem taki przykład aby było widać mój zamysł. Zakres zmian opiera się na ok 25 kolumn z czego 15 zawiera specjalne formuły co daje wynik końcowy. Ja chcę zmienić wynik końcowy tylko w takim zakresie jak podałem. Niestety tylko wchodzi w grę goal seek. Sortowanie odpada z uwagi na pobieranie danych...
Cześć. Mam nagrane makro na sortowanie tabeli ale chciałbym aby ono się automatycznie uruchamiało po wstawieniu daty (lub po prostu wypełnieniem komórki) w kolumnie C (obojętnie w którym wierszu). Czy ktoś byłby tak miły i napisałby mi taki kod? Przykładowy plik w załączniku. Makro które chcę aby się automatycznie uruchamiało ma nazwę sortTabeliDoZrobienia...
Jest jakiś trik by po nowym wpisie posortowała się z automatu? Można wykorzystać makro zdarzeniowe typu [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range)[/syntax] dla arkusza z danymi, które będzie sortowało po każdej zmianie w określonym zakresie :D . Poprzez trick z importem danych z jednego arkusza do drugiego można ustawić kwerendę...
Na podstawie działania. Kod o nazwie D04 mam np na końcu tabeli a po drodze są inne na litere T i działa wszytsko normalnie więc niema znaczenia. To że w konkretnym przypadku otrzymałeś wynik zgodny z oczekiwaniem o niczym nie świadczy. "Zepsuty zegar też 2x na dobę pokazuje właściwą godzinę" Zrób sobie więcej testów na różnych danych posortowanych...
Stworzyłem makro, które wstawia do komórki excela zdjecie produktu, którego nazwa znajduje się w komórce obok. Niestety po sortowaniu pliku zdjęcia nie zmieniają lokalizacji razem z resztą danych. Czy jest jakiś sposób aby "przywiązać" zdjęcie do komórki, tak aby możliwe było sortowanie?
Metoda uniwersalna: zarejestruj sobie makro, a potem wejdź w kod i go popraw jeżeli to będzie konieczne, a pewnie będzie. Dla pliku, na którym makro zarejestrujesz będzie działało prawidłowo, potem spróbuj na poprzednim miesiącu, mogą być błędy i już wiesz co poprawiać.
Hey, Zauważ, że w pliku 'stany magazynowe' masz 'symbol elementu' i 'numer seryjny' przenoszone z konkretnej komórki z pliku 'komponenty', a wartości 'na stanie' i 'potrzeba' masz wpisane z palca w pliku 'stany magazynowe' co oznacza, że jeżeli zaczniesz segregować materiały w arkuszu 'komponenty' to w arkuszu 'stany magazynowe' wszystko Ci się rozjedzie...
Jeżeli jest to normalne na tym forum to naturalnie za finalną pomoc chcę podarować punkty. To jest Twoja indywidualna sprawa. Darowanie punktów nie jest naturalne na tym forum :) Wskazane jest natomiast kliknięcie przycisku http://obrazki.elektroda.net/23_12596950... Sortowanie kodów: Żeby później nie zgubić grupowania, należałoby (makro) rozpocząć...
Makro tworzy listę produktów (jeśli trzeba dodaj sortowanie), następnie sprawdza arkusze od 7-go wiersza i 3-ciej kolumny. Jeśli zmieniasz układ, wyjdzie... bałagan. Przeanalizuj, dostosuj do własnych potrzeb. Makra w Excelu oczywiście włączone.
Jak zwykle kol adamas ma rację. W grę wchodzi tu stosunek obrazka do wielkości komórki. Z prawidłowym sortowaniem jest problem na obu arkuszach. Nie wiem czy próbowałeś posortować arkusz kilka razy? Obrazki są dopasowywane przez Twoje makro do rozmiarów komórki, do której są wstawiane. Natomiast wysokość wierszy w arkuszu jest różna. Ustaw sobie jednakową...
Dziekuje ale dopiero sie ucze Warto w takim razie poszperać w narzędziach Excela. Zwykle w takich przypadkach wystarczą: sortowanie, filtr zaawansowany z zaznaczonymi opcjami "kopiuj w nowe miejsce" oraz "tylko unikaty". Jeśli już musi być w VBA, to nagraj w/w rejestratorem...
Witam, Czy byłby ktoś tak miły i postarał się o napisanie małego makro pozwalającego posortować dane według kolumny "a" w załączonym pliku excel? Problemem dla mnie są scalone komórki, próbowałem sam coś sklecić, ale bez efektu, za słaby jestem w te klocki. Z góry dzięki za pomoc.
Makro ma działać w jednym arkuszu po naciśnięciu przycisku. Już kiedyś miałem takie makro ale przez przypadek usunąłem arkusz działało on w następujący sposób: w kolumnie A miałem dane: A1:0,2 A2:0,6 A3:0,5 A4:01 itd do A150: 0,7 po zaznaczeniu kolumny np od A3 do A50 i naciśnięciu przycisku z makrem dane w zaznaczonych komórkach posortowały się losowo....
Mam nadzieję że trochę rozjaśniłem Nic nie rozjaśniłeś. W arkuszu 1 są dwie kolumny Składowe i Kwota łączna, W Arkuszu 2 są kolumny Składowa 1 do 18 i Kwota łączna. Rozumiem, że chcesz z danych Arkusza 1 uzyskać dane w Arkuszu 2. Jest tylko jeden mały problem, brak jest jakichkolwiek reguł jak są tworzone składowe. Bez tego nikt Ci nie pomoże bo nie...
Jak można zrobić, żeby przed uruchomieniem tej procedury makro sprawdziło czy w tabeli ("A3:D&) nie ma już danych osoby wstawionej do komórek Przykładowo - sprawdzanie nazwiska (w praktyce trzeba by zastosować rozbudowany słownik bo mogą występować pracownicy o tym samym nazwisku :D ) można zrobić poprzez małą modyfikację Twojego kodu :spoko: [syntax=vbscript]...
Bardziej chodziło mi, że makro jest przygotowane na sortowanie nawet stu wartości w wierszu, Ty masz to do lotto, specyficznie do 6 liczb, więc Const MaxX możesz zmienić na 6 spokojnie, wtedy będzie brało pod uwagę tylko kolumny od A do F. Jeśli będziesz chciał sortować losowania z innych gier, gdzie załóżmy jest losowane 20 liczb, to wtedy można to...
Najlepiej nagrać sobie makro i podejrzeć kod. Sortowanie kolumn A i B po kolumnie B rosnąco można zapisać tak: ActiveSheet.Columns("A:B&qu... Key1:=ActiveSheet.Range("B1... Order1:=xlAscending Oznaczenia chyba są zrozumiałe (to główna zaleta VBA ;)) - najpierw podajesz zakres który chcesz sortować (zamiast...
Makro to strzelanie z armaty do komara, do jednorazowej operacji wystarczy użyć sposobu. Ja użyłbym funkcji wyszukaj.pionowo. Sprawdzałbym kolumny osobno wyszukując wartości w tej drugiej tabeli. Funkcja ta daje wartość n/d# jeśli nie znajdzie. Potem sprawdziłbym które wiersze nie mają w którejś z kolumn tej wartości. Ułożyłbym formułe =jeżeli(oraz(czy.brak(kkol1);czy.brak(ko...
Czyli (jak myślałem) operujesz na liście wartości w komórkach. Nie nazywajmy tutaj tego typami, bo to jest mylące, choć biznesowo pewnie poprawne. Zastanów się jeszcze co ci właściwie jest potrzebne. Robiąc to w aplikacji z użyciem formuł robisz to jak napisałeś (filtrujesz i co dalej? kopiujesz gdzieś, wysyłasz mailem?), jednak makro mogłoby to zrobić...
3/4 zrobiłem. Działa prawie, jak chciałeś. Jedynie nie sortuje wyniku alfabetycznie, a kodów do sortowania w sieci multum, to sobie możesz dodać. Obecnie kod działa dla wpisów w kolumnie 'K'. dzieki wielkie, tylko jeszcze jeden maly problem, jesli chce zmienic rodzaj egzaminu z cyfr na litery to makro przestaje działac, co powineinem zmienic w makro...
Witam ponownie. Dotychczasowa Wasza pomoc okazala sie bezcenna. Juz mam gotowe i dzialajace zestawienie, ktore dolaczam w zalaczniku. Mam do Was kolejne zapytanie. Jak uruchomicie to zestawienie to widac, ze jest juz ono uzupelnione. Jest dzialajace makro do wczytywania wartosci z plikow (dzieki Wam), dodalem makro ukrywajace wiersze gdzie pojawiaja...
Kolejne pytanie: chciałbym stworzyć makro, które przy dzieleniu pliku na mniejsze (sortowanie po jednej z kolumn, to już mam) w trakcie dzielenia w drugim arkuszu np. w komórce B2 (arkusz2) sumowało po wybranej kolumnie (G - arkusz1) przy warunkach wartości w kolumnie C(arkusz1)>0 i E(arkusz1)='szkoła'. Mam problem z zapisaniem tego, bardzo proszę o...
Nie analizowałem całości makra, ale nawiązując do tematu związanego z sortowaniem przy FileDialog.AllowMultiSelect=True, wyglądałoby to tak:[syntax=vbscript]With fd .InitialFileName = Environ("HOMEPATH") & "\Desktop\" .Filters.Clear .Filters.Add "Pliki Excel", "*.xl*; *.xls*" .AllowMultiSelect = True .Show For i = 1 To .SelectedItems.Count Set wkb2...
mam makro, które działa w starszych wersjach exela, ale w wersji 2003 już nie. Czy ktoś mógłby powiedzieć jak je przystosować do exela 2003?? pokreśla mi na żółto:Wokrsheets("Arkusz1").Range("AI1", "AI9").Value = Worksheets("Arkusz1").Range("B33", "B42").Value Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'tu masz kopiowanie Wokrsheets("Arkusz1").Range("AI1",...
Błąd wyskakuje jeżeli skasuje arkusze które zostały utworzone przez makro i pozostawię tylko główny. Odpalam drugi raz makro i wtedy już nie sortuje poprawnie i źle wkleja do obydwu skoroszytów. Nie wiem czy to to, ale wydaje mi się że jak skasuje utworzone arkusze, to kolejne które tworzy są inne tzn. Na początku tworzy Arkusz2="inne"; Arkusz3="ksiegowosc"...
Chodzi mi o etykiety serii danych Jeśli chodzi Tobie o efekt taki jak na zrzucie :?: 1017376 To można zrealizować poprzez zmianę formatowania (np kolor czcionki) etykiety serii danych dla każdej kategorii. Przy takim rozwiązaniu jak na zrzucie każda wartość dla 4 i 5 kategorii będzie miała etykietę czerwoną :idea: Można zatem poprzez odpowiednie "rozmieszczenie"...
Dalej nie do końca rozumiem o co ci docelowo chodzi. Po twojej ostatniej wypowiedzi wnioskuje że chcesz mieć jedynie jakieś zabezpieczenie przed dublem gdy będziesz nadawał numery wewnętrzne dla danej "grupy" KOD EAN/INDEX/ NAZWA. Więc sortowanie nie będzie konieczne, tym bardziej jak kody będą wprowadzane "czysto" ręcznie. Poniżej (na razie bez makr)...
Poniżej masz właściwie gotowca, wstaw do kodu Twój warunek sortowania http://www.kursexcel.net/2009/07/sortowa...
Myślę, że kod z załącznika robi to co trzeba. Przypatrz się jedynie na miejsca, gdzie definiuje się zakresy: początkowe komórki czy zakres tabeli. W razie rozbudowy - musisz je odpowiednio w kodzie zmodyfikować... Nie wiem dlaczego, ale ciągle mi się wydaje, że makro, a sortowanie to już zupełnie, nie jest potrzebne. Tak jak ja zrozumiałem autora, to...
Swój problem rozwiązałem rejestratorem makr. Uruchamiamy Filtruj z zakładki Dane, i usuwamy zaznaczenie "Puste" Przechodzimy do drukowania, w którym zaznaczamy ilość kopii i czy mają być sortowane czy nie . I drukujemy. Usuwamy filtrowanie. Zatrzymujemy rejestrator makr. I mamy makro filtrowania i drukowania. Powodzenie tym, którzy rozwiązują ten problem....
To chyba nie będzie takie proste. Niestety Excel jest bardzo ubogi jeśli chodzi o "kolorowe funkcje". Wg mnie musiałbyś zrobić wzorcową tabelkę z indeksami kolorów i przepisać ją do tablicy. Następnie do drugiej tablicy przepisać indeksy z "kolorowego" zakresu do sortowania i dodatkowo umieścić je w kolumnie pomocniczej Wreszcie czymś na wzór sortowania...
Nie chcę za bardzo wchodzić w pomysł kolegi adamasa bo nie wiem co było głównym celem i dlaczego to zrobił tak a nie inaczej. Zaproponuje trochę inne rozwiązanie, ale ponieważ nie znam całego kodu i intencji arkusza może być kłopot z działaniem (np wcześniejsza ochrona arkusza) Zakładam jak piszesz, że nazwiska w danych kolumnach są posortowane a właściwie...
Ten temat dotyczy pewnej funkcji, a dokładnie w moim plik bazowym generuję pewną listę, w tym przypadku jest to lista szkoleń. Po wygenerowaniu tej listy albo ją bezpośrednio drukuję albo generuję plik .pdf i ten plik wysyłam dalej do innych osób. Jednak niektóre z tych osób prosiły mnie o wysłanie pliku nie w .pdf tylko .xls(m) aby mogli sobie ją przetwarzać....
Twój przykładowy plik potwierdza moje wstępne wrażenia :cry: Masz tylko enigmatyczny (nie przemyślany) projekt utworzenia jakiejś bazy danych i masz bezpodstawną nadzieję, że cudowne makro praktycznie ją utworzy (update records) i będzie ją obsługiwało zgodnie z Twoimi intencjami :D Na początek, moim zdaniem winieneś "zbudować" tą bazę ręcznie np. dwie...
Witam, Uprzejma prośba o pomoc w napisaniu formuły / funkcji. Arkusz (przykład w załączeniu) ma służyć do liczenia stopnia koncentracji wobec klientów. Generalnie jest +/- taki jak w przykładzie. Potrzebuję „tylko” przenieść wartości z kolumny H (Wartosc_dla_klienta) do kolumny K (Posortowane) sortując je jednocześnie od największej do najmniejszej....
Nie wiem jak Ci dziękować! Działa:) Poprzednią wersję pliku (przy ok. 460 pozycjach) formułką i filtrami excel'a sortowałem ok. 3h :) Jeszcze raz wielkie dzięki! Rozumiem, że przy innej tabeli to już nie zadziała? Musiałbym np. zmienić DaneX = 2 DaneY = 2 na DaneX = 3 DaneY = 3 żeby startował od A3 i C1 tak? Czy coś jeszcze? Sory za głupie pytanie,...
dzięki za pomoc, przez 6 h zrobiłam 2,5 zadania. nie mam notatek, ponieważ nikt ich nie ma, na tych zajęciach jeśli nie urodziłeś się z tą wiedzą, to masz problem... Dodano po 2 mam losowo wybrane punkty, zrobiłam do nich wykres, wyznaczyłam punkt średni płaszczyzny, przesunęłam każdy punkt z wcześniej losowo wybranych punktów o wektor o dł. x z punktu...
Sortowanie zrealizujesz pisząc ogólną procedurkę: Sub Sortowanie(Klucz As String) Selection.Sort Key1:=Range(Klucz), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom End Sub i wywołując ją w obsłudze przycisku z odpowiednim adresem. Dla Nazwisko będzie: Sub Makro3()...
Usuń duplikaty ani tabela przestawna tu się nie przyda bo dochodzi warunek że usuń gdy puste ale nie gdy puste w Re_3 Stworzyłem w sumie proste makro (ono tylko tak wygląda) Pierwsza część kodu przepisuje wszystkie linie mające to samo zlecenie. Później następuje sortowanie. Następnie warunek sprawdza czy (w moim przypadku coś1) się powtarza jeżeli...
Nie jest oczywiste, że pliki będą otwierane kolejno wg nazwy. Sortowanie w Windowsie nie jest liczbowe, a tekstowe (1, 10, 2, 20, etc) Jeśli z nazwy pliku można wyciągnąć adres docelowy (z offsetem), wtedy[syntax=vb]Sub Importuj2() Dim wbDst As Workbook, wbSrc As Workbook Dim strPath As String, plik As String, rng1 As String, rng As String strPath =...
Zamień linię kodu (początek - tam gdzie jest napisane "czyszczenie tabeli C") .Range("Q3:U10000").Clear na .Range("Q3:U10000") = "" I sformatuj w tabeli C, a najlepiej we wszystkich tabelach (A,B,C) kolumny z wartościami jako walutowe. Poradzisz sobie czy dać przykład? edit -------------------------- Jeżeli wszystkie dane w tabeli C maja mieć inna czcionkę...
Witam, Mam bazę danych, w osobnym arkuszu utworzyłam sobie listę w której mogę wybrać nr klienta (nr klienta jest czasami z jakimś tekstem lub z jakimiś dodatkowymi liczbami ale mam go traktować jako jeden klient). Udalo mi się napisać proste makro (jestem poczatkujaca) które z wyfiltrowanej listy kopiuje te nr do osobnego arkusza, sortuje tam te dane,...
Pustość w określonym wierszu da się wykazać np. sortując wiersze, ale widzę, że sortowanie u ciebie odpada. Można wykryć pusty wiersz w danej kolumnie "stojąc" w niej wcisnąć najpierw END, a potem strzałkę w dół (lub w gorę dla wstecznego wyszukiwania). Można to zastosować w kodzie VBA + zrobić makro w stylu "skocz do następnego pustego rekordu". Ostatni...
Tu masz konwerter (Jak będzie po angielsku to przełącz na polski): [url=https://www.microsoft.com/pl-PL/dow... do konwertera Co do załączonego pliku i makra. Makro w tym pliku "tworzy" a raczej włącza zwykły filtr - nic więcej > nie jest konieczne byś włączył filtr makrem. Możesz to zrobić ręcznie (Patrz arkusz2 ). Zaznacz u...
Dobry wieczór, Czy koniecznie musi być makro? Nie wystarczy filtr zaawansowany Excela? Moim zdaniem dobrze się do tego nadaje, chyba że fraz do wyszukania jest bardzo dużo. Procedura postępowania: 1. Nad kolumną z danymi umieścić nagłówek np. Lista. 2. Określić szukaną frazę i umieścić ją w wybranej komórce. 3. Utworzyć kryterium, które w przypadku...
Witam koleżeństwo. Proszę o pomoc w rozwiązaniu problemu. Mam dwa arkusze kalkulacyjne. W nich różne dane. Chcę część danych które są w nich ułożone wierszami ale nie są posortowane i nie ma możliwości ich sortowania (scalone komórki). Miałoby wyglądać to tak iż w pierwszym arkuszu szukam dane w jakiejś komórce i wierszu np oznaczenie (tekst) następnie...
żeby wyszukał osoby z lewej ... w prawej A co ma zrobić makro lub formuła jeśli w kolumnach C i M są "nieunikatowe" nazwy :?: W Twoim przykładzie występuje wprawdzie tylko jeden dubel - w części "I zmiany" :D , ale teoretycznie te dubelki mogą występować w każdej części lub crossowo pomiędzy obiema częściami :?: VBA bez jednoznacznych instrukcji w...
Witam. Ponieważ na innym forum nie uzyskałem jak dotąd pomocy to może tutaj znajdzie się pomocna ręka. Mam problem , którego ja sam nie mogę rozwiązać od jakiegoś czasu , a który nie pozwala mi spać (autentycznie - to nie przenośnia). W załączniku mam tabelkę. Arkusze "target" oraz "wykonanie" to łącza do skoroszytów , które będą ulegały zmianie. Zmiana...
Witam Mam do rozwiązania zadanie z którym nie daję rady. Trzeba stworzyć w excelu raport sprzedaży dla sieci handlowej. Mam kilka sklepów w których sprzedaje sprzęt rtv/agd. W 1 arkuszu tworzę bazę danych . Model, Producent, moc,cena zakupu, cena sprzedaży, sprzedaż w poszczególnych tygodniach. Produktów jest sporo około 1000 pozycji. W osobnym arkuszu...
Ostatecznie po dodaniu do kodu sortowania po usunięciu niepotrzebnych dat, nadania nowej nazwy zakresu, kod wygląda jak poniżej. Dzięki za pomoc [syntax=vb]Sub KasujTerminy() Dim ostWrs As Long, i As Long Dim ark As Worksheet Set ark = Sheets("DataBaza1") With ark For Each k In .Range("TerminyPRZODOWY") If k <= Date Then Cells(k.Row, k.Column) =...
Wielkie dzięki za odpowiedź, ale niestety w dalszym ciągu nie działa... Pewnie robię coś źle, ale makro nie otwiera mi plików txt z wywołanej funkcją ścieżki. Całość wygląda tak: [syntax=vb]Function pobranie() As String Dim sciezka As String Dim Wybor As FileDialog Set Wybor = Application.FileDialog(msoFileDialogFold... With Wybor .Title = "Wybierz...
makro sortowanie sortowanie makro sortowanie excel
comarch optima kogut lampa at90s2313 zamiennik
teltonika konfiguracja sprzedam tp118
Epson SX130 nie wykrywa czarnego tuszu po drukowaniu OSCam a karty TNK Conax – czytniki, parowanie, Enigma2, CAID 0B00/0B01, konfiguracja