【解決】（フォーム上にある）押されたボタンの名前の取得

[四間飛車]

フォーム上に複数のボタンを配置して（ボタンA、ボタンB…）、
それぞれのボタンのイベントに同じマクロを登録し、
押されたボタンによって動作を切り替る下記のようなマクロをイメージしています。

sub 押されたボタン(oEv)

oButtonName = ボタンの名前を取得
Select Case oButtonName
Case ボタンA
・・・・・
case ボタンB
・・・・・
case
・
・
・
End Select

end if

色々調べているのですが、
押されたボタンの名前を取得する方法を見つけることができません。
押されたボタンの名前の取得は、どのようにするのでしょうか。

ご教授いただけますよう、よろしくお願い致します。


OOo-3.4.0／OS-Win7　が環境です。

[四間飛車]

押されたボタンの”名前”の取得ができるかどうかは不明ですが、
”ラベル”は取得できましたので、こちらで解決にしたいと思います。

それぞれのボタンのタイトルに、「ボタンA」「ボタンB」を入れて、
それぞれのボタンのイベント（マウスボタンを離した時）に下記のマクロを割り当てると、
意図した動作をすることが分かりました。

sub pushButton(oEv)
oButtonLabel = oEv.Source.getModel.Label
Select Case oButtonLabel
Case "ボタンA"
MsgBox "ボタンAが押されました"
case "ボタンB"
MsgBox "ボタンBが押されました"
End Select
end sub


お騒がせ致しました。
そして、ありがとうございました。