AW: Informationen mit OptionButtons festlegen
07.04.2014 14:47:48
Oberschlumpf
Hi Andreas
ich versuch mich nun seit fast ca 1 Std an deiner Frage.
Aber leider finde ich keine Möglichkeit, deine vielen OptionButtons mit z Bsp einer Schleife so abzufragen, dass es nicht erforderlich ist, für jeden einzelnen Opt'button einen Wert zuweisen zu müssen.
Ich kann zwar eine Schleife bauen, ungefähr so
For Each alle Opt'Buttons In Tabelle1
If Opt'Button = True Then
hier is das Problem
jetzt weiß der Code zwar, welcher Opt'Button = True ist,
aber der Code weiß nicht, welchen Wert er jetzt in X4 eintragen muss
das kann der Code auch nicht wissen, weil, es hat ihm ja noch keiner gesagt :-)
End If
Next
(der obige Code funzt natürlich so nicht in Excel, aber ungefähr so müsste eine Schleife programmiert werden)
Grundsätzlich hat HaJo in seinem 2. Beitrag aber recht.
Du MUSST die %-Werte dem Code händisch mitteilen.
Entweder, du bleibst bei deiner Variante, oder du versuchst, meinen Code aus dieser Datei zu übernehmen
https://www.herber.de/bbs/user/90022.xls
In meiner Datei musst du aber noch I4 gegen X4 ändern, da ich keine Lust hatte, nach jedem Testlauf zur Zelle X4 zu "wandern".
Mein Code durchläuft in Tabelle1 alle verwendeten Controls.
Wenn Controltyp = OptionButton, und Wert = True, dann ruft Code die Function fcProcent auf.
In Abhängigkeit des Namens von OptionButton wird in der Function der von dir eingetragene Wert der Zelle I4 zugewiesen - wie gesagt, nicht vergessen, I4 gegen X4 zu tauschen.
Du musst also in der Function noch alle anderen und richtigen Werte für den jeweiligen Opt'Button eintragen.
Voraussetzung: Alle Opt'Buttons müssen heißen wie folgt:
OptionButton1,OptionButton2,OptionButton3,... usw
Hilfts?
Ciao
Thorsten