Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: CheckBox Eintrag in Liste

CheckBox Eintrag in Liste
11.02.2019 13:11:46
Michael
Hallo,
ich habe eine UserForm mit Textfeldern, OptionButtons und auch Checkboxen. Bei Klick auf Speichern werden entsprechende Daten in die Excel Liste eingefügt.
Nun zu den CheckBoxen: Wenn ich die erste CheckBox nicht auswähle, die folgenden allerdings schon, dann ist vor dem ersten Wert ein Komma.
Gibt es eine elegante Möglichkeit das Komma zu entfernen, wenn vorherige Optionen nicht gewählt sind. Normalerweise soll das Komma die verschiedenen Begriffe trennen, wenn die vorherige Option allerdings nicht ausgewählt ist, soll es nicht auftauchen.
Momentan sieht es so aus, vielleicht kann mir ja jemand helfen:
If CheckBox_RD.Value = True Then Cells(last, 7).Value =
CheckBox_RD.Caption
If CheckBox_FW.Value = True Then Cells(last, 7).Value =
Cells(last, 7).Value & " , " & CheckBox_FW.Caption
If CheckBox_POL.Value = True Then Cells(last, 7).Value =
Cells(last, 7).Value & " , " & CheckBox_POL.Caption
If CheckBox_KV.Value = True Then Cells(last, 7).Value =
Cells(last, 7).Value & " , " & CheckBox_KV.Caption
If CheckBox_PD.Value = True Then Cells(last, 7).Value =
Cells(last, 7).Value & " , " & CheckBox_PD.Caption
If CheckBox_BZP.Value = True Then Cells(last, 7).Value =
Cells(last, 7).Value & " , " & CheckBox_BZP.Caption

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CheckBox Eintrag in Liste
11.02.2019 13:25:25
ede
Hallo Michael,
dann setzt doch das " ," immer hinten ran!
gruss
ede
AW: CheckBox Eintrag in Liste
11.02.2019 13:36:51
Daniel
HI
setze das Komma immer vorne dran und entferne dann das erste Komma.
If CheckBox_RD.Value = True Then Cells(last, 7).Value = " , " & CheckBox_RD.Caption
If CheckBox_FW.Value = True Then Cells(last, 7).Value = Cells(last, 7).Value & " , " & CheckBox_FW.Caption
...
Cells(last, 7).Value = Mid(Cells(last, 7).Value, 4)
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige