ActiveX标签的Application.Caller

Question

我有5个ActiveX标签，其名称以“ Label_”开头。 ActiveX A标签为Label_AAA，B标签为Label_BBB，依此类推。

我想遍历label.name包含“标签”的所有OleObject，检查最后单击哪个标签，然后返回label.name。

有什么主意，我该如何使用带有ActiveX标签的Application.Caller来找到最后单击的标签？

Dim InfoSheet As Worksheet
Set InfoSheet = Sheet3

Dim label As OLEObject

For Each label In InfoSheet.OLEObjects
    If InStr(1, label.name, "Label") Then

    'check which is the last clicked label and return label.name 

    End If
Next label