Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1716to1720
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1716to1720
1716to1720
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Summenbildung mit Zielwert

Summenbildung mit Zielwert
10.10.2019 16:23:11
Daniel
Ich habe folgendes Excelproblem und suche eine möglichst elegante Lösung dafür.
Die Zellen A1:A100 enthalten unterschiedliche Zahlen, die Zellen B1 und B2 enthalten jeweils einen Sollwert.
Jetzt geht es darum, den Bereich A1:A100 in zwei Bereiche so aufzuteilen, dass die Summe der enthaltenen Zahlen für Bereich 1 möglichst nah an Zielwert 1 und für Bereich 2 möglichst nah an Zielwert 2 liegt. Dabei sind sowohl Abweichungen nach oben als auch nach unten erlaubt. Wichtig ist nur, dass der Betrag der Abweichung jeweils möglichst gering ist.
Die beiden Bereiche müssen dabei nicht aus untereinanderliegenden Zellen bestehen. Wichtig ist nur, dass alle Zellen jeweils einmal berücksichtigt werden (entweder im Bereich 1 oder 2).
Ob die beiden dabei ausgewählten Bereiche farblich markiert, die enthaltenen Zahlen in anderen Spalten ausgegeben, oder ob die Bereiche über eine andere Lösung identifiziert werden ist für die Lösung egal. Es geht lediglich um die Identifikation der Bereiche.

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
per Formel geht das weder elegant noch überhaupt
10.10.2019 17:05:45
WF
Hi,
wäre eigentlich eine SOLVER-Lösung; bei 100 Zahlen (schon weit früher) gibt der aber den Geist auf.
WF
vielleicht VBA ?
Die Aufgabenformulierung ist unsinnig, ...
10.10.2019 17:32:09
lupo1
... denn nach ihr soll (als dritte unausgesprochene Eigenschaft)
=SUMME(A1:A100) möglichst nah an =SUMME(B1:B2) sein.
Da jedoch alle 102 Zahlen Eingabewerte sind und keine Resultate oder mit sonstigen Eigenschaften, ist das weder gewollt, noch gekonnt.
AW: Summenbildung mit Zielwert
10.10.2019 17:33:52
Daniel
ich sage mal: das ist mit Excel nicht möglich.
im Prinzip müsstest du alle möglichen Gruppeneinteilungen durchtesten und das sind 2^100 Möglichkeiten.
du müsstest hier schon eine intelligente Suchstrategie, welche nicht auf das durchtesten aller Möglichkeiten angewiesen ist, anwenden.
Sowas wirst du nicht für lau bekommen.
Gruß Damiel
Anzeige
AW: Summenbildung mit Zielwert
10.10.2019 17:57:55
ChrisL
Hi Daniel
2^100 =
10715086071862673209484250490600018105614048117055336074437503883703510511249361224931983788156958581275946729175531468251871452856923140435984577574698574803934567774824230985421074605062371141877954182153046474983581941267398767559165543946077062914571196477686542167660429831652624386837205668069376
Zusätzliche Spalte =ZUFALLSZAHL()
SUMMEWENN die Zufallszahl kleiner 0.5 ist.
(quasi ein zufälliges WAHR/FALSCH)
Wenn das Ergebnis halbwegs zufriedenstellend ist, speicherst du dir die Lösung und sonst drückst du die F-Taste zur Aktualisierung. Was ich hier vorschlage ist ein kleiner Zufallsgenerator (den man ggf. per VBA auch noch automatisieren kann).
cu
Chris
Anzeige
AW: Summenbildung mit Zielwert
10.10.2019 18:33:24
Daniel
HI Chris
das wäre meiner Einschätzung nach der einzig mit Excel machbare Weg, sich einem brauchbaren Ergebnis anzunähern, auch wenn es vielleicht nicht zwingend das bestmögliche Ergebnis liefert.
da man jedoch eine Durchläufe benötigen wird, sollte man das ganze VBA unterstützen.
Gruß Daniel
AW: Summenbildung mit Zielwert
10.10.2019 18:41:19
Daniel
Hier mal ein Makro dazu (vollständige Markolösung)
Sub test()
Dim arrA
Dim arrB
Dim GruppenSumme(1 To 2)
Dim Ziel(1 To 2) As Double
Dim Grp As Long
Dim Erg
Dim Abw As Double
Dim AbwMin As Double
Dim z As Long, i As Long
arrA = Range("A1:A100").Value
ReDim arrB(1 To UBound(arrA))
AbwMin = 10 ^ 300
Ziel(1) = Range("B1").Value
Ziel(2) = Range("B2").Value
For i = 1 To 5000
With WorksheetFunction
GruppenSumme(1) = 0
GruppenSumme(2) = 0
For z = 1 To UBound(arrA, 1)
Grp = .RandBetween(1, 2)
arrB(z) = Grp
GruppenSumme(Grp) = GruppenSumme(Grp) + arrA(z, 1)
Next
Abw = Abs(.Min(GruppenSumme) - .Min(Ziel)) + Abs(.Max(GruppenSumme) - .Max(Ziel))
If Abw

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige