Text mit Hilfe von Optionsfeld in Zelle schreiben

Computer: Software & Programmierung Office Software
1

Hallo, liebe Excel-Experten,

ich habe eine UserForm erstellt, um die Daten zu einem Datensatz einfacher in eine recht unübersichtliche Tabelle eingeben zu können. Die Übernahme der Textfelder in die entsprechenden Zellen klappt. Hierzu noch eine Frage: Ist es möglich, die Textfelder so zu formatieren, dass dort nur Zahlen eingegeben werden können?
Nun aber zum eigentlichen Problem: Meine UserForm enthält auch mehrere Optionsfelder. Je nachdem, welche Option angeklickt ist, soll ein bestimmter Text in einer Zelle erscheinen. Wie kann ich das realisieren?
Ich nutze Excel 2007 und bin VBA-Anfänger.
Schon jetzt vielen Dank für eure Antworten.

2

Hallo Mondstein,

Hierzu noch eine Frage: Ist es
möglich, die Textfelder so zu formatieren, dass dort nur
Zahlen eingegeben werden können?

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii 57 Then KeyAscii = 0
End Sub

Nun aber zum eigentlichen Problem: Meine UserForm enthält auch
mehrere Optionsfelder. Je nachdem, welche Option angeklickt
ist, soll ein bestimmter Text in einer Zelle erscheinen.

Private Sub OptionButton1_Click()
Range(„A1“) = „Text1“
End Sub

Private Sub OptionButton2_Click()
Range(„A1“) = „Text2“
End Sub

Gruß
Reinhard