[Nullix]

Hallo zusammen,

ich stehe vor folgender Herausforderung:
Ich möchte eine Art "Hitparade" erstellen. In einer Liste habe ich verschiedene Titel untereinander.
Diesen kann man Punkte von 1-5 vergeben.
Nun möchte ich, dass bei Klick auf einen Button o.ä. sich die Punkte eines Titels um die entsprechende Zahl erhöht.
Schematisch sähe das so aus:
Spalte1 Spalte2 Spalte3 Spalte4 Spalte5
Titel aktuelle Punktzahl +5 +4 +3 usw.

Weiß jemand, wie ich das hinkriege?
Mit Makros kenn ich mich nicht so aus, daher - wenn es mit Makros gehen sollte bitte kurz beschreiben, wie ich die einfüge

Danke schon mal!

[eitch100]

Hi...

Leg dir auf die Tabelle einen CommandButton (Menü Entwicklertools--Einfügen---Active X Steuerelement--Befehlsschaltfläche)

Darauf einen Doppelklick und folgenden Code einfügen...

Private Sub CommandButton1_Click()
Dim I
I = Cells(ActiveCell.Row, 2).Value
Cells(ActiveCell.Row, 2).Value = I + ActiveCell.Value
End Sub

Dann markierst die Zelle mit dem gewünschten Wert in der entspechenden Zeile und klickst auf den CommandButton... (Der Entwurfsmodus, der sich auch im Menü Entwicklertools befindet, muss deaktiviert sein)

Man kann das auch mit einem Doppelklick lösen, aber viele Wege führen nach Rom....
Tschö