エラーが発生する場合、特に、今まで正しく動いていたのに突然動かなくなった場合など、直近の動作を辿って行きましょう。

1. 何か、あなたがプロシージャ内を書き換えた箇所が問題なのか。
2. 参照設定をいじらなかったですか？
3. Delｅｔｅキー、Spaceキーに触れなかったですか？
4. モジュール名、プロシージャ名を変更しなかったですか？

今回の、「コンパイルエラー ： モジュールではなく変数またはプロシージャ名を指定してください 」エラーは、モジュール名、プロシージャ名を何気なく変更してしまったことで発生します。

サンプルプロシージャとプロシージャ名

下記のような標準プロシージャを作成します。このプロシージャ名は名前規則に違反していませんからエラーが発生することはありません。

Function DDEInitiateCK()

    Dim MyChan As Long
    Dim strExcelPath As String

    'Excelのフルパスを記述します。
    strExcelPath = "C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE"

    Shell strExcelPath, 1

    MyChan = DDEInitiate("Excel", "System")
    MsgBox "接続チャンネルは ： " & MyChan & "です"
    
    DDETerminate MyChan

End Function

実行結果

1. 下記のようにモジュール名を変更します。

2. モジュール名が、DDEInitiateメソッドと同名になっています。
3. これが原因で内部干渉がAccess内で発生し、上図のエラーが発生します。
4. 下図のように命名すると、何も問題が発生しません。

留意事項

• モジュール名は、決して実在するメソッド、アクション、プロパティ名をそのまま使用しないようにしましょう。

2004/04/18