Workbook_openでマクロが実行されない

ExcelのVBAで起動時にマクロを実行させたいのですが、
「メソッドまたはデータメンバが見つかりません。」
とのエラーが出て実行出来なくて困っています。

プログラム内容は
＊ThisWorkbook＊
Private Sub Workbook_Open()
Module1.tasu
End Sub

＊標準モジュール(Module1)＊
Private Sub tasu()
Dim a As Byte
a = 3
Range("a1") = a
End Sub

使用しているソフトはExcell2003、VB6.5です。
よろしくお願いします。

No.1 ベストアンサー 回答者： imogasi 回答日時： 2008/03/28 19:44

下記をやってみてください。

うまくいくと思います。
Sub tasu()
Dim a As Byte
a = 3
Range("a1") = a
End Sub
--
Sub Workbook_Open()
Module1.tasu
End Sub
--
Private Sub tasu()
Dim a As Byte
a = 3
Range("a1") = a
End Sub
とするとエラーです。Privateが問題です。
http://oshiete1.goo.ne.jp/qa522928.html
のNO1回答を参照。
＞省略して「Sub hogehoge()」とした場合は「Public」とみなされます。

この回答へのお礼

出来ました！ありがとうございます！

お礼日時：2008/03/28 20:27