Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
508to512
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
508to512
508to512
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bessere Lösung CheckBox

Bessere Lösung CheckBox
02.11.2004 08:23:52
Chris
Hallo zusammen,
vielleicht hat ja jemand für mich ne bessere Lösung.
Ich habe 4 CheckBoxen, welche angewählt werden können, oder nicht!
Habe dies auch wie folgt recht einfach programmiert, allerdings stört mich das "/"-Zeichen, da bei meinem Code "/" vordefiniert enthalten ist, z.B:
- Funktion der Dichtung: Innenliegend / RSV / [das letzte "/" stört]
Wie könnte ich meinen Code entsprechend anpassen:
Dim dichtungsfunktion As String
If CheckBox511 = True Then
dichtungsfunktion = "Außenliegend" & " / "
End If
If CheckBox512 = True Then
dichtungsfunktion = dichtungsfunktion & "Innenliegend" & " / "
End If
If CheckBox513 = True Then
dichtungsfunktion = dichtungsfunktion & "RSV" & " / "
End If
If CheckBox514 = True Then
dichtungsfunktion = dichtungsfunktion & "Gehäuse" & " / "
End If

Cells(31, 3) = dichtungsfunktion
Vielen Dank für Eure Hilfe!
LG Chris

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

Betreff
Datum
Anwender
Anzeige
AW: Bessere Lösung CheckBox
Ramses
Hallo
Cells(31, 3) = Left(dichtungsfunktion,Len(Dichtungsfunktion)-1)
Gruss Rainer
AW: Bessere Lösung CheckBox
02.11.2004 08:33:38
Chris
Vielen Dank!
Funktioniert perfekt!!
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige