Word 起動時エラーメッセージ

質問

以下エラーメッセージ

Sub Autoexec()
Application.OnTime When:=Now + TimeValue("00:00:00", Name:="Performance")
End Sub

Sub Performance()
Assistant.FileName = "Dolphin.acs"
With Assistant
.Visible = True
.Sounds = True
.Animation = msoAnimationGetWizardy
End Sub
Autoexec
End Sub
----------------------------------------------------------------
いつ出るのか？：MicrosoftWord2002起動時
症状：ランタイムエラー?メッセージ後、キャンセルをクリックすると
　　　Wordは正常に動作するのですが、いったんWordを閉じて、また
　　　立ち上げると同じエラーメッセージがでる。
行ったこと：Office2002のアンインストール→Office2002
　　　　　　のクリーンインストール

依頼内容：エラーメッセージを消したい

以上　宜しくお願い致します。
----------------------------------------------------------------

備考：Excel2002は問題なく動作しています。
PC名：FMV-DESKPOWER　C26WD/M

回答No.1

suzukikun · ベストアンサー

これはマクロが定義されていて、その内容は０：００になるといるかのヘルプアシスタントが出てきてなんかアニメーションをするというものです。
不必要であるのであればツールのマクロのマクロで削除してしまえばよいでしょう。

お礼

解決致しました。有難うございました＾＾