Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
220to224
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
220to224
220to224
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Anzahl CheckBoxen als Zahl ausgeben

Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 20:55:34
H.-Udo
Hallo,

Ich möchte die Anzahl der angeklickten Checkboxen in einem Label als Zahl anzeigen lassen.
Wie kann ich das anstellen?

Beispiel:
5 von 36 Chexkboxen sind "value=true"
Label5.Caption = 5

Vielen Dank im Voraus

H.-Udo


6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 21:56:46
gordon

Hallo H.-U.

prinzipiell müsste es einfach über eine Summe der checkboxen gehen.
Label5.Caption = Checkbox1.value + Checkbox2.value ...
Falls alle Checkboxen in einem Frame liegen kann auch mit for each obj in ... und Ermittlung des Objekttyps die Summe bestimmt werden.

Gruß
gordon

Re: Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 21:56:47
gordon

Hallo H.-U.

prinzipiell müsste es einfach über eine Summe der checkboxen gehen.
Label5.Caption = Checkbox1.value + Checkbox2.value ...
Falls alle Checkboxen in einem Frame liegen kann auch mit for each obj in ... und Ermittlung des Objekttyps die Summe bestimmt werden.

Gruß
gordon

Anzeige
Re: Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 21:56:47
gordon

Hallo H.-U.

prinzipiell müsste es einfach über eine Summe der checkboxen gehen.
Label5.Caption = Checkbox1.value + Checkbox2.value ...
Falls alle Checkboxen in einem Frame liegen kann auch mit for each obj in ... und Ermittlung des Objekttyps die Summe bestimmt werden.

Gruß
gordon

Re: Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 22:50:59
L.Vira

sub test()
dim tb as object, Z as integer
for each tb in me.controls
if typename(tb) = "TextBox" then
if tb = true then
z = z +1
end if
end if
next
Label1 = z
end sub

Re: Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 22:51:00
L.Vira

sub test()
dim tb as object, Z as integer
for each tb in me.controls
if typename(tb) = "TextBox" then
if tb = true then
z = z +1
end if
end if
next
Label1 = z
end sub

Anzeige
Re: Anzahl CheckBoxen als Zahl ausgeben
17.02.2003 22:51:05
L.Vira

sub test()
dim tb as object, Z as integer
for each tb in me.controls
if typename(tb) = "TextBox" then
if tb = true then
z = z +1
end if
end if
next
Label1 = z
end sub

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige