31. juli 2008 - 13:41Der er
7 kommentarer og 1 løsning
Sumif over flere ark!
Hej Eksperter,
jeg har en fil, hvor jeg ønsker at lave sumif over flere ark. Først har jeg en række ark, som skal summeres i et sumark. Her har jeg anvendt følgende formel;
=+SUM(FI:Rest!B2)
Men nu ønsker jeg en "DELSUM", hvor den kun summer celle B2 i ark, hvor celle B28 = 6.
Virksomheder er på vej fra store sprogmodeller, der svarer på spørgsmål, til AI-agenter, der kan udføre opgaver på egen hånd. Det gør teknologien mere nyttig – og langt mere risikabel.
Du kan ikke lave SUM:HVIS over flere ark. Den nemmeste løsning er at lave SUM.HVIS på hvert enkelt ark (i samme celle), og derefter lægge alle disse celler sammen på det ark, hvor du har brug for resultatet.
På hvert ark (fx i c1) som skrevet af Ebea: =SUM.HVIS(B28;6;B2)
og på samlearket =sum(Ark1:Ark??!C1), hvor ?? erstattes med dit suidste ark.
>jkrons< Som jeg har forstået det, er hans summeringer samlet på hvert ark, hvis kriteriet i B2 er opfyldt, da han skriver "hvor celle B28=6", og det var en "delsum" han ville lave. Men han vender nok tilbage, hvis det er forkert.
Tja, forsøgene er fine - men jeg må nok hellere uddybe. Jeg har omkring 20 ark med forskellige kunder. Disse summeres op til en total med formlen: =+SUM(FI:Rest!B2).
Kunderne (alle grundark) er således; FI, JI, PI..., Rest. Kunderne har differentieret betalingsbetingelser i grupperne 1-6. Pt kan jeg kun lave disse delsummer ved at stille fanerne i rangorden efter deres betalingsbetingelser også lave en delsum via SUM(FI:JI!B2) og derefter SUM(PI:Rest!B2). Det forudsætter jo selvfølgelig at fanerne altid kommer i den rigtige rækkefølge, hvilket jeg gerne ville undgå.
Derfor skal alle fanerne mellem FI og Rest gerne kunne summes via betalingsbetingelsen, som altid står i celle B28. Hvis det ikke er muligt, at lave en sumif over flere faner, så kan det nok ikke løses, men da det jo er muligt at lave fx Large-formel over flere så håbede jeg også her...
Function minSum() Application.Volatile For t = 1 To Sheets.Count If Sheets(t).Cells(28, "B") = 6 Then tal = tal + Sheets(t).Cells(2, "B") Next minSum = tal End Function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.