sgaah Skrevet 10. desember 2015 Del Skrevet 10. desember 2015 Heisann, til nå har mine excel kunnskaper passet mitt bruk. Men nå nylig så har jeg fått ett litt mer komplisert behov som jeg ikke helt klarer å løse. Håper det er noen som har en god løsning på mine utfordringer. Jeg har ett regnark hvor jeg holder oversikt over resultater og vil gjere kunne hente ut topp 5 resultatene pr utøver og summeres disse i en celle. Det kan fort bli 15-20 resultater pr person, men som sagt så vil jeg ha topp 5 pr person summert sammen i en egen celle. Hver utøver sine resultater er på hver sin linje, men ikke i celler etterhver andre. Eks, utøver 1. B2,E2,L2,O2,T2,X2 osv Jeg har prøvd å prøvd men ikke søren om jeg får det til. Etter mye leting på nettet kom jeg frem til en formel som såg ut til å være midt i blinken for meg, men får det fremdeles ikke til. Den jeg har brukt går som følger, =SUMPRODUCT(LARGE(B4;E4;I4;L4;R;4,{1,2,3})) Kunne sikkert hvert bedre forklart men håper at dere forstår hvor jeg vil. Krysser fingrene for at noen der ute har ett forslag til løsning Lenke til kommentar
mobile999 Skrevet 10. desember 2015 Del Skrevet 10. desember 2015 =SUMPRODUCT(LARGE({B4;E4;I4;L4;R;4},{1,2,3})) ? Lenke til kommentar
sgaah Skrevet 10. desember 2015 Forfatter Del Skrevet 10. desember 2015 =SUMPRODUCT(LARGE({B4;E4;I4;L4;R;4},{1,2,3})) ? Jeg ser at du har { rundt cellene til forskjell hva jeg har, men virker det hos deg? Ikke snakk om at jeg får dette til. Har prøvd Excel 2010 og Excel online.... Vist det virker, kunne du vert så snill å gitt meg en kjapp gjennomgang for dummies Lenke til kommentar
mobile999 Skrevet 10. desember 2015 Del Skrevet 10. desember 2015 (endret) Det var visst en semikolon-feil der. Det skal virke: =SUMPRODUCT(LARGE({B4;E4;I4;L4;R;4},{1,2,3})) =SUMPRODUCT(LARGE({B4;E4;I4;L4;R4},{1,2,3})) Den siste virker hos meg. Du vil få feilmelding hvis du ikke har verdier i minst 3 av cellene {B4;E4;I4;L4;R4}. Endret 10. desember 2015 av mobile999 Lenke til kommentar
sgaah Skrevet 10. desember 2015 Forfatter Del Skrevet 10. desember 2015 Merkelige greier.... Hvilken utgave av excel bruker du? Når jeg har skrevet ferdig denne formelen så skal jeg trykke Ctrl+shift+Enter? Jeg begynner å skrive inn formelen for så å holde nede crtl når jeg velger dei aktuelle cellene. Nå som jeg skriver inn { } rundt dei valgte cellene så forsvinner fargen på disse cellene (dårligt forklart, men satser på at du skjønner). Kanskje påtide med ett litt excel kurs.... Lenke til kommentar
mobile999 Skrevet 10. desember 2015 Del Skrevet 10. desember 2015 Jeg brukte google docs for å teste ovenfor. Det virker selvfølgelig ikke i Microsoft Excel. Det er large-funksjonen som ikke virker som forventet (i første omgang).Eksempel:=LARGE({6, 23, 5, 2.3}, 2)hentet fra følgende nettside gir feilmelding i microsoft excel selv om nettsiden er for nettopp microsoft excel:http://www.techonthenet.com/excel/formulas/large.php Lenke til kommentar
sgaah Skrevet 11. desember 2015 Forfatter Del Skrevet 11. desember 2015 Takk for din hjelp så langt. Får vel lete litt mer rundt på nettet etter en løsning på dette. Kanskje du kan foreslå en annen løsning for å løse utfordringen som jeg har beskrevet tidligere? Lenke til kommentar
Bigelk Skrevet 11. desember 2015 Del Skrevet 11. desember 2015 (endret) Takk for din hjelp så langt. Får vel lete litt mer rundt på nettet etter en løsning på dette. Kanskje du kan foreslå en annen løsning for å løse utfordringen som jeg har beskrevet tidligere? Hei. Kan lage en egen formel (funksjon) sikkert ikke den beste løsningen. men fungerer du kan åpne vba editoren med Alt + F11 trykk på insert. velg modul. lim inn det under her. (koden) hvis resultatene står i f.eks celle A1:A10 skriver du "=sumFiveBiggest(A1:A10)" i cellen du vil ha svaret ditt SumFiveBiggest fungerer da som en formel Option ExplicitOption Base 1Function sumFiveBiggest(y As Range) Dim tempArr() As Variant, theR As Range, cel As Range, i As Double, r As Long, x As Double Set theR = y i = 0 For Each cel In theR i = i + 1 Next cel ReDim tempArr(i) r = 1 For Each cel In theR tempArr® = cel.Value r = r + 1 Next cel QuickSort tempArr, LBound(tempArr), UBound(tempArr) x = 0 For r = LBound(tempArr) To UBound(tempArr) If r > i - 5 Then x = x + tempArr® End If Next r sumFiveBiggest = x Erase tempArrEnd FunctionFunction QuickSort(arr, Lo As Long, Hi As Long) Dim varPivot As Variant, varTmp As Variant, tmpLow As Long, tmpHi As Long tmpLow = Lo tmpHi = Hi varPivot = arr((Lo + Hi) \ 2) Do While tmpLow <= tmpHi Do While arr(tmpLow) < varPivot And tmpLow < Hi tmpLow = tmpLow + 1 Loop Do While varPivot < arr(tmpHi) And tmpHi > Lo tmpHi = tmpHi - 1 Loop If tmpLow <= tmpHi Then varTmp = arr(tmpLow) arr(tmpLow) = arr(tmpHi) arr(tmpHi) = varTmp tmpLow = tmpLow + 1 tmpHi = tmpHi - 1 End If Loop If Lo < tmpHi Then QuickSort arr, Lo, tmpHi If tmpLow < Hi Then QuickSort arr, tmpLow, HiEnd Function[code]\ Endret 11. desember 2015 av Bigelk Lenke til kommentar
H. Specter Skrevet 11. desember 2015 Del Skrevet 11. desember 2015 =SUMPRODUCT(LARGE(A1:A15;{1,2,3,4,5}))=SUMMERPRODUKT(N.STØRST(A1:A15;{1,2,3,4,5})) Ikke noe ctrl + shift + enter. Lenke til kommentar
sgaah Skrevet 12. desember 2015 Forfatter Del Skrevet 12. desember 2015 Takk for gode innspill folkens men ikke svarte søren om jeg får til dette.... Ser forøverig at dere har valgt celler som er etter hverandre, mine data som skal sorteres befinner seg på feks. B2, D2,F2,H2,L2, osv. Lenke til kommentar
Bigelk Skrevet 14. desember 2015 Del Skrevet 14. desember 2015 Takk for gode innspill folkens men ikke svarte søren om jeg får til dette.... Ser forøverig at dere har valgt celler som er etter hverandre, mine data som skal sorteres befinner seg på feks. B2, D2,F2,H2,L2, osv. Hei. Hvis du lagrer denne og sletter .txt fra filnavnet Mvh Torbjørn sgaah2.xlsm.txt Lenke til kommentar
Anbefalte innlegg
Opprett en konto eller logg inn for å kommentere
Du må være et medlem for å kunne skrive en kommentar
Opprett konto
Det er enkelt å melde seg inn for å starte en ny konto!
Start en kontoLogg inn
Har du allerede en konto? Logg inn her.
Logg inn nå