Ilość osób już masz, do wyliczenia ich średniej użyj f-cji AVERAGEIF().
Poprawiłem Twój kod: Function jakastam(x) Application.Volatile True y = 0 For i = 1 To x y = y + Arkusz1.Cells( i , 1).Value Next i jakastam = y End Function
i = ActiveCell.Row Aktywna komórka, to aktywna komórka... If Cells(i, 3).Value = Worksheets("Dane").Cells(j, 1).Value Then Exit For Zamiast funkcji w VBA, oparłbym to o WYSZUKAJ.PIONOWO.
Napisać proste makro, które to zrobi. A może nawet sprytnie napisana funkcja zrobi coś takiego. Musisz pokazać jak wygląda Twój raport zdarzeń.
zawartość komórki B1 do AH17 Dopisz [syntax=vbscript]Cells(17, 34) = .Cells(x, 2)[/syntax]
Taka oto funkcja.
Witaj to samo rozwiązanie w nieco inny sposób, z ominięciem błędu dla pustek komórki: =JEŻELI(A1="";"";LEWY(A1;DŁ(A1)-2)&"/"&P...
Trochę zagnieżdżeń funkcji JEŻELI wystarczy w tym przypadku.
Ale nie wszystkie zadania dotyczą konstrukcji funkcji. Kilka wskazówek: 5. zastosuj funkcję Jeżeli() (np.=JEŻELI(E2>60;G2-G2*8%;G2); 6. wykorzystaj jeden ze sposobów wypełniania serią danych 7. zastosuj funkcje Licz.jeżeli() i Suma.Jeżeli() 8. wygeneruj wykresy przy użyciu kreatora.
a tak z czystej ciekawości - czy jest może jeszcze łatwiejsze rozwiązanie ? :) ale mamy wybrednych forumowiczów :) "jak się da to sie zrobi" jak to w starym kabarecie było Hmm... Pewnie że sie da prościej - bez kolumny pomocniczej - tylko formatowanie warunkowe (tylko czy to rozwiązanie jest łatwiejsze jeżeli chodzi o zrozumienie formuły suma.iloczynów()...
Funkcja przecież działa. W arkuszu trzeba ją wywołać rows dla zmiennej nie jest najlepszym pomysłem, bo ta nazwa ma swoje specjalne znaczenie w VBA.
Na pewno - Chyba że masz jakieś inne zarządzanie klawiszami (np. grafika) Jak zaznaczone przytrzymujesz ctrl i wciskasz d (tylko wcześniej w "górnej" komórce oczywiście musi być jakaś funkcja).
Cześć Jeśli Nr maszyny jest liczbą, to można go podstawić jako argument 'ile kolumn' funkcji PRZESUNIĘCIE. A jako argument 'ile wierszy', pozycję w kolumnie A (nazwa wyrobu).
Funkcja Excel PRAWY Dodano po 1 np. w komorce B2 =PRAWY(A2; 3)
Ja bym kombinował coś z funkcją percentyl. coś w rodzaju maksimum (tablica) jeżeli x<percentyl(a1:a10;0,3)... Coś z tymi funkcjami.
Po prostu użyj tych funkcji wewnątrz funkcji.
Trzeba to zapisać np. w taki sposób: [syntax=text]=ADR.POŚR("'"&$A$1&"'!B"&WI... [/syntax]
Adresy zamieszkania To proponuję spokojnie wypróbować tą drugą formułę - z moich testów wynika, że działa prawidłowo :-) Musisz tylko zweryfikować w jakim formacie są te dane - skąd one pochodzą i czy nie są stosowane jakieś specjalne formaty danych.
=ADR.POŚR("B"&4+A2)
[syntax=vbscript]Function WlasnafunkcjaWstawBranze(D As Integer, E As Integer) As String If D = 1 And E = 1 Then WlasnafunkcjaWstawBranze = D & "," & E End Function[/syntax]
Wystarczy użyć funkcji "jeżeli" i trochę poczytać, np tu: http://www.programowaniepc.pl/excel-funk...
Ja bym w kolumnie Q zastosował zaokrąglanie. =ZAOKR(SUMA(B4:O4)/($C$2);0) Oczywiście to obejście bo powinny być zastosowane zakresy tak jak napisał walek33 . Zmiana formatu komórki Q nie zmieni wyniku formuł !
Sprawdź, czy o to chodzi.
Proponuję wykorzystać formatowanie warunkowe :idea: dla uzyskania efektu jak na zrzucie :D 978313
To dokładnie tak jak napisałem : (Alt +F11) - pojawia się okno VBA. Wskazujesz po lewej (klikasz 2 razy) na nazwie arkusza, w którym chcesz zrobić taką zależność. i tutaj zrobiłem (przyznaje się) mały błąd. Kod umieściłem w This Workbook - a nie w konkretnym arkuszu. Kod w arkuszu (np. w Arkusz1) wyglądać ma tak: [syntax=vb]Private Sub Worksheet_SelectionChange(ByVal...
Użyj funkcji TEKST =ZŁĄCZ.TEKSTY((TEKST(DZIŚ... Tydzień ";(NUM.TYG(DZIŚ();2...
Rzeczywiście F9 nie powoduje przeliczenia a w związku z tym druga porada też mija się z celem. Trzeba znaleźć inne wyjście. Na chwile obecną ja nie mam koncepcji. Może inni koledzy z forum na coś "wpadną"
Jeśli dobrze Cię czytam to specjalnie nie ma co kombinować. Jeżeli A1-B1 nie równa się 0 , to aby pojawiło się zero w wyniku mnożenia przez x , to x musi być zerem. Wynik 0 (zero) możesz uzyskać w tym działaniu jedynie mnożąc przez 0 (zero).
Witam ! Musisz być bardzo precyzyjny (dokładność 1 znaku :!: ) to możesz to zrealizować formułą jak na zrzucie :spoko: 891642
http://obrazki.elektroda.pl/9151570700_1... Staw kursor w tabelu 'Propozycja zniżki ważna od 15 styczeń 2015.' a patrz ceny w wiersze formul, ulamkowe. Dodano po 11 wynik powinien wynosić: 73 EUR + 178 EUR = 251 EUR Znaczy to ze od 1 do 50 kg zniżki nie ma ??
Widzę, że próbujesz sprawdzać jakieś procedury medyczne dla NFZ-u :) =JEŻELI(A1=B1;"TAK";"NIE") https://obrazki.elektroda.pl/7706875600_...
Zacznij od funkcji wyszukaj.pionowo
Można i makro. Ja próbowałem formułami, ale nie udało mi się uzyskać efektu jaki zamierzałem. W załączniku propozycja z kolumnami pomocniczymi dla kolejnych miesięcy. Kolumny I:T można ukryć. Byłoby łatwiej gdyby nazwiska nie były pomieszane, tylko w każdym miesiącu nazwisko miało taki sam adres. Wtedy można stosować sumowanie 3-W.
Dostosuj funkcję TrzeciOdTylu...
po komunikat = suma1 dodaj Dodano po 2 Wtedy 'Function formatowanie' odpada
Funkcja, wyszukaj pionowo.
Dubel tematu - można usunąć.
czy istnieje taka funkcja, w której cyfry 1 i 2 będą liczone jako 12, a pozostałe, np. 4, 8, 12 jako 4, 8, 12 Tak tego typu jak na zrzucie: 896170
Przeczytaj pomoc do programu, nie mam je, to jest Twoj program. Prawdopodobnie to jest cos jak terminal, zazwyczaj mozna parametry w pliku. Uruchom ptw32.exe /? co powie... Dodano po 10 Wszystko mozna wprowadzic w skrypt .psl a uzywac je jako parameter Dodano po 2 Ponadto ptw32.exe ""parameter ze spacje""" Nie ma spacji między znakami cudzysłowu
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 4 And Target = "Pranie" Then Range("E" & Target.Row) = Date End Sub[/syntax] Ale czy czasami nie potrzebujesz funkcji?
[syntax=txt]=MAX((INDIRECT(E1&"!C:C"...
Tak jak kolega Marcin230 piszę, w warunku formatowania wpisz np =ORAZ($D2<=DZIŚ();$E2>=DZIŚ()) Oczywiście gdy stoisz w komórce w drugim wierszu excela (nie tabelki)
Takie wyszukiwanie jest możliwe lecz ... raczej nie za pomocą funkcji wyszukaj pionowo :cry: Można to zrobić np tak jak na zrzucie przy użyciu jednokomórkowych formuł tablicowych :spoko: 873542 Całość wraz listą wyboru wyszukiwanego klubu masz w załączonym pliku :D 873546 Ps. na zrzucie widać jeden błąd, który skorygowany jest dopiero w pliku :bye:
zapisane w szeregu, w jednej kolumnie. Czyli w osobnych komórkach w dół w danej kolumnie?
przed specjalnie zapytał Co jak firma jest w 2014r. a nie ma jej w 2015 ? 0 - 2014 ?
tak może: =JEŻELI(C1<=175;(JEŻELI(C... niskiego wzrostu";"Osoba średniego wzrostu"));"Osoba wysoka") zmien Sobie C1 na dowolną
Makro uruchamia się, gdy przechodzisz do "Arkusz2" (Np po zmianach w "Arkusz1") Po linii licznik=2 przydałoby się Range("J" & Rows.Count).ClearContents Ew. szukanie pierwszej niepustej w kolumnie. To już Tobie zostawiam. Oczywiście dość łatwo przerobić to na funkcję.
SUMA.ILOCZYNÓW((zakres=warunek)*(zakres=... patrz pomoc i przykłady na forum. Prościej byłoby, gdybyś wrzucił plik z danymi i niedziałającą funkcją...
Funkcja Adr.Pośr - zobacz załącznik
poproszę o link ;) Przykładowo zastosowanie funkcji vlookup w VBA :arrow: https://www.elektroda.pl/rtvforum/viewto... Chciałabym aby w liście była pozycja jako "inne" Jeśli zastosujesz listę "poprawności danych" to nie ma żadnego problemu z pozostawieniem pustego, edytowalnego pola :spoko: np tak jak na zrzucie 960396 Wszystko...
Tak, teraz dopiero wiadomo, o co chodzi. Podaję dwie propozycje formuł. Pierwsza w "starym stylu" bez funkcji LAMBDA: [syntax=text]=UNIKATOWE(FILTRUJ($K$5:$K$... z wykorzystaniem funkcji pomocniczej LAMBDA: [syntax=text]=LET(dane;$K$5:$K$24;UNIKAT...
Takie sztuczki tylko w PHP (no nie tylko ale ...) a i to trzeba dolara przed wiersz wstawić. [syntax=vbnet]Public Function wysokosc_wiersza(wiersz As Integer) As Integer w = Trim(Str(wiersz)) wysokosc_wiersza = Range(w + ":" + w).RowHeight End Function[/syntax]
Funkcja taka to: "=JEŻELI(B4<50;B4+0,35*B4;JEŻELI(B4&l... zamiast 'B4' wstaw sobie komórkę w której masz daną
https://tomaszkenig.pl/kurs-excel-vba/fu...
Tutaj jest film gdzie wyjaśniony został sposób użycia tej funkcji. Myślę, że to będzie dużo lepsze dla pogłębienia wiedzy niż gotowa formułka. https://www.youtube.com/watch?v=4G37eJN5...
Użyj funkcji LICZ.WARUNKI.
Przeczytaj w pomocy funkcje WYSZUKAJ.PIONOWO
Nowego arkusza w tym samym skoroszycie? Dołącz plik przykładowy. Jeśli wiesz, wszystkie wartości 1A, 1B, 2A, 2B itp to nie potrzebne makra, w Excel => 2007 jest formula(funkcja)
Dzień dobry, Używając funkcji NETWORKDAYS należy pamiętać, że funkcja po pierwsze uwzględnia w obliczeniach zarówno pierwszy, jak i ostatni zadeklarowany dzień - to jest ważne gdy daty mamy w tabeli i okres jest podzielony na podokresy. Po drugie - funkcja standardowo pomija soboty i niedziele. Po trzecie - jeśli trzeba pominąć dodatkowo dni świąteczne...
Zainteresuj się funkcją - SUMA.JEŻELI.
A może koledze chodzi o coś takiego.
Rzuć okiem na takie coś. Wyszukałem znaki "/", następnie zmieniłem ostatnią część na liczbę i posortowałem zwykłą funkcją A->Z
Czy liczby zawsze są w układzie rosnącym?. A może wykorzystaj funkcję Suma.jeżeli()
A czy można prosić funkcję, Excel blokuje mi dostęp.
W zasadzie wszystko miałeś dobrze (przynajmniej formalnie), z wyjątkiem liczby Pi, którą trzeba zapożyczyć z Excela. Dodałem tylko nagłówek i deklaracje (nie są konieczne, ale lepiej jak są, bo zabezpieczają przed niektórymi błędami). Algorytmu nie sprawdzałem, zresztą nie podałeś danych, a istotne są tu jednostki. Widać tylko, że zmienna Obr jest niewykorzystana....
Zastosuj formułę z iloczynem (and), po spełnieniu obu warunków wykona funkcję jeżeli.
Witam, mam problem otóż tak jak w pliku mam np 3 grupy (każda z grup posiada ileś tam osób np. po 4 osoby). Są 4 sale i w każdej z sal mogą odbywać się 3 czynność Pisanie Malowanie i Ćwiczenia. W tabeli 1 jest prowadzona lista, która osoba jaką czynność wykonywała w jakiej sali, osoba ma wybrać swoje imię, czynność oraz salę, a także wpisać czas. I...
Jeśli zdecydujesz się skorzystać z tabeli przestawnej np. jako skoroszytu pomocniczego wypróbuj funkcję WEŹDANETABELI
A takie rozwiązanie? Function Szukanie(Wskaznik, Rok, Zakres as Range) For Each Kom In Zakres If Kom = Wskaznik Then Wiersz = Kom.Row End If Next For Each Kom In Zakres If Kom = Rok Then Kolumna = Kom.Column End If Next Szukanie = Zakres(Wiersz - 1, Kolumna).Value / 100 End Function Powinno działać prawidłowo. Dodane: Coby funkcja była...
To że ta funkcja ma być tylko fragmentem całego kodu -procedurą, którą będę używał w arkuszu. Potem będę generował xmla. To akurat wiem jak zrobić bo mam wzór ale nie mam pojęcia jak utworzyć taką funkcję.
Pewnie ktoś z wyższą wersją się odezwie, żeby Ci pomóc.:)
[syntax=vbscript]Sub Rozdziel() ow = Cells(Rows.Count, "A").End(xlUp).Row For x = 2 To ow a = Split(Cells(x, 1), ".") For y = 2 To 4 Cells(x, y) = a(y - 2) Next Next End Sub [/syntax] Trzeba tylko ustawić format kolumn B:D na tekstowy.
Patrz w pomocy Excel funkcje WYSZUKAJ.PIONOWO dla Q2 = WYSZUKAJ.PIONOWO(M2; A:B; 2)
chodzi o to, żeby z 1 i 2 (i innych których nie ma we wzorze) arkusza z danej kolumny konkretnego pracownika na ostatni arkusz przenosiły się w osobną tablkę Jeżeli posiadasz Excela powyżej wersji 10 :?: to tego typu efekt jak na zrzucie 1047238 możesz uzyskać poprzez utworzenie tabelki połączonej (łącza z danymi z tabelek "kierunkowych" np w ukrytym...
https://support.office.com/pl-pl/article...
Propozycja rozwiązania w załączniku. Oczywiście zakresy tablic użyte w funkcjach trzeba sobie dostosować.
Jeżeli z zakresu U38:AU38 pozbyć się scalania komórek oraz w każdą z nich wpisać wartości formatu albumu to można użyć następującej formuły: [syntax=text]=SUMA.ILOCZYNÓW((D4=U38:AU3...
Zobacz w załączniku. Trzeba zastosować ADR.POŚR, bo funkcja SUMA.JEŻELI obsługuje tylko pojedyncze arkusze. Dodałem JEŻELI.BŁĄD, bo arkuszy jest faktycznie 3, a formuła przewiduje 71. Można pominąć, jak błędów nie będzie, a arkuszy dokładnie tyle co wpisane do wzoru.
W Excelu wciśnij ALT+F11
A nie możesz wyniki przenieść na drugi arkusz? Wtedy tylko zmieniasz formułę: =LEWY(Arkusz1!A1;2) =PRAWY(Arkusz1!A1;DŁ(Arkusz1!A1&... Czy musisz na tym samym arkuszu kategorycznie pozostać? EDIT: Zrobiłem specjalnie dla Ciebie makro ;) [syntax=vb]Sub Prostokąt1_Kliknięcie() koniec = Range("A1").End(xlDown).Row Application.ScreenUpdating...
Pomyliły Ci się funkcje - WYSZUKAJ w tym przypadku może zwrócić albo "W" albo błąd - nigdy nie zwróci liczby! Prawdopodobnie chciałaś użyć funkcji SZUKAJ.TEKST (nie rozróżnia wielkości liter) albo ZNAJDŹ (rozróżnia wielkość liter). Jeśli wzorców jest kilka to raczej ILE.LICZB, a nie CZY.LICZBA. W sumie coś takiego (tablicowo, chyba że Excel 365): [syntax=text]=JEŻELI(ILE.LICZB(SZUKAJ.TE...
Użyj funkcji [url=http://office.microsoft.com/pl-pl/e... i wytnij z jej wyniku nazwę arkusza.
Spróbuj w nawiasach kwadratowych.
witaj Obejrzyj plik, który posłałem na pw
Wróć do przecinków i zmień typ wykresu z liniowego na punktowy (z punktami połączonymi prostymi liniami).
Nie mam wideoporadnika :). Spróbój zrozumieć po fotkach. otwórz w swoim pliku edytor VBA (to już podobno umiesz) Prawoklik na "VBA Project(twój_ plik.xle)" plik. wybierz insert i kliknij w moduł. Zostanie dodany moduł do projektu. http://obrazki.elektroda.pl/4994262000_1... Kliknj dwukrotnie w moduł i wpisz tam kod funkcji (jak poniżej) http://obrazki.elektroda.pl/6889364700_1...
Przykład z formułą opartą na funkcjach wyszukiwania/adresu.
Najwyższą wartość znajdziesz stosując funkcję MAX. Pozycję w tablicy funkcją PODAJ.POZYCJĘ. Znając pozycję funkcją INDEKS przedstawiasz wartość z innej kolumny (tablicy). Np wyszukanie imienia najwięcej zarabiającego =INDEKS(B9:B18;PODAJ.POZYCJĘ(... Dla najmniej, jak się łatwo domyśleć podstawiasz...
Gdybyś miał jednakowe ceny, wtedy SUMA.WARUNKÓW()*SUMA.WARUNKÓW(), ale nie są. Najprościej: wydzielić kolumnę pomocniczą, wymnożyć w niej C*D i dopiero sumować warunkowo...
Masz w formule w jednym miejscu zły zakres podany. Poza tym typ porównania jeszcze trzeba dołożyć w tym przypadku jako parametr. Ogólnie dla komórki AA3 wpisałbym tak: =INDEKS(AS$3:AS$28;PODAJ.POZYCJĘ($Z3;$AR... Z czego poprawiłem zakres na AS3:AS28 (miałeś AS1:AS26, czyli wybierałeś z pustych pól na początku), do tego na końcu formuły przybyło...
Można tak:[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 And Target.Row > 1 Then For Each c In Target If c.Value = "" Then Cells(c.Row, "B").Value = "" Else Cells(c.Row, "B").Value = Date End If Next c End If End Sub [/syntax]
dla Adres to nie dobrze, poniewaz nie zawsze wybor bedzie dobry Wystarczy tylko zakres Nazwa, Adres z pomocy funkcji WYSZUKAJ.PIONOWO
Zależy ci na konkretnych wartościach czy może być suma tych liczb? Bo jeżeli suma liczb to wykorzystaj funkcję Suma.jeżeli()
Uzupełnię pytanie kolegi yogi009 Ile maksymalnie wierszy liczy grupa? W załączniku przykład dla trzech. Ograniczeniem jest maksymalna ilość zagnieżdżeń funkcji JEŻELI.
Wykorzystaj tabelę przestawną. A jeżeli funkcją to suma.warunków()
I co dalej z tym zielonym zaznaczeniem? Ma pozostać na stałe? Jeśli tak, to zobacz nowy załącznik.
Witam, Podpowie ktoś jak "permanentnie" można zmienić pozycję edytora/podpowiedzi funkcji w Excel? https://obrazki.elektroda.pl/8205552000_... Jak na załączonym zdjęciu zawsze pojawia się w miejscu opisu kolumn przez co za każdym razem muszę ją przesuwać - jest to dość irytujące. Będę wdzięczny za każdą sugestię ;-)
Jeżeli nazwiska są w oddzielnych komórkach to wystarczy funkcja np =jeżeli.....
zmienić fUnkcję Lewy() na Fragment.tekstu()
Zmień żeby ostatnia komórkę pobrało np. z kolumny 1 lub najpierw niech wstawi nowe kolumny później OstSpend [syntax=vb] Windows("tabela").Activate Columns("D:E").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove OstSpend = Cells(Rows.Count, 6).End(xlUp).Row Range("D1") = "KolumnaX" Range("E1") = "KolumnaY" Range("D2:D" & OstSpend).FormulaR1C1...
excel funkcja funkcja excel adres excel funkcja indeks
szarpie wymianie pompy tętnienia napięcia przetwornicy wskazania wilgotności
toshiba 32l4353d toshiba 32l4353d
Szlifierka Parkside PWS 125 G6 - włącza się i wyłącza Wzmacniacz Rotel: Cichy lewy kanał, jak podłączyć tuner?