I cisza się zrobiła... No dobra, wypiłem kawę i wyszło mi coś takiego: Edit: A makro w innym pliku. Jednak późno już... Załącznik podmieniłem
Da się: http://obrazki.elektroda.pl/8027992500_1...
[syntax=vbscript]Sub Kopiuj() Set a = Sheets("Arkusz1") owa = a.Cells(Rows.Count, "B").End(xlUp).Row Sheets("Arkusz3").Select ow = Cells(Rows.Count, "B").End(xlUp).Row y = 2 For x = 2 To ow s = Application.Match(Cells(x, 2), a.Range("B1:B" & owa), 0) If Not IsError(s) Then a.Range("A1:D" & owa).AutoFilter Field:=2, Criteria1:=Cells(x, 2) a.Range("A2:D"...
zamiast exit sub daj pustą funkcję albo przypisanie jakiejś zmiennej do samej siebie
Nie musisz niczego przepisywać. Zobacz załącznik -> dodany miesiąc i rok. T U Sprawdź czy o to chodzi.
A mógłbyś po swojemu, wspomniałeś, że nie znasz VB, napisać, jak według Ciebie taka linijka powinna wyglądać? Podpowiem, żę blisko tego: [syntax=vb] Cells(owa2, 1).Select Selection.PasteSpecial Paste:=xlPasteValues Cells(.... = .... [/syntax] Cells(1,1), to komórka A1. Cells(4,2), to komórka 4B. Proste, prawda?:)
Spróbuj [syntax=vb]For Each kom2 In Sheets("Arkusz2").Range("A1:A500") If kom2 <> Empty Then For Each kom1 In Sheets("Arkusz1").Range("A1:A500") If kom1.Value = kom2.Value Then kom2.Offset(0, 13) = kom1.Offset(0, 13) kom2.Offset(0, 14) = kom1.Offset(0, 14) Exit For End If Next End If Next[/syntax]
W formatowaniu warunkowym zastosuj taki mniej więcej ciąg myślowy: jeżeli dziś >= data_wpisana +80 to koloruj na czerwono Osobno w jakiejś tam kolumnie (przyjmijmy, że jest to komórka G4) wpisujesz normalny warunek: jeżeli dziś >= data wpisana to G4="ŹLE" w przeciwnym razie G4="OK" Wystarczy to podstawić do funkcji, celowo zostawiam Ci odrobinkę pracy...
Widzę, że nie bardzo lubisz makra ;) a wystarczy: 1. makro z WorkbookOpen powtórzyć przy WorksheetActivate (aktualizacja listy Combobox''a). 2. Usunąć instrukcje warunkowe dot. producenta Listę kolorów modyfikujesz w arkuszu "Opcje". Musi być "ciurkiem" (bez dziur). Edit 20:17 - zmieniłem załącznik (Clear brakowało przy Activate)
przerzucam kolejne strony książki Walkenbacha Hmmm, czyżby zapomniał wspomnieć o pętlach? ;) Przeanalizuj (w założeniu brak dubli w Arkusz2), dostosuj do własnych potrzeb [syntax=vb]Sub Mania() Dim ws As Long, wDel As Long ws = 1 With Sheets("Arkusz1") Do While .Cells(ws, 1) <> "" On Error Resume Next wDel = Sheets("Arkusz2").Columns(5).Find(what:=...
[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) If Range("K1") <> "" Then Me.Save Else If Range("A1") > 0 Then MsgBox "Komórka K musi być wypełniona przed zamknięciem dokumentu!" Cancel = True Else MsgBox "OK, komórka K wygląda na poprawnie wypełnioną Smile" Me.Save End If End If End Sub [/syntax]
To da się zrobić nawet za pomocą suma(). http://obrazki.elektroda.pl/9193961000_1... Pochrzaniłem zakresy sumowania dla środy - nie zwracaj uwagi na liczby .
Jeśli dobrze rozumiem, to tak:
Samodzielnie rozwiązany problem.
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...
Trzeba dodać warunek na długość zawartości komórki: [syntax=text]=ORAZ(KOMÓRKA("wiersz")=WIE... >0 będzie interpretowana jako PRAWDA.
Witaj. Sprawdź: =JEŻELI(A1<2;"Brak promocji";JEŻELI(A1>4,5;&quo... wyróżnienie";"Otrzymał promocję")) Oczywiście zamiast A1 podstaw swoją komórkę. Dodano po 16 Kolegi drugą formułę można poprawić na coś takiego: =ZŁĄCZ.TEKSTY(JEŻELI(J3>4,5;&... wyróżnienie";"");JEŻE...
chciałbym zeby wybierało tylko wiersze spełniające pewne warunk Jak zwał, tak zwał. Ale wyobraźmy sobie, że "wybierało" dzieje się w tej linii [syntax=vb]Print #1, kol1 & ";" & kol2; ";" & kol3; ";" & kol4; ";" & kol5; ";"[/syntax](wcześniej jest przypisanie). Wystarczy więc, tę jedną linijkę "owarunkować" [syntax=vb]if warunek then Print #1, kol1...
ale funkcje tablicowe to już "wyższa" matematyka excela Jaaaasne. :D :D I kto to pisze. To ja, zgodnie z tym co mam napisane nad tym brzydkim ryjem po lewej mogę używać takich zwrotów, a nie wirtuoz Excela. Ale żeby temat trochę uprościć to zamiast tablicówki można użyć zwykłej: =suma.iloczynów((zakres1="a...
...kolego w Twoim wzorcu nawet jeśli zakres "E1:E9" jest całkowicie pusty to pokazuje wynik 3 Chyba u Ciebie... http://obrazki.elektroda.pl/9225081400_1... ">0" oznacza większe od zera Jeśli w komórce jest liczba ujemna lub tekst warunek nie jest spełniony "<>" oznacza niepusta spełniony zawsze jeśli komórka nie jest pusta.
Trzeba wrzucić to w pętlę. Jak znajdzie robi warunek PRAWDA Jak nie znajdzie to w warunku FAŁSZ wyświetla Msgbox i kończy działanie
Dzień dobry, Chciałem się włączyć do dyskusji, chociaż trudno zaproponować szybkie rozwiązanie przy tak dużej liczbie danych. Nie chcę proponować VBA, są pewnie lepsi od tego specjaliści, natomiast formuły Excela można na pewno zoptymalizować. Ale najpierw pytanie, czy w przykładzie kolumna I w arkuszu "wynik" zawiera spodziewany wynik? Warunek jest...
to w tym samym rzędzie i w innej kolumnie również kolorowało mi tło tym samym kolorem używać ten sam warunek formatowania jak dla kolumny X
Dla Excela 2007 i powyżej: Formatowanie warunkowe -> Nowa reguła-> Użyj formuły do określenia komórek, które należy sformatować. W okienku formuły wpisujesz warunek "=ORAZ($A$2=1;$B$2="") i dalej ustawiasz format komórki Dla pozostałych komórek ustawiasz warunki format podobnie.
Warunek w formule jest ustawiony na sztywno: od 8 do 16. Formuła sumuje z kolumny A wszystkie wartości, które spełniają warunek - w tym przypadku tylko pierwszą pozycję. Przeciąganie formuły w dół nic nie da - bo to zawsze będzie suma warunkowa z całego wskazanego zakresu kolumny A.
No to znowu jest kilka możliwości, można zrobić trochę kodu, który przeleci przez te komórki i jak spotka to, co am spotkać, to dopisze w jakimś arkuszu kolejny wiersz (rekord), jeżeli lista tych nazwisk jest stała to można też ich wszystkich przepisać do arkusza zbiorczego, który potratujemy autofiltrem (rozwiązanie prostsze, nie wymaga programowania).
kurcze w pracy mam wersję 2007 i nie mogę żadnej frazy wpisać :/ Mało prawdopodobne :D , zaznacz dotychczasowy wpis i wtedy zacznij wpisywać swoją frazę :!: pole edycji Comboboxa i jego lista automatycznie się przestawi po pierwszej literze :D co należy zrobić , aby kolor danej komórki wyświetlił się w arkuszu "wyszukiwarka" w oknie "szt" Po prostu...
Nie wspominałeś że może taka sytuacja zaistnieć więc funkcja tego nie sprawdza. Ale i to się da załatwić dodatkowym oraz() Tylko że w takim przypadku zadam dodatkowe pytanie czy przykładowo n5 ma date 20140101 i perc jest 1 ale inna n5 ma date 20140101 i perc 1 też jest błędem jako dubel ? Bo wtedy wykażemy warunkami że błędem jest już sam dubel - bez...
Zaznacz wszystkie komórki z datami. (zwróć uwagę że przy zaznaczaniu jedna komórka z zaznaczonych pozostaje jasna) Wybierz w menu Format "Formatowanie warunkowe" Warunek 1 zmień na "Formuła jest" a w okienko wpisz = A1 <=DZIŚ()+60 Przy czym A1 zastąp adresem komórki która z zaznaczonych jest jaśniejsza - z reguły pierwsza z zaznaczanych komórek)...
Tak się nie da. Usuń sumy częściowej. Dodaj kolumnę pomocniczą z funkcją suma.jeżeli() w której warunek będzie "odbiciem" "warunku" dla sumy częściowej i według tej kolumny posortuj dane (jako pierwszy klucz). Dopiero wtedy wstaw ponownie sumy częściowe.
Jeśli tylko ukryć wartości, to najprościej "zabielić" czcionkę za pomocą formatowania warunkowego. Jeśli wynik formuły, to warunek podobny do numerowania wyżej. Jeśli zablokować przed edycją, to jedynie makro w procedurze zdarzeniowej.
Pierwsza sobota przypada w okresie pomiędzy 1 a 7 dniem miesiąca. W tym okresie może być tylko jedna sobota i w tym okresie zawsze musi pojawić się sobota. Skoro masz już warunek na "sobotę" to dołóż drugi na dzień miesiąca < 8.
Brak załącznika to poważny mankament! Nie wiadomo, jakie dane są w kolumnie "O". W kodzie PRL jest sprawdzany warunek: [syntax=vbscript]Sheets(x).Cells(y, "O") >= -30[/syntax]Otóż warunek ten spełniają nie tylko liczby >= -30, ale również puste komórki, dowolne teksty, w tym teksty puste, wartości logiczne. A jeśli w komórce jest wartość błędu, to program...
Korzystając z funkcji JEŻELI w kolumnie C musisz stworzyć formułę, w której: - warunek: komórka z kolumny B > 0 - wartość jeśli warunek jest spełniony: wartość z kolumny B - wartość z kolumny A - wartość jeżeli warunek nie jest spełniony: "" [2 razy cudzysłów, czyli pusty ciąg] Teraz już pewnie dasz radę.
Problem w tym, że jeśli dam aby pomijał tekst "po terminie" to będzie pomijał wszystkie teksty... Chodzi o to, że pomimo tego, że komórka jest pusta to arkusz pustą komórkę traktuje jako datę jeśli cała kolumna jest tak sformatowana. .. Wiec sprawdzaj 2 warunki w forumule np.: ORAZ(E20<DZIŚ();E20<&g... albo kolejny...
Na początku pętli [syntax=vbscript]Do While Len(ws_src.Range("E" & i)) > 0[/syntax]jest sprawdzany warunek czy długość zapisu w kolumnie E jest > 0. Eliminuje to przypadki pustych komórek i pustych tekstów. Gdybyś jeszcze chciał sprawdzać wartości zerowe to trzeba dodać nowy warunek pod spodem: [syntax=vbscript]If ws_src.Range("E" & i) = 0 Then Exit...
Zerknij do załącznika. więc wystarczyło by mi coś co wyłapuje tylko 2 wyrazowe ciągi Czyli tylko porównywanie długości ciągów... Warunek (true) testu:[syntax=text]DŁ(A1)-DŁ(PODSTAW(A1;... ";""))=1[/syntax]
Dzień dobry, W pierwszej chwili nie zrozumiałem, o które puste pola chodzi. Teraz już wiem, że chodzi o to, że gdy w wierszu wzorcowym jest puste pole, to pola poniżej nie mają być zaznaczane. Należy dodać drugi warunek do formuły: [syntax=text]=ORAZ(A11=A$11; A11<>"")[/syntax] W tym drugim warunku może być albo A11 albo A$11. Pozdrowienia.
Dla jednej zmiennej wystarczyło by podaj.pozycję() z 1 jako ostatni parametr. Kłopot gdy masz jeszcze jeden warunek dotyczący litery. Może wykorzystać ostatnio wykorzystywana na forum funkcję tablicową na podanie pozycji z warunkami. Zaraz popróbuję. edit Świetnie działa z warunkami jak jest wszystko określone dokładnie, ale jak ma się zbliżać tylko...
1. Funkcja znajdz() zwroci 7, wiec podany przez Ciebie przyklad zwraca nic innego jak falsz i to rozwiazanie nie jest dla mnie odpowiednie. Chcialby sprawdzic czy istnieje ciag znakow z jakas litera na poczatku i zastanawia mnie dlaczego "*", ktora oznacza dowolny ciag znakow nie dziala w moim przypadku ? 2. Ten przyklad rowniez jest niepoprawny a...
Pętla, podstawianie (replace), porównywanie długości ciągów (len), rozbijanie ciągów (split), podstawianie, porównywanie, rozbijanie, itd. W zależności, czy warunek spełniony wstawianie wiersza, dodanie wartości, mnożenie *10, lub przepisanie. Mnóstwo kombinacji, ale do zrobienia.
nazwy firm w zależności od statusu tylko na dzień dzisiejszy :?: Jeśli ten warunek jest istotny :?: to te nazwy firm będą jedynie w jednym wierszu (dane dla dnia dzisiejszego :D ) np. tak jak na zrzucie i w załączonym pliku :ok: 1088589 1088592 Jeśli koleżanka preferuje rozwiązania oparte o VBA :?: to można tu zastosować kod, który przy otwarciu pliku...
Trochę cię podprowadzę. (Bo nie koniecznie trzeba używać jeżeli ale dla zrozumienia warto) Stajesz na komórce z datą ( I3 ) Format - formatowanie warunkowe Pierwszy warunek Jeżeli komórka jest pusta pozostaw bez formatowania Wybierasz formuła jest... i tu wpisujesz funkcję sprawdzającą = czy.pusta(I3) Pozostawiasz bez formatowania Drugi warunek Jeżeli...
Hmm. Żeby sprawdzić warunek True/False (przy warunkowym uruchomieniu ze zmienną globalną) procedura musi się uruchomić. Wbudowany autozapis nie spełnia wymogów? [url=http://www.jkp-ads.com/download.asp... znalazłem jakiś dodatek (Autosave.zip), może się nada. W ostateczności można "napisać" procedurę przy otwarciu, a przy zamknięciu usunąć. [url=http://www.cpearson.com/excel/vbe.a...
Jeszcze na chwilę. Złapałem się na tym, że myślimy w kategorii "parametru dla funkcji tablicowej" (może dlatego, że takie było pierwotne założenie). A gdyby zadaniem było coś grubszego i wtedy Np 19.12.2020 - 1.02.2022 Nie było by prościej, gdyby wykorzystać tylko pierwszą datę i wyliczoną ilość dni (nawet dla ilości kroków pętli), zamiast gromadzić...
Ów zdefiniowany "tekst" wpisujesz w cudzysłowiu jako warunek równości a działanie formatowania warunkowego ustawiasz na komórkę (lub zakres), którą chcesz kolorować. Zobacz załącznik. (at)mickpr Nie do końca o to chodzi w temacie.
Jeśli znaki "<" oraz ">" występują tylko jako "nawiasy" znaczników i nigdzie więcej, to można w prosty sposób skorygować pętlę Do , umieszczając warunek i polecenie wyjścia z pętli wewnątrz niej. Rezygnujemy wtedy z tablicy i określamy początek i koniec fragmentu do pogrubienia wg wspomnianych znaków.
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...
=AND(IF(A1<DATEVALUE("2013-07-01");TR... Warunek dla komórki A1 W wyższych wersjach Excela jest możliwość ustawienia AutoFiltra dla daty z parametrem "pomiędzy". Trzecia możliwość - posortować całość po dacie i wybrać żadany zakres.
Warunek w Twoim JEŻELI (nawiasem mówiąc dziwny) spełni się tylko, gdy w kolumnie B pojawi się liczba i będzie większa od poprzedniej, wtedy komórka z wynikiem będzie pusta. W przeciwnym wypadku działanie jest wykonywane, na zerowych wartościach (stąd 0 w wyniku).
warunek excel excel obliczać warunek warunek excel formuła
awaria ekspresu philips usunąć karty isatap sprężarka lodówce
przekroczono pasmo cyfral cosmo
Jak zresetować ekspres Miele - instrukcje krok po kroku Odciąg szczelinowy do wanny kwasowej 1600x3200 mm – wentylator, skruber, parametry
