Thema Datum  Von Nutzer Rating
Antwort
Rot Überschrift OptionButton in Tabelle eintragen
04.06.2017 23:58:22 Tessaydi
Solved
05.06.2017 07:29:55 Crazy Tom
NotSolved
05.06.2017 15:41:07 Teresa
NotSolved
05.06.2017 17:51:01 Crazy Tom
NotSolved
05.06.2017 19:23:40 Teresa
Solved

Ansicht des Beitrags:
Von:
Tessaydi
Datum:
04.06.2017 23:58:22
Views:
451
Rating: Antwort:
 Nein
Thema:
Überschrift OptionButton in Tabelle eintragen

Einen schönen späten Abend :)

ich bin neu in VBA, aber was muss das muss :)

Mein Problem: 

ich habe ein UserForm in dem ich einige Textfelder habe und zwei OptionButton (männlich ; Weiblich). 

Der OptionButton wird angeklickt und dann durch einen CommandButton in eine Tabelle fortlaufend eingefügt. Bei den Textfeldern funktioniert es, aber ch verzweifle an den OptionButton.

 

Ich freue mich über jede Hilfe

Mein Code bis jetzt

Private Sub cmb_Eintrag_Click()

Dim zelle As Long

zelle = Cells(Rows.Count, 1).End(xlUp).Row + 1

Cells(zelle, 1) = TextBox1

If txt_Datum <> "" Then Cells(zelle, 1) = txt_Datum

If txt_Name <> "" Then Cells(zelle, 2) = txt_Name

If txt_Vorname <> "" Then Cells(zelle, 3) = txt_Vorname
If txt_Mail <> "" Then Cells(zelle, 4) = txt_Mail
If cmb_Dienst <> "" Then Cells(zelle, 5) = cmb_Dienst
If txt_Nummer <> "" Then Cells(zelle, 6) = txt_Nummer
If cmb_Sitz <> "" Then Cells(zelle, 7) = cmb_Sitz
If Button2 <> "" Then Cells(zelle, 8) = "weiblich"
If Button <> "" Then Cells(zelle, 8) = "männlich"


With Me

Unload Me
End With

End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Überschrift OptionButton in Tabelle eintragen
04.06.2017 23:58:22 Tessaydi
Solved
05.06.2017 07:29:55 Crazy Tom
NotSolved
05.06.2017 15:41:07 Teresa
NotSolved
05.06.2017 17:51:01 Crazy Tom
NotSolved
05.06.2017 19:23:40 Teresa
Solved