Live-Forum - Die aktuellen Beiträge
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
Inhaltsverzeichnis

Vielfaches

Vielfaches
08.10.2019 17:45:50
Marco
Hallo zusammen,
ich habe folgende Frage:
Behälterfüllmenge 80 Füllmenge Vormaterial aktuell 11 Zukunft 10
Behälterfüllmenge 16 Füllmenge Vormaterial aktuell 20 Zukunft 16
Wie kann ich den Zukunftswert ermitteln, der Wert sollte ein vielfaches aus der Behälterfüllmenge sein und immer kleiner oder gleich der aktuellen Menge sein?
Eine gerade und nie eine ungerade Zahl darstellen.
Geht das überhaupt?
Besten Dank.
Marco

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Vielfaches
08.10.2019 17:58:13
Regina
Hi,
ein Vielfaches sollte doch immmer mehr als der Basiswert sein und nicht kleiner oder gleich?
gruß
Regina
AW: Vielfaches
08.10.2019 18:06:18
Marco
Hi, danke, dann liege ich geistig daneben. Welchen Ansatz muss ich gehen um mein gewünschtes Ergebnis zu erreichen?
AW: Vielfaches
08.10.2019 18:37:53
Regina
.. das kann ich Dir nicht sagen, rechnen kann man vieles, nur die Regeln müssen klar sein. Wie man von 11 zu 10, oder von 20 zu 16 kommt dafür gibt es viele Wege ....
AW: Vielfaches
08.10.2019 18:45:46
ChrisL
Hi Marco
Eine etwas grössere Daten-/Beispielmenge wäre hilfreich.
Auf eine gerade Zahl abrunden kannst du z.B. so...
=WENN(REST(B1;2)=1;B1-1;B1)
Beispiel 2 (16/20) wäre m.E. eine Wenn-Funktion
=WENN(B1>=A1;A1;"sonst")
Beispiel 1 (80/10) könnte der "grösste gemeinsame Teil" sein.
=GGT(A1;B1)
Falls dem so ist, dann müsste man die Formeln nur noch ineinander verschachteln.
cu
Chris
Anzeige
AW: Vielfaches
09.10.2019 08:36:19
Marco
Hallo Chris,
besten Dank, ich versuche es mit einem größerem Bsp.
Userbild
Besten Dank
AW: Vielfaches
09.10.2019 10:03:19
ChrisL
Hi Marco
Jetzt haben wir schon ganze 4 Datenbeispiele. Etwas dünn, für die Puddingprobe.
Alt+F11, Einfügen, Standardmodul, Code reinkopieren. Danach wie eine Formel verwenden
=Ingendwas(D1;F1)
Function Irgendwas(lngBeh As Long, lngAkt As Long) As Long
Dim i As Long
Application.Volatile
If lngAkt Mod 2 = 1 Then lngAkt = lngAkt - 1
If lngAkt > lngBeh Then
For i = lngAkt To 0 Step -2
If i / lngBeh = WorksheetFunction.Round(i / lngBeh, 0) Then
Irgendwas = i
Exit Function
End If
Next i
Else
For i = lngAkt To 0 Step -2
If lngBeh / i = WorksheetFunction.Round(lngBeh / i, 0) Then
Irgendwas = i
Exit Function
End If
Next i
End If
End Function
cu
Chris
Anzeige
AW: Vielfaches
09.10.2019 10:19:03
Marco
Chris, tausend DANK.
Wahnsinn, ich verstehe zwar Null, aber es funktioniert.
Hast du eine Buchempfehlung wie ich das lernen kann?
Besten Dank.
AW: Vielfaches
09.10.2019 10:51:39
ChrisL
Hi Marco
Ich kann dir selber nichts empfehlen, da ich nicht lese :)
(schau mal im Archiv, da die Frage nach Literatur schon öfters gekommen ist)
Zum Start würde ich aber einfach mal ein kleines Projekt nehmen (z.B. Eingabemaske Userform) und ein Youtube-Video schauen. Bei Bedarf kannst du dich dann immer noch mit Fachbüchern eindecken.
cu
Chris

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige