このMSDNページ dbUseODBCを使用すると ランタイムエラーが発生します。 Set wrkODBC = CreateWorkspace("newODBCWorkspace", "admin", "")を試してください