Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema OptionButton
BildScreenshot zu OptionButton OptionButton-Seite mit Beispielarbeitsmappe aufrufen

if then in VBA

    Betrifft: if then in VBA von: doris
    Geschrieben am: 26.08.2003 14:40:20

    Ciao!

    ich versuche gerade einen if then verweis in VBA zu schreiben. die bedingung soll auf eine option zurückgreifen, die ich mittels optionsbutton in einer userform erstellt habe - doch wie kann ich auf eine userform zurückweisen!?

    if userform1.optionButton1.value = true then zinssatz = basiszinssatz
    if userform1.optionbutton2.value = true then zinssatz = basiszinssatz*(-1)

    kann das so funktionieren!?

      


    Betrifft: AW: if then in VBA von: GerdW
    Geschrieben am: 26.08.2003 14:44:30

    Nehme an, zinssatz und basiszinssatz sind (hoffentlich richtig)
    deklarierte Variable?

    if Me.optionButton1 then zinssatz = basiszinssatz
    if Me.optionbutton2 then zinssatz = basiszinssatz*(-1)

    Gerd


      


    Betrifft: AW: if then in VBA von: Nike
    Geschrieben am: 26.08.2003 14:44:56

    Hi,

    kleiner Download Tip in dem Donwloadbereich von Hans, das hier:
    http://www.excel-cd.de/downloads/xlBasics.zip

    ich würde es wohl eher so schreiben
    if me.optionButton1.value = true then
    me.zinssatz = basiszinssatz
    end if
    if me.optionbutton2.value = true then
    me.zinssatz = basiszinssatz*(-1)
    end if
    ich gehe davon aus, das zinssatz ein Textfeld ist...


    Bye

    Nike


      


    Betrifft: AW: if then in VBA von: Michael Scheffler
    Geschrieben am: 26.08.2003 14:47:53

    Hi,

    die Userform muss geladen sein und dann kannst Du auf Ihre Objekte und Methoden zugreifen.

    Innerhalb der UserForm z.B.:

    If Me.OptionButton1 Then Zinsatz = Basiszinsatz

    (Me. bedeutet die UF, kann aber weggelssen werden; Standard beim OptionButton ist Value, kann weggelassen werden und True ist sowieso True)

    Oder Du musst Die Usrform mit Me.Hide vom Bildschrim löschen und dann die Werte außerhalb zuweisen:

    If frmZins.OptionButton1 Then Zinsatz = Basiszinsatz

    Da geht aber nur, wenn Du die Form nichtmodal anzeigst, damit er in den aufrufenden Code zurückspringt, die Forum musst Du dann mit Unload killen.

    Gruß

    Micha


      


    Betrifft: AW: if then in VBA von: doris
    Geschrieben am: 26.08.2003 14:59:25

    Danke burschen, funktioniert super