Kontrollkästchen Funktion

[matexcel]

Hallo,

ich habe folgendes Problem, ich möchte eine Excel Dokument erstellen wo auf einer Seite eine Liste mit verschiedenen Produkten abbgebildet ist die bestellt werden können. Dahinter möchte ich Kontrollkästchen setzen, das wenn ich die anklicke dieses Produkt auf eine Bestell Liste gesetzt wird. Nehmen wir mal ein Beispiel

1. Apfel
2. Birne
3. Orangen
4. Karotten
5. Mandarinen

Nehmen wir mal an ich drücke zuerst das Kontrollkästchen 1 dann 2 und dann 5. Dann sollen auf die Bestelltliste in der Reihenfolge wie ich die Kästchen aktiviert habe die Produkte erscheinen. Also dann sollte es so aussehen:

Apfel
Birne
Mandarinen


Mit freundlichen Grüßen

mat

[HeikoBerlin]

Hi matexcel
Willkommen im Forum

Bei dem Usernamen musst Du doch schon weit sein..
5 Kontrollkästchen hast Du schon? (info)

Alle bekommen z.B. per RechtsKlick ein Makro zugewiesen
Diese durchläuft alle 5 Kästchen und wenn gesetzt (wert 1)
wird der zugehörige Text definiert.. und z.B. in B12 abgelegt:

Sub CheckBox_BeiKlick()
Dim x, i
x = ""
For i = 1 To 5
If Worksheets(1).CheckBoxes(i).Value = 1 Then
x = x & Choose(i, "Apfel ", "Birne ", "Orangen ", _
"Karotten ", "Mandarinen")
End If
Next i
Worksheets(1).Range("B12") = x
End Sub

nix verstehen - in Anhang sehen