Excel vba Bilder anklicken?

2 Antworten

Private Sub Workbook_Open()
    Dim shp As Shape

    For Each shp In Tabelle1.Shapes
        If shp.Type = msoPicture Then _
            Application.OnTime Now, shp.OnAction
    Next shp
End Sub

Ich hab das ohne VBA gelöst.

Hab bei mir das Bild (in meinem Fall ein Icon) mit einem Hyperlink versehen, der beim klicken eine Aktion auslöst

Was soll denn speziell beim anklicken passieren? Willst du was berechnen? Was öffnen? Etwas auswählen?