Objektname im VBA ermitteln

[brenner]

Hallo zusammen,

ich habe in einem Bild mehrere Schaltflächen projektiert, bei denen ich unter VBA unter LeftClickUp das gleiche Makro auslöse.
Im Makro möchte ich ermitteln von welcher Schaltfläche (Objektname) die Auslösung stattgefunden hat.

Kann mir jemand weiterhelfen ?

VBAbeginner

[herberto]

Beim Click-Event selbst (welches in ModuleElement aufzufinden ist) wird das Objekt, von wo aus das Event gefeuert wurde, mitgegeben -> das ist das obElem

Public Sub LeftClickUp_Default(obElem As Element)
    Debug.Print obElem.Name 'Name des Elements
    Debug.Print obElem.ItemVariable(0).Name 'Name der verknüpften Variable im Element
End Sub

Gruß,
Herbert

[brenner]

Hallo Herberto,

Funktioniert super.
Ist halt immer gut wenn man mit jemanden spricht der sich damit auskennt !!

Vielen Dank für die schnelle Hilfe.