エクセル2007でVBAが動きません、助けて下さい

質問

先日、使用していたエクセルを2003から2007に変更した所、
オブジェクトのテキストが読み込めなくなってしまいました。

マクロの記録なども試したのですが、問題が解決せず
困っています。

原因が分かる方が入らしたら、ぜひとも教えてください。

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Sub namae()
Dim namae1 As String
Dim namae2 As String

namae1 = Application.Caller
namae2 = ActiveSheet.Shapes(namae1).TextFrame.Characters.Text

MsgBox namae2

End Sub

回答No.1

DreamyCat · ベストアンサー

Application.Callerは
図形（２００３版までのオートシェープ）をクリックしてマクロを実行するときに使います。
使い方を勘違いしているようです。

標準モジュールに書くなら
このようにしてください。

Sub 角丸四角形1_Click()
namae　'Sub namae() を呼び出します
End Sub

Sub namae()
Dim namae1 As String
Dim namae2 As String
namae1 = Application.Caller
namae2 = Sheet1.Shapes(namae1).TextFrame.Characters.Text
MsgBox namae2
End Sub

あるいは普通に登録するなら。
図形を配置して右クリック、
マクロの登録　→　新規作成　→　OK
下記のように。
（上の書き方より、ふつうはこちらを使います。）

Sub 角丸四角形1_Click()
Dim namae1 As String
Dim namae2 As String
namae1 = Application.Caller
namae2 = Sheet1.Shapes(namae1).TextFrame.Characters.Text
MsgBox namae2

End Sub

お礼

返答有難う御座います。

仰る通り、動きました！！
有難う御座いました。