エクセル2010のvbaとコマンドボタンについて

vbaで押されたコマンドボタンの
（ActiveXコントロールのイメージやラベルなど）
名前を取得することはできますか？

ActiveControl.NameはSheets(1)をつけると
オブジェクトは、このプロパティまたはメゾットをサポートしていません
とエラーが出て、Sheets(1).を取るとオブジェクトが必要です
とエラーが出て上手くいきません

フォームコントロールのボタンは右クリックできないので
ActiveXコントロールのコマンドボタンを使用しています

回答お願いします

No.2 ベストアンサー 回答者： mitarashi 回答日時： 2012/12/27 21:13

こちらにありました。

結構大げさな事をしないと取得できないのですね。2010でも動きました。
おかげさまで一つ物知りになりました。
http://www.moug.net/tech/exvba/0150059.html

コードの最後は
Me.OLEObjects(obj.Name).Object.Caption = "変更後のキャプション"
の方が当方の好みです。

この回答へのお礼

ありがとうございました
いくら探しても見つからなかったので
本当に助かりました

お礼日時：2012/12/27 21:29

No.1 回答者： kybo 回答日時： 2012/12/27 16:19

名前をダイアログで表示する例です。

Sub macro()
Dim C As OLEObject
For Each C In ActiveSheet.OLEObjects
MsgBox C.Name
Next C
End Sub

この回答への補足

すいません
押されたボタン以外の名前も表示されてしまいます

補足日時：2012/12/27 16:34