Podałeś zdecydowanie za mało informacji. Jeśli Twoje dane robocze liczą ok. 10 tys. wierszy, to przykład powinien obejmować ok. 50 wierszy w reprezentatywnym układzie. Należy to pokazać w załączonym pliku wraz z oczekiwanym wynikiem. Z przykładu, który pokazałeś nie wynika m.in. 1) czy wszystkie wartości w kolumnie A występują parami, czy mogą też być...
Makro w Twoim pliku jest b.dobrze zaszyfrowane. No, może tylko mi nie udało się odszyfrować ;) Żeby nie tracić czasu napisałem od nowa (module2). Wszystko oparłem o w/w funkcję 'Find' Zrozumiałem, że pkt2. w kolejnych miesiącach dotyczy sprawdzania poprzedniego i tak zrobiłem. Sprawdź (nie testowałem wiele), w razie czego dostosuj do własnych potrzeb....
przydział w grupie A jest zawsze tekst, natomiast w grupie B są zawsze liczbowe? Porównaj D3 - G3, D6 - G6, etc. Bardzo pożądane jednego typu(tekst 109a)
Ciężko zrozumieć o co chodzi. Najprościej możesz kopiować formatowanie warunkowe poprzez kopiuj i wklej formatowanie. Działa bezproblemowo jeśli formatowanie warunkowe nie używa adresów komórek np. większe od to zrób czerwone. Jeśli korzystasz z adresów komórek to musisz pamiętać, aby tam gdzie wklejasz dane docelowe znajdowały się w tych samych kolumnach...
chciałabym przekopiować te wartości z 2 arkusza do 1 w miejsca w których powinny być Proponuję wypróbować taki kod :spoko: : [syntax=vbscript]Sub Uzup() For i = 1 To 10 If Sheets(1).Cells(i, 1) <> Sheets(2).Cells(i, 1) And Sheets(1).Cells(i, 2) <> Sheets(2).Cells(i, 2) Then Sheets(2).Activate Sheets(2).Range("A" & i, "B" & i).Select...
Bez VBA się raczej nie obędzie. Są co najmniej dwa wyjścia (w pętli): 1. Filtrowanie i wydruk po każdej zmianie parametrów 2. Arkusz tymczasowy (czyszczenie, kopiowanie warunkowe, wydruk) Które wydajniejsze? Stawiam na Nr.1
Naprzemienne kolory zrealizujesz formatowaniem warunkowym. Formuła: =MOD(WIERSZ();2)=1 Co rozumiesz pod pojęciem A po kolejnym użyciu nie kopiowało nagłówka tabeli tylko wstawiało wyszukane rekordy Z nagłówkiem nie ma problemu, wystarczy sprawdzić czy jest i kopiować warunkowo (gdy nie ma). Natomiast nic nie wiadomo co to za "wyszukane rekordy".
Dane będą brane z innego arkusza, natomiast dane z tego arkusza mają być kopiowane do arkusza w wordzie, i to ma być kopiowane w ten sposób że to co zostało oznaczone jako ☑ i było np. w kolumnie b w excelu oznaczone jako uprawnienia będzie kopiowane do worda w w miejscu gdzie na górze będzie pisać uprawnienia
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...
kopiowanie warunkowe wierszy Excel
Dużo do wyjaśniania, więc przeanalizuj sobie taki przykład makra z pętlą[syntax=vb]Sub Ukash() Dim myPath As String, fName As String, newWkb As Workbook Dim wrs As Long, wrsDst As Long myPath = "U:\Lukasz\Raporty\" 'składasz string z zamianą daty na tekst fName = "Raport " & Str(Date) & " adamas" 'lub dowolna data pobrana z komórki Set newWkb...
W załączeniu przykład z funkcjami Wprowadziłem dodatkowe "zabezpieczenie" w postaci tego że każda lista musi się kończyć słowem KONIEC. Jeżeli tak nie jest to znaczy że jest więcej "poleconych" niż skopiowanych w dół wierszy z formułą wyszukującą. Wtedy trzeba "złapać" trzy ostatnie komórki i skopiować w dół. -------------- No tak, kolega adamas mnie...
Nie o takie kopiowanie mi chodziło. Miałem na myśli jakieś makro które by pobierało z skoroszytu który załączyłem na górze dane np z kolumny opisanej podzespół 1. Kolejne numery w tej kolumnie to numery seryjne podzespołów i one są testowane, chciałbym aby makro tworzyło katalog o nazwie jak podzespół i kopiowało pliki z testów znajdujące się w innym...
Reguła formatowania warunkowego jest taka I to jest przyczyna Twojego nieszczęścia :cry: Stosujesz mechanizm tworzenia załącznika html poprzez kopiowanie obszaru rng do pliku tymczasowego :!: Jeśli zatem kryteria formatowania warunkowego umieszczone są poza tym obszarem - to w pliku tymczasowym warunki dotyczące tego obszaru są puste :idea: :D Jeśli...
Po krótkich próbach potwierdzam że rzeczywiście trzeba to zrozumieć. Względność jest zachowana kiedy "kopiujesz" format za pomocą malarza formatów (pędzel) natomiast przy zwykłym kopiowaniu "wstawia" znaki bezwzględne (choć tego nie widać). Jednak jest jeszcze jeden "mankament" jest pamiętany pierwszy warunek jaki został przyporządkowany danej komórce....
Interesuje Cię rozwiązanie formułami (tu z kolumną pomocniczą) http://obrazki.elektroda.pl/3664512400_1... czy makro (kopiowanie warunkowe w pętli)?
Cześć, Potrzebuję waszej pomocy :( Przeszperałem już forum i widziałem, że pojawiło się już kilka pytań o kopiowanie warunkowe, niestety to dopiero początek mojej przygody z VBA i nie potrafię dostosować kodu do swoich potrzeb. Chciałbym, żeby po przyciśnięciu przycisku "Archive" makro przeszukało arkusz i wycięło te wiersze, które w kolumnie W mają...
No, ale tak zaprogramowałeś (polecenie GoTo) ;) Powinno być (schemat) wewnątrz pętli -wyłączenie obsługi błędów (on error resume next) - przy każdym kroku -wyszukiwanie -sprawdzenie stanu i warunkowe kopiowanie (If err=0 then ... ) Włączenie za pętlą (On error goto 0) lub (książkowo) [syntax=vb]Sub Porownaj() Sheets("Arkusz2").Select ow = Cells(Rows.Count,...
Chodzi o to, że Marshal robił i nadal robi cenione wśród gitarzystów wzmacniacze, no i użytkownik "warunkowo odblokowany" sugeruje, by kopiować najlepszych, a nie tych drugich.
Zrobiłem bez makr. Może ktoś Ci przerobi na makro. Łącze do formantu w komórce bieżącej, formatowanie niestandardowe ukrywające wpis ;;; formatowanie warunkowe określające kolor. Niestety łącza nie dają się kopiować, bo są zawsze adresami absolutnymi, nawet jeśli się je zapisze bez dolarów.
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...
Miałeś w regule formatowania adres z $, czyli bezwzględny. Powinien być względny D2, ewentualnie $D2, ale przed 2 nie może być $. Można kopiować formatowanie, można od razu ustawić cały zakres, ale regułę piszemy dla pierwszej komórki.
A może jest jakiś sposób na automatyczne kpiowanie komórki A2 do D2 pod warunkiem że B2 jest puste. Jeżeli w B3 jest coś wstawione to komórka A3 nie powinna byc kopiowana
A gdybyś zamknął wszystko w instrukcji warunkowej? Np [syntax=vbscript]If WorksheetFunction.CountIf(wb.Sheets(1).R... "#N/A") > 0 Then tutaj filtrowanie i kopiowanie End If[/syntax]
Makro można modyfikować na tysiąc sposobów. Póki nie rozwiążesz "zagwozdek"... kicha ;) Ale jak już pisałem: od czegoś trzeba zacząć. W załączniku makro (na prostych pętlach, bez regExponent i innych dopalaczy). Celowo starałem się uprościć kosztem wydajności, abyś mógł samodzielnie modyfikować. Na razie sprawdza po imię & nazwisko oraz warunkowo kopiuje...
Coś musisz wyjaśnić: Cały czas wydawało mi się, że kolory i wartości uzupełniasz we wzorcach (w tabeli u dołu arkusza) i gotowe kopiujesz do górnej tabeli. Czy jest inaczej? Ten błąd to wynik kopiowania formatowania warunkowego. Przy zastosowaniu makr (rezygnacji z cf) zniknie.
komórki podświetlają się na czerwono nie tylko te po zmianach :cunning: Przecież wyraźnie pisałem: Jeśli interesuje Cię sporządzanie tylko ukrytej kopii wszystkich edycji w arkuszu Rob - to usuń formatowanie warunkowe , usuń kod Workbook_BeforeClose i wymień kod w arkuszu Rob Przy ukrytej archiwizacji wszystkich edycji - traci sens porównywanie tabeli...
Rzuciłem okiem i dalej pozostaję w domysłach. Czy dane w kolumnie A od wiersza 1 do wiersza FinalRow są ciągłe (nie zawierają pustych komórek)? Jeśli tak, to skopiuj cały zdefiniowany zakres do arkusza docelowego. Jak znaleźć pierwszą wolną, opisywane było setki razy na forum w kilku(nastu) wariantach. Jeśli nie, to sprawdzaj i kopiuj wiersz po wierszu....
On Error Resume Next w = Target.Row k = Target.Column If k = 10 Then If Target.Value > 1 Then a = w + 1 b = a + Target.Value - 2 Rows(a & ":" & b).Select Selection.Insert Shift:=xlUp, CopyOrigin:=xlFormatFromLeftOrAbove Rows(w & ":" & w).Select Selection.Copy Rows(a & ":" & b).Select ActiveSheet.Paste Application.CutCopyMode = False MsgBox "Uzupełnij...
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...
Witam Chciałbym aby wyświetlało się tło w komórce w zależności od podanej ilości oraz czasu produkcji. Wartość poniżej podanych danych , pomiędzy oraz powyżej żeby miały inny kolor. Wartość skopiowanych danych w formatowaniu warunkowym kopiuje mi się z wiersza 1 do wszystkich, a ja chcę skopiować tak formułę żeby nie przepisywać wszystkiego do innych...
Że się wtrącę ;) Jedynie co może być cięższe to masowa implementacja tego rozwiązania. Klikanie każdej komórki osobno i ustawianie trzech warunków dla każdej trochę czasu Ci zajmie. A to dlaczego? 1. Można ustawić formatowanie warunkowe dla kolumny, wiersza, zakresu. Kluczowy jest znak/i "$" w odpowiednim miejscu w formule. Przykłady można znaleźć na...
Argument "tblList" to nazwa zakresu w tej "drugiej" tabeli? Po drugie: dlaczego tak komplikujesz? Jeśli funkcja arkuszowa to (pojedyncze) CountIf . Ale prościej byłoby wykorzystać Range.Find i jeśli błąd, to znaczy że nie ma... Hmm, patrząc na na to SUMA(SUMA.JEŻELI * Coś_Tam)), nie jestem pewien czy dobrze rozumiem. Na pewno chodzi o warunkowe przenoszenie/kopiowanie?
Formatowanie warunkowe: Pierwszy warunek: D2 czerwone, jeśli data mniejsza od dzisiejszej. Podał Ci to już marek003 . Wpisujesz warunek:=JEŻELI(D2<=DZIŚ();PRAWDA;FAŁ... Drugi warunek: D2 zielone, jeśli data większa od dziś i mniejsza od dziś+60. Wpisujesz warunek:=JEŻELI(ORAZ(D2>=DZIŚ();D2<... Obie formuły wpisujesz dla...
Zamiast tej linijki[syntax=vb]Wb.Sheets.Copy before:=ThisWorkbook.Sheets("makro")[/sy... pętlę For, z warunkowym kopiowaniem arkuszy. Warunkiem może być cells.find(what:="*") z wyłączoną obsługą błędów i jeśli Err=0, kopiujesz.
Tak, jako formuły możesz użyć wartości z kolumny J Np: http://obrazki.elektroda.net/8_124780652... Formatowanie (wszystkie 3 warunki) ustawiasz na pierwszej komórce (K5) i przeciągasz/kopiujesz w dół. Natomiast obliczenie ilości dni (J5) lepiej wykonać formułą: =L5-DZIŚ() skopiowaną w dół. Komórkę B3 może ktoś wyczyścić...
1. Jeśli nie kopiujesz formatów komórek, to metodę copy-paste zastąp prostym przypisaniem. 2. Można wszystko zmieścić w jednej pętli. Gdyby jeszcze wystarczyła jedna instrukcja warunkowa... było by dwa razy szybciej.
Od tego trzeba było zacząć. Nie obrażaj się, nic tym nie wskórasz ;) Uczulonych na myślenie przybywa ostatnio lawinowo, więc proszę nie dziwić się mojej reakcji. Teraz należy określić właściwe podejście. Ja to widzę tak (najprościej chyba): -bierzemy pierwszy nagłówek arkusza wynikowego (pętla) -odszukujemy takie same w arkuszach źródłowych (Find lub...
Przeszukiwanie komórek w kolumnie B? Po mojemu: prosta pętla z warunkowym kopiowaniem, opartym na InStr . Żeby nie komplikować, można dane wrzucić do arkusza wynikowego i potem skopiować cały arkusz do nowego pliku.
Pierwsza sprawa to na pewno wyrzuć funkcję Jeżeli() i pozostaw tylko warunki. Możesz zapisać go w jednej funkcji Oraz(). Druga sprawa to jak zostawisz wszędzie te $ to nie będziesz mógł łatwo kopiować formuły/warunku. Adres bezwzględny pozostaw tylko przy adresie S$4 =ORAZ(B3>5,0;B3<6,0;C3<S$4) Tak zapisany warunek wpisz do formatowania warunkowego...
Plik .s (asm) + nagłówek do niego. Są tam 4 funkcje, które są do siebie bardzo podobne (w kodzie): move (do przenoszenia bloku pamięci, uwzględniony jest przypadek nachodzenia na siebie obszarów), clear (do czyszczenia), pioread i piowrite (przenoszenie pomiędzy blokiem a rejestrem pio) - wszystkie działają na blokach po 8 bajtów (co nie oznacza, że...
Dobrze by było jak te formuły miały charakter stały, uwzględniając np. zmianę dnia w tygodniu (ponieważ inaczej rozlicza się godziny w dzień roboczy, a inaczej w święto). Zrób dodatkową kolumnę, którą będziesz wyróżniał dzień wolny/sobota-niedziela/święto od normalnego dnia pracy. Wtedy wartość z tej kolumny ta może posłużyć za warunek do zmiany sposobu...
Tak, wiem, ale chodzi mi o to aby dało się to robić opcją kopiuj, wklej. Bo przy opcji kiedy będę miał po 20 klientów dziennie to zmieniać każdą pozycję to będzie makabra... Prędzej ręcznie to zakoloruję... Da rade to tak zrobić, aby działało w opcji kopiuj wklej? Kiedy Próbowałem usunąć $ żeby zmieniał po kopiowaniu wartości sam to przestaje działać...
Wystarczą (prawie) makra nagrane rejestratorem. Wyłącz obsługę błędów (On Error Resume Next) Wstaw linię otwierania pliku xxx-xx (nazwę podstaw ze zmiennej lub z komórki) Dalej już warunkowo (If Err>0 Then) -otwórz plik WZÓR -zapisz jako xxx-xx we właściwym folderze. Ot i wszystko... Jeśli plik istnieje, zostanie otwarty. Jeśli nie, zadziała instrukcja...
Jeśli makro, to prosta pętla 'Do-Loop' z instrukcją warunkową. Ale, z kolumną pomocniczą, można i bez makra (załącznik)
Spróbuj z formatowaniem warunkowym.
Pierwsze pobranie powinno nastąpić w pętli Numerować powinieneś na podstawie licznika pętli w , jest to bardziej logiczne. Jeśli ustaliłeś w=3 (wiersz 3), to wartość komórki A w tym wierszu powinna być ustawiona z warunkowym wykonaniem jako [syntax=vb]If a<>0 Then Cells(w, 1).Value = w-2 [/syntax] w momencie pobrania zerowej wartości, nie nastąpi...
tak. Chodzi o to żeby do tego obszaru nie kopiował mi nikt niczego z np: przeglądarki internetowej wraz z formatami i psuł formatowanie warunkowe. Dlatego przewiduje dwie możliwość albo blokada na ten obszar albo wklejanie jako tekst. W innym obszarze posiadam komórki z formułami które kopiuje okresowo dlatego nie chciał bym blokady na cały arkusz.
Aby coś takiego zadziałało "samo" - potrzeba makra. Ale jest inne rozwiązanie (ja je zastosowałem u mnie w pracy). Nie wiem czy u ciebie da się zastosować. Taki arkusz - szablon (u mnie nazwany "czystym") ma jeszcze jeden arkusz z nazwą "kalendarz". Są w nim (oprócz sobót i niedziel) automatyczne wyliczenia świąt itd. i poprzez zaznaczenie danego miesiąca...
Chciałbym napisać makro No właśnie. Jeśli wiesz jak zajmie Ci to 5 minut. Chcesz się dowiedzieć, czy dostać gotowca (w takim przypadku wrzuć plik z przykładem)? Po mojemu trzeba zadziałać przy pomocy dwóch, zagnieżdżonych pętli, znając ilość kolumn (End(xltoright).column), Nr pierwszego wiersza z nazwiskiem i Nr pierwszego wiersza w arkuszu docelowym....
W prosty sposób można tylko w dodatkowej kolumnie D, w której byłby wyliczany postęp jako ułamek. W kolumnach B i C można to zrobić, ale trzeba dla każdej komórki podać osobną formułę, bo przy definiowaniu tego typu formatowania nie można używać adresów względnych, zatem nie można skutecznie kopiować komórek sformatowanych tak, aby każdy wiersz był...
Super! Dokładnie o to chodziło! Tabela przestawna rozwiązuje sytuację. Ale żeby ją utowrzyć, trzeba mieć zbiorczo podsumowane wszystkie faktury, bez pustych wierszy. Jak to zrobić automatycznie dla wszystkich arkuszy? Żeby było tak jak na screenie :) https://obrazki.elektroda.pl/1574377400_... EDIT: nie trzeba mieć pustych wierszy -...
A jakie to ma znaczenie? 1+1=2 a 1+0+0+1+0=2 Ale jak się uprzeć: SUMA.JEŻELI(zakres;">0";[zakres]) Jeśli chodzi o kolory, to z pewnością masz jakieś kryteria. Zastosuj formatowanie warunkowe i tej samej formuły użyj w SUMA.JEŻELI.
Bardzo skrótowo, rejestry (pamięć podręczna) najprostszych procesorów np Z80 lub jw. 8080 to różne rodzaje zwykłych przerzutników XOR, NOT, OR,AND,(bramki TTL) zapisywane są w nich obliczenia wewnętrznego kooprocesora artmetycznego. sterowane są rozkazami kopiuj pamięć-rejestr i odwrotnie i tzw skoki warunkowe i bezwarunkowe, wszystko sterowane wew....
Zainteresuj się funkcją FileDateTime [url=https://www.elektroda.pl/rtvforum/t... W pętli, w dodatkowej instrukcji warunkowej, sprawdzasz, czy datapliku > Date - ileDni gdzie liczba 'ileDni' decyduje o tym, czy plik są jeszcze "nowe".
Najprościej "przekręć" tabelkę (daty w pionie), tzn zamień 1-szy wiersz z 1-szą kolumną (transponuj) i zastosuj filtr. Zmodyfikuj formuły formatowania warunkowego. Dalej standardowo: kopiuj-wklej specjalnie>wartości w z góry upatrzone miejsce.
A520 - nie, nie do Ciebie ;) jankmich - tekst w Delphi możesz traktować jak tablicę znaków (czyli teskt da znak i-ty w tym tekście). Pętla ma zaś przeskanować całą długość tekstu czyli od znaku 1 do znaku ostatniego, a więc równego długości tekstu, a więc Length(tekst) . BTW - poza pętlami to radzę też pomysleć i zastosować wiedzę o funkcjach warunkowych....
Przy ostatniej instrukcji warunkowej (If Sheets(1).Cells(A, 7) = "Versand" Then) masz Exit Sub po Else. Może trzeba to usunąć. Nie ma danych w "Buchen", nie ma więc na czym przetestować...
W art 76 prawa autorskiego nie ma jednoznacznej zgody na kopiowanie softu (jeśli, to warunkowa). Poza tym artykuły KK są wprowadzane też ustawami, więc są to akty równego rzędu. Jeśli chodzi o artykuł 267 KK, to ogólny duch jest taki, że nieuprawniony dostęp do zabezpieczonej informacji jest przestępstwem. Oczywiście możesz to interpretować po swojemu,...
Interesują mnie wartości z dwóch wierszy- drugiego i czwartego. (...) Chciałbym użyć makra do wyszukania tych wierszy z pierwszego arkusza, gdzie występują wartości szukane w drugim arkuszu i przekopiowanie wszystkich tych wierszy do np. 3 arkusza. Z tego wynika, że szukasz duplikatów wierszy 1 i 4 z arkusza Nr1 w arkuszu Nr2. Zdaje się, że coś pominąłeś/pomyliłeś,...
Hmm, najprościej wstawić dodatkowy licznik i warunkowe dodawanie: https://obrazki.elektroda.pl/9899514800_...
Pliki źródłowe i wynikowy ważą tyle co zwykle? tak Na innym koncie, np. Admina ukrytego i przez CMD odpalone jako admin? konto z grupy admin, nie rzutuje, odpalone jako Administrator również... Ciekawe ile %cpu zwykle potrzebował skrypt i jak obciążał dysk. Można sprawdzić ile obciąża teraz. Teraz jak uruchamiam jedną pętelkę w cmd.exe, to cmd.exe...
Jeśli znacie inny sposób to podajcie ja nie znam a chętnie poznam. Gdzie jest napisane że na egzaminie trzeba wszystko wyklinać? do zapamiętania macie 1 ścieżkę z plikiem Registry.pol wyrażenie warunkowe if else (jeżli) polecenie xcopy do kopiowania pliku polecenie del do kasowania pliku przez ten czas juz na pamięć można by to zakuć lub ściągę zrobić...
Właśnie to pozwoliłem sobie zmienić w przesłanym przykładzie w makrze kolegi adamas_nt Wpisz zamiast ostatniWiersz = 100 to ostatniWiersz = Sheets("Arkusz1").Cell... 1).End(xlDown).Row Wtedy makro samo policzy ile jest wierszy i będzie się wykonywało tylko do ostatniego wiersza. Warunek dane w kolumnie...
Przeszkodą jest to, że nie potrafie tego zrobić To forum jest dla tych, którzy co najmniej chcą potrafić. Poczytaj sobie o instrukcjach warunkowych, pętlach, przypisywaniu, kopiowaniu, itp. Nagraj kilka makr i przeanalizuj. Po dwugodzinnej lekturze będziesz w stanie samodzielnie przynajmniej połapać się jak zacząć. Na razie wygląda na to, że szukasz...
1. Porównywać daty w instrukcji warunkowej. 2. Wyszukać ostatni niepusty wiersz i podstawić: Range("A" & ostNiepusty).Select
Cześć! Stworzyłem makro, które z arkuszy odpowiadających kolejnym dniom kopiuje z zadanych zakresów wartości i formaty komórek (kolory, formatowania warunkowe itd.) do arkusza głównego. Niestety formatowania warunkowe nie nadpisują się w głównym arkuszu i po kilkukrotnym wykonaniu tej operacji plik nie nadaje się do użytku - szybkość jego działania...
Tak i to na kilka sposobów. Najprostsze, byłoby zadeklarowanie zmiennej globalnej typu Boolean, warunkowe uruchomianie procedury i makro z inputbox'em zmieniające stan zmiennej.
Jak zmodyfikować kod, by mógł pobierać dane ze skoroszytu, który mam aktualnie otwarty i nie chcę go zamykać Zakładając, że rozpoczynasz od makra (makro w module), spróbuj tak: 1. Usuń zamykanie pliku i czyszczenie zmiennej 'wb' 2. Deklarację zmiennej 'wb' przenieś do nagłówka modułu 3. Zamknij przypisanie oraz 'FileDialog' w instrukcji warunkowej...
To [syntax=vb]wswyn.Range("A" & wiersz & ":BD" & wiersz).Value = wsSrc.Range(wsSrc.Cells(i, "A"), wsSrc.Cells(i, "BD")).Value[/syntax]Musisz poprzedzić instrukcją warunkową. Najprościej (nie znaczy najefektywniej) wykorzystując metodę 'Find'. Jeśli błąd, to kopiujemy, jeśli err=0 znaczy dane już są...
Witam ! Przedstawione zadanie jest trudne do rozwiązania (w każdym razie dla mnie :cry: ) ze względu na zawiłości formatowania dat . Przedstawiony przykładowy arkusz stanowi swoiste dzieło "rękodzielnicze" :D - chyba Pan Błażej mocno się nad formatowaniem warunkowym całej tabeli napocił. Żeby tej pracy nie zmarnować - proponuję zatem do założonej funkcjonalności...
No tak. W YT "Dynamiczny wzór grafiku w Excelu. Grafik w Excelu" to jest tylko WZÓR. W Twoim przypadku, powinieneś generować kolejne miesiące, kopiować je do swojego rocznego skoroszytu z miesiącami (jak opisałem wyżej), wstawić do formatowania warunkowego w każdym arkuszu to co Ci podesłałem, pokolorować niedziele, i już. Dziesięć minut roboty i masz...
Rozumiem, że chcesz przepisać tabelkę do nowego zakresu. Wpisz w Google "sortowanie bąbelkowe". Może nie najszybsze w działaniu, za to dość prosty algorytm. Warunek: reszta z dzielenia przez 2 równa zero załatwi sprawę parzystych, różna od zera nieparzystych. Jeśli coś mniej ambitnego, to nagraj makro kopiowania zakresu i sortowania (tego skopiowanego)....
Wstaw sobie licznik wewnątrz pętli przed End If (licznik=licznik+1) i komunikat umieść warunkowo za pętlą ( If licznik>0 then msgbox... ).
Przykład na formułach i formatowaniu warunkowym: 1. W komórkę E4 wstaw formułę: [syntax=vbscript]=DATA(D1;MIESIĄC(DATA.W... & " 1"));1)[/syntax] 2. W komórkę F4 wstaw [syntax=vbscript]=E4+1[/syntax] i przeciągnij na prawo do ostatniego dnia. 3. Sformatuj wyświetlanie samego dnia ustawiając format niestandardowy -> d 4. Zaznaczasz dni 1-31, wybierasz...
Nie ma formuły więc sie nie liczy "sama". Albo po dodaniu nazwiska najnormalniej kopiuj komórkę z formułą średnią z komórki wyżej (Stajesz myszką na komórce do skopiowania łapiesz za prawy dolny róg komórki - wskaźnik myszy zmieni się na plusik - i przeciągasz w dół). Lub zamiast samej formuły średnia() wpisz we wszystkich komórkach średniej warunek...
Tak jak Pan zrobił jest super, ale oczywiście mam problem (pamiętając żeby kopiowana tabela była w tej samej kolumnie i wierszu parzystym) żeby po skopiowaniu do mojego arkusza wyskakuje błąd "nie można używać odwołań do innych arkuszy lub skoroszytów dla kryteriów Formatowania warunkowego". a muszę zmienić odwołania do komórek gdzie jest rok i miesiąc...
Nie ma problemu - zmienimy pętlę warunkową na zwykłą. Na marginesie, jak widać w twoim załączniku, numery pisma przy "anulowaniu" dokumentu też są usuwane. Najpierw sprawdzimy ile jest wierszy, a potem pętlą będziemy sprawdzać czy wiersz nie był już skopiowany i czy ma numer zadania. Jeżeli tak to go przerzuci, jak nie "pójdzie" dalej. (taki wiersz...
Szkoda, że nie chcesz załączyć przykładowego pliku, bo w ten sposób zmniejszasz swoje szanse na uzyskanie optymalnej pomocy, a potencjalnych pomagających zmuszasz do wypytywania o wszystkie szczegóły. Z tego co teraz napisałeś zrozumiałem, że arkusz "Generator cen" zawiera jakieś formuły, które mają być użyte do przeliczenia danych z arkusza "301" i...
sumowanie warunkowe
Dziękuję za odzew ;) z przykrością muszę stwierdzić że nie do konca o to chodziło, zależy mi na NIE kopiowaniu całej tabeli tylko samego tekstu. Warto zauważyć ze w exccelu (patrz zdjęcie) w całym wierszu czcionka jest tak samo sformatowana (podkreślenie lub pogrubienie). Mój dotychczasowy program ma pętelki które powodują przejścia przez wszystkie...
W dalszym ciągu nie jest do końca czytelne, bo nie widzę jeszcze powodu, by nie można było zastosować zwykłego kopiowania. Ale zakładając, że droga od danej do wyniku jest wieloetapowa i nie da się jej zapisać w jednej linijce arkusza, to istnieje jeszcze procedura, zwana Tabela danych , która działa właśnie w ten sposób, że podstawia kolejne wartości...
Rozumiem i postaram się pomóc w miarę swoich umiejętności ;) Widzę, że wiesz już jak wygląda edytor VBA. Otwierasz go sobie i w okienku projekt wybierasz nazwę pliku na którym będziesz pracować. Niech to będzie Twój przykładowy plik "Moje.xls". Następnie klikasz na "Wstaw >> Moduł". W nim tworzysz swoje makro: [syntax=vb] Sub Przenies() ... End...
Dla Ciebie to bardzo proste, a ja nie mam pojęcia o takich rzeczach. Chciałbym tylko zwrócić uwagę na fakt że na początku miałem 1 wiersz zaznaczałem go i kopiowałem zmieniając wartość komórki z 1 na 2 itd. do której się odnosiło pole gdzie musiałem potwierdzać.
Zastosuj formatowanie warunkowe. Zaznacz pierwszą komórkę zakresu (kolumny), z menu wybierz: Format>Formatowanie warunkowe i jako warunek wybierz: 'Formuła'. W okno formuły wklej wyżej opisaną i ustaw formatowanie komórki wg uznania. Następnie sformatowaną komórkę kliknij prawym pm, wybierz kopiuj, zaznacz zakres (kolumna z nazwiskami), w którym formatowanie...
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ć...
Koala106: napisalem "JESLI" - jest to zdanie warunkowe. user: jesli jest tak jak pisze kolega Koala106, zasada jest ta sama - znajdujesz by Google lub na FTP Elektrody program CeDesktop.exe, kopiujesz go na karte SD i w ustawieniach wskazujesz ten program, jak opisalem - efekt dokladnie ten sam. Nadal nie napisales CZEGO kopie chcesz zrobic - jesli...
W mysql trzeba robić tak: $conn -> query("UPDATE tabela SET columna ='coś tam' WHERE columna='coś tam' "); Akurat to przykład w PHP Wszystko pomieszałeś. Pehap, MySQL, kwerendy, funkcje. metodą kopiowania dolarów w netu daleko nie zajdziesz. Może pora przeczytać coś solidnego? Microsoft SQL pozwala na napisanie warunkowej kwerendy INSERT or UPDATE,...
Witaj. Formatowanie warunkowe w Excelu 2003 nie umożliwia sprawdzania wartości w innym arkuszu (nie wiem, czy nowsze wersje to potrafią, bo nie używam). Dla mnie rozwiązaniem problemu było skopiowanie tabeli świąt do komórek A100 w dół i użycie formatowania warunkowego z warunkiem opartym na tych komórkach. Oczywiście A100 w dół można sobie ukryć, a...
Podam ci teorię bo inaczej się nie nauczysz (adres bezwzględny). Znak $ w adresie zatrzymuje "zmianę" numeracji wiersza lub kolumny lub obu podczas kopiowania. Przykład 1. W komórce jest napisane =A$10 jeżeli będę kopiował w bok zmieniać się będzie tylko litera kolumny adresu. Prawdę mówiąc kopiując taki przykład tylko w prawo czy lewo nie trzeba "zatrzymywać"...
Dzień dobry, Ten problem dość trudno "ugryźć" formułami, bo napotykamy tu na błąd w Excelu, który trzeba jakoś obejść. Propozycja byłaby taka: Najpierw utworzyć kopię oryginalnej tabelki, wpisując formuły sumujące podane w przykładzie. Ja wprowadziłem tam tylko nazwy: "od" i "do", bo "nie trawię" takich megaformuł, ale autor może powrócić do swojej...
Zrobiłem eksperyment: Potraktowałem kolumnę "K" filtrem zaawansowanym z kopiowaniem bez duplikatów do Kolumny "P" i w kolumnie obok użyłem SUMA.JEŻELI(B:B;P3;C:C). Różnica w ilości wierszy (bo kto to przejrzy?) wynosi 6786 w kol "P" do 9523 w kol "K" Duplikaty są także w kolumnie "H" dlatego wydaje mi się, że tylko sumowanie warunkowe da właściwe wyniki......
1. Tylko skąd ty teraz wytrzasnąłeś ten znaczek '(at)'? Chyba chodziło Ci o '&'... Typ kopiowanych danych nie ma żadnego znaczenia. Tak tak. Oczywiście &. (at) mi „się wstawiła” do postu ale w programie mam oczywiście &. 2. W skrypcie linkera komentarze tylko w /* ... */ 4\/3!! Już zmieniłem. albertb : Ok. Zaraz spróbuję. GrzegorzKostka...
W arkuszu dane jest u góry komórka w której będzie możliwość wprowadzenia miesiąca, w dane wiersz milionowy jest tabela z całymi danymi ,z których przy wyborze miesiąca będzie obszar całego miesiąca kopiowany do arkusza "sheet2". Jak już wszystko będzie oki działać, to sobie dam w vb żeby ukryć te wiersze, żeby nikt nie widział że one tam są, ale żeby...
Co ma wspólnego makro do zaznaczania aktywnego wiersza z funkcją, której nagłówek pokazujesz? Jak i do czego używasz tej funkcji? Zaznaczanie aktywnego wiersza masz zrobione formatowaniem warunkowym z formułą: [syntax=text]=KOMÓRKA("ROW")=WIERSZ()[/s... z tym są dwa. Pierwszy - należy właściwie zaznaczyć zakres komórek, w którym to formatowanie...
Prawdopodobnie ze względu na ograniczoną znajomość Excela - Twoje wnioski koleżanko są błędne :cry: Zarówno jedna, jak i druga metoda po drobnych modyfikacjach formuł umożliwia uzyskanie wyszukiwania indywidualnych wskazań. Metoda "indeks" 869933 Metoda "sum warunkowych" 869934 Wydaje mi się jednak, że jeśli chodzi o wyszukiwanie pojedynczych wskazań...
A nie prościej zrobić formatowanie warunkowe. Wówczas mamy sprawdzanie przez excela wartości i makro nie obciąża go dodatkowo...Piszę już jakiś czas makra i np jak robi się kopię dużych arkuszy, to makro jest zbyt wolne - lepiej zamiast przenoszenia Rows(A) użyć zaznaczenia i polecenia kopiuj excela wpisując formuły poprzez makro niż kopiować fizyczną...
Można kombinować z opcjami w pętli za Select, ale bez komplikowania życia łatwiej będzie wstawić pętlę w miejsce każdego "a=cośtam" z odpowiednią instrukcją warunkową If . Tu nie jest jeszcze jasne (przynajmniej dla mnie) co ma być kopiowane w przypadku Np: to / oraz to / lub to / oraz to ;) Dodano po chwili 1. Zdaje się, że 'Lub" powinno odnosić się...
Mam kolejne pytanie, ponieważ mam plik w którym mam w 1 pliku 3 arkusze: "powietrze", "powierzchnie", "podłogi". w których mam tabele od kolumny B do kolumny M od wiersza 4. W tych tabelach w kolumnie I działa formatowanie warunkowe, które zaznacza komórkę jak wystąpią dane słowa zaczynające się od "Escherichia" "Staphylococcus" "Candida". Czy jest...
:) Ale nie ma tego złego ... Ściągnąłem od ciebie metodę sprawdzenia ilości wierszy. Do tej pory zawsze robiłem to w pętli warunkowej dopóki ostatnia komórka nie była pusta. Tak samo tu chciałem zrobić. A tak w jednym wierszu kodu można zamknąć takie sprawdzenie. :) Miło tak czerpać wiedzę. I ta nuta rywalizacji. :) No ... idę spać.
makro kopiowanie warunkowe warunkowe kopiowanie wiersza kopiowanie wierszy warunkowe
zmywarka głośno nawijanie zwojów excel losować liczba
schemat przełącznika spawarki tracer zasilacz
Volvo V40 1.8 benzyna – błąd P0351, cewka zapłonowa A, objawy i diagnostyka Uszczelki drzwiowe MAN TGL 12.240 – dobór, numery części, montaż, zamienniki DT, Febi