Hallo,
ich habe ein Formular über eine UserForm erstellt.
Diese UserForm beinhaltet unter anderen vier einzelne Objektfelder als Angabe der Bezahlmethode. Quasi so:
Vorkasse
Paypal
Überweisung
Rechnung
Die Eingabe soll danach in eine Excelliste in die letzte Zeile eingetragen werden. Das klappt auch soweit.
Ich habe es wie folgt programmiert, aber da muss wohl ein Fehler drin sein. Ich weiss nur leider nicht wo und hoffe auf Eure Hilfe.
Cells(last, 8).Value = IIf(ob_1 = True, "Vorauskasse", 0)
Cells(last, 8).Value = IIf(ob_2 = True, "Paypal", 0)
Cells(last, 8).Value = IIf(ob_3 = True, "Überweisung", 0)
Cells(last, 8).Value = IIf(ob_4 = True, "Rechnung", 0)
Übertragen wird ausschließlich das Wort Rechnung, die anderen drei Optionen überträgt er nur mit einer 0. Aber auch hier soll er jeweils den Text (Vorauskasse, Paypal, Überweisung) übernehmen.
Wo ist mein Fehler?
Ich danke Euch vielmals.
VG Marijke
|