Office: (Office 2010) VBA (?) Teilbarkeit durch 2 ohne Rest

Hallo nochmal :)

Wie schaffe ich es in Excel, eine Formel oder ein VBA Script zu schreiben, dass folgende Berechnung anstellt:

Wenn in Zelle A1 der Wert "Banane, Apfel oder Melone" vorhanden ist, soll er den Wert der Zelle B1 prüfen, ob dieser größer oder gleich 0,02 ist.
Wenn dies der Fall ist, soll er weiterhin prüfen, ob dieser Wert ohne Rest durch zwei teilbar ist und wenn ja, diesen durch zwei teilen. Wenn das Teilen durch zwei ohne Rest nicht möglich ist, soll er die Zahl auf die nächste durch zwei teilbare Zahl aufrunden und diese anschließen durch zwei teilen. z.B 0,03 auf 0,04 aufrunden und dann geteilt durch zwei = 0,02. Das Ergebnis soll dann in Zelle C1 erscheinen.

Wenn in Zelle A1 hingegen der Wert "Gurke, Tomate oder Karotte" vorhanden ist, soll er den Wert der Zelle B2 prüfen, ob dieser größer oder gleich 0,2 ist (also eine Dezimalstelle weniger) und anschließend nach dem selben Prinzip wie bei dem Obst vorgehen. (0,3 auf 0,4 aufrunden und dann durch zwei teilen). Auch hier soll das Ergebnis dann in Zelle C1 erscheinen.

Ich hoffe, ich konnte mein Anliegen verständlich formulieren und bedanke mich bereits im Voraus für jede hilfreiche Antwort!

MfG

roger

Kurze Ergänzung: Wenn es sich um Obst handelt, ist der Wert immer mindestens 0,02 (also zwei Dezimalstellen). Bei Gemüse ist es immer eine Dezimalstelle, also 0,2

 

Hallo roger,

die Formel überlass ich den Spezies ;O)

Aber mir ist folgendes direkt aufgefallen:
1. müstest Du prüfen bzw. sicherstellen, dass Deine 0,02 auch wirklich 0,02 und nicht eventuell 0,019 ist. Wo kommen die Werte her und wie sind die Zellen formatiert? Nicht dass der Zellwert durch die Anzeigeformatierung auf zwei Nachkommastellen gerundet wird. ;O)
2. 0,03 ist durch 2 teilbar = 0,015 >>> das willst Du aber nicht, deshalb vermute ich aus dem Stehgreif, dass es sinnvoll sein könnte Deine Zellwerte mit 100 zu multiplizieren, damit Du mit ganzen Zahlen rechnest. Das Endergebnis musst Du dann natürlich später durch 100 teilen. ;O)

 

Hallo Achim,

zu 1. ja die Werte sind definitiv ganze Werte und keine 0,020000001 oder sowas. Demnach besteht hier kein Problem.
Die Werte stehen in einer Tabelle und die Zellen sind als Standard formatiert. Anzeigenformatierung geht bis zwei Nachkommastellen.

zu 2. Ja, aber ich möchte dass die Zahl auf die zweite bzw. erste Nachkommastelle aufgerundet wird und dass diese Zahl dann ohne Rest durch zwei teilbar ist. Multiplizieren und anschließend Dividieren wäre kein Problem (sofern nötig), das liesse sich in anderen Zellen verstecken.

Das bedeutet, dass im Falle von "Banane, Apfel und Melone" in Zelle C1 ein durch zwei teilbarer Wert, ohne Rest mit zwei Nachkommastellen stehen muss
und im Falle von "Gurke, Tomate und Karotte" in Zelle C1 ein durch zwei teilbarer Wert, ohne Rest mit einer Nachkommastelle stehen muss.

Klingt glaube ich einfacher, als es schlussendlich ist

mfg

roger

 

Hallo,

vielleicht passt das so:

Arbeitsblatt mit dem Namen 'Tabelle1'
*	A	B	C
1	Banane	0,03	0,02
2	Apfel	0,04	0,02
3	Melone	0,01	0
4	Gurke	0,3	0,2
5	Tomate	0,4	0,2
6	Karotte	0,1	0

Zelle	Formel
C1	=AUFRUNDEN(ODER(A1={"Apfel";"Banane";"Melone"})*(B1>=0,02)*B1/2;2)+AUFRUNDEN(ODER(A1={"Gurke";"Karotte";"Tomate"})*(B1>=0,2)*B1/2;1)

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

 

Das liesst sich schon Mal sehr gut!
Ich werde das nachher überprüfen und Rückmeldung geben.
Danke schonmal!!

 

Funktioniert exakt so wie ich es mir vorgestellt habe!

Danke dir, BoskoBiati!

mfg roger

 

Ist es möglich, noch folgende Funktion in die Formel einzubauen? :

Wenn Banane, Apfel oder Melone dann Endergebnis *100000 ?

 

??????????????????????

 

Damit meine ich, dass das Ergebnis der Berechnung von "Banane, Apfel oder Melone" mit 100000 multipliziert wird. z.B. 0,02 *100000

Aber nur von Banane, Apfel oder Melone.

Das Ergebnis von Gurke, Tomate, Karotte soll unberührt bleiben

 

Hallo,

es würde reichen, wenn Du Formelauswertung nutzen würdest, dann wüsstest Du, das man den 1.Term mit 10^5 multiplizieren muß!

 

Hallo Bosko, danke nochmal und entschuldige meine laienhafte Herangehensweise an die Sache. Aber ich bin nunmal Anfänger was Excel angeht, daher kenne ich mich nicht so gut aus! Deshalb frage ich ja :)

MfG roger

 

Hallo,

Du hast in der Formel zwei Terme, die addiert werden. Das kannst Du in der Formelauswertung nachvollziehen. Der mit dem Obst muß mit 10^5 multipliziert werden. Du willst ja was lernen.

 

Genau. Habe 10^5 an der richtigen Stelle eingefügt und nun funktioniert alles perfekt!
Danke dir!