Bildchen und Kästchen

Hallo Spezialisten,

ich versuche wieder eine Sache mit Excel wo ich keine Ahnung von habe.
Leider habe ich auch bei Google nichts gefunden was mir weiterhilft.
Und zwar, habe ich mehrere kleine Bildchen in mehreren Zellen eingefügt, also jedes Bildchen ein eigenes Kästchen, nun möchte ich wenn ich Zwei Bildchen anklicke, das er mir
in einer vordefinierten Zelle zb. Bild 1 mit dem Wert 12 und Bild 2 mit dem wert 16 zusammenzählt . Ich glaube dazu brauche ich ein Makro.
Würde mich freuen wenn einer meine Frage versteht und mir helfen kann.

Gruß und Danke

Und zwar, habe ich mehrere kleine Bildchen in mehreren Zellen
eingefügt, also jedes Bildchen ein eigenes Kästchen, nun
möchte ich wenn ich Zwei Bildchen anklicke, das er mir
in einer vordefinierten Zelle zb. Bild 1 mit dem Wert 12 und
Bild 2 mit dem wert 16 zusammenzählt . Ich glaube dazu brauche
ich ein Makro.

Hi S,

du brauchst in z.B. Tabelle2 eine Hilfstabelle mit folgendem Aufbau:

 A B
1 Bild 1 1
2 Bild 2 10
3 Bild 3 100
4 Bild 4 1000
5

Weiterhin mußt du jedem Bild über Rechtsklick das makro tt() zuweisen.

Alt+F11, Einfügen–>Modul, Code reinkopieren, Ggfs. anpassen, Editor schliessen.

Option Explicit
Public Merker As String

Sub tt()
If Merker "" Then
 Cells(1, 1) = Application.WorksheetFunction.VLookup(Merker, Worksheets("Tabelle2").Range("A1:B100"), 2, 0)
 Cells(1, 1) = Cells(1, 1) + Application.WorksheetFunction.VLookup(Application.Caller, Worksheets("Tabelle2").Range("A1:B100"), 2, 0)
 Merker = ""
Else
 Merker = Application.Caller
 Cells(1, 1) = ""
End If
End Sub

Gruß
Reinhard

@Reinhard Vielen, vielen Dank! OwT

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]