Excel2010でシートを異なるブックへ移動すると移動元のブック上のオブジェクトに登録されたマクロ名が変更されマクロが実行できない

Question

Excel2010でマクロが含まれているシートを別ファイルにコピーし実行すると、

「マクロ '<>!<>' を実行できません。このブックでマクロを使用できないか、

またはすべてのマクロが無効になっている可能性があります。」

とエラーが出て、実行できなくなってしまいます。

同じブックにコピーの場合は問題ありません。

WEBを検索したところ、以下のサイトに同じ症状があったのですが、

Excel2007の話で、2010では乗っておりませんでした。

[http://support.microsoft.com/kb/974238/ja]

Excel2010　Ver14.0.5128.5000

です。

最新のプログラムを適用しております。

ご存知の方がいらっしゃったら、お教えください。

Answer 1

思いつきレベルの話で恐縮ですが、もし、シートのコピーを手動でやられているのでしたら、次にマクロを起動する場合には、ボタンのあるシートをActiveにする必要があると思います。

その場合はWorkBookのイベントプロシージャとして、

Private Sub Workbook_SheetActivate(ByVal Sh As Object)

If Sh.Name = "＜ボタンのあるシート名＞" Then

  　Sh.Shapes("正方形長方形 1").OnAction = "<コピー元ブック名>!<マクロ名>"

End If

End Sub

としてしまえば実用上は困らないのでは？

なお、 "<コピー元ブック名>!<マクロ名>"　は "<マクロ名>"で良いはずです。

私はSP2を入れていないので実地には試してません。

Answer 2

こんばんわっ

KB番号がひとつあとの文書でExcel2010についても書いてありました！今のところは手動で対策するしかないみたいですね・・・。

http://support.microsoft.com/kb/974239/ja

方法 1 : 手動でマクロ名を変更する

方法 2 : Shape.OnAction プロパティを使用してマクロ名を変更する

Answer 3

Marisa_VH さん、nplusk さん、コメントありがとうございます。

nplusk さん、こんにちは。

いただいたコメントがご参考になったようですね。

同じような問題でお悩みの方にもご参考になるよう、今回は私の方で [回答としてマーク] をいたしました。

nplusk さんの方でも次回は参考になったと思うご返信に [回答としてマーク] をつけてみてくださいね。

次回もぜひ Answers をご利用ください。

Answer 4

ご回答ありがとうございます。

検索かけたのですが、HITせず…。

回答が乗っていたのですね。

大変失礼いたしました。

毎回手動でなんて、できないので、あきらめるしかなさそうですね。

いずれ修正プログラムが出ることを期待しております。

ありがとうございました。