Excel VBAから.NET用ライブラリのdllを利用したい。

Question

###発生している問題
VBAから.NET用ライブラリであるNpgsqlを利用してPostgreSQLに接続したいと考えました。

Npgsql.dllをregasm.exeを利用してレジストリに登録したうえで、VBAの参照設定を行うことでAPIを利用できないかと考えたのですが、「実行時エラー'-2146233079'(80131509) オートメーションエラーです。」というエラーが出てしまいうまくいきませんでした。
.NET用のライブラリをVBAから参照するにはどうしたらいいのでしょうか。

また、そもそも.NET用なので無理なのではと薄々感じているのですが、これこれこういう理由だから無理、というがはっきり説明できません。
もし利用できないのであれば、https://github.com/npgsql/npgsql で公開されているNpgsqlのソースコードから、このDLLがVBAから参照できない理由を教えてください。

###表示されたエラー

実行時エラー'-2146233079'(80131509)
オートメーションエラーです。

###該当のソースコード

Private Sub CommandButton1_Click()
    Dim a As Npgsql.NpgsqlConnection
    Set a = New Npgsql.NpgsqlConnection 'ここでエラーが発生。
    Set a = Nothing
End Sub

###試したこと
参照設定を行わずにCreateObject("Npgsql.NpgsqlConnection")することも試してみたのですが、CreateObjectからは「Variant/NpgsqlConnection」型の<変数なし>の値が返ってきてしまいました。

###補足情報(言語/FW/ツール等のバージョンなど)
Microsoft Excel 2010
Windows 7 professional

Answer 1

Npgsqlを呼び出せない理由

Excel VBA から Npgsql を呼び出せない理由ですが、Excel VBA は AvtiveX(COM)、Npgsql は .Net マネージDLLという、異なった実行環境（API、またはフレームワーク）を前提にしているからです。

VBA 等のActiveXの世界から呼び出されることを前提にしている .Net マネージDLLを開発する場合、そのDLLに含まれている .Net オブジェクトがActiveXに対してCOMというインターフェースを通じて機能を公開する、という宣言を含める必要があります。しかし、Npgsqlはそのようになっていない、というのが原因だと思います。

###代替案1: ODBC/OLE DBによる接続
Excel VBAからPostgreSQLへのアクセスは、ODBCやOLE DBによって行うこともできます。

• PostgreSQL 9.2にクライアントから接続する PostgreSQL ODBC Driverのインストールと接続確認
• PostgreSQL > PgOleDB で Excel VBA から接続
• Works データベース接続あれこれ / 接続文字列（PostgreSQL: OLE DB）
• Works データベース接続あれこれ / 接続文字列（PostgreSQL: ODBC）

###代替案2: COMラッパーによるNpgsqlの利用
もう一つの代替案として、NpgsqlとExcelVBA（.NetとActiveX）を仲介するために、独自のCOMラッパーDLLを開発する方法があります。

簡単に言うと、NpgsqlがCOM公開インターフェースを持っていない（.Net専用）なら、Npgsqlの機能にアクセスする .Net マネージDLLを自分で開発して、そいつにCOM公開インターフェースを持たせればいいじゃない！という方法になります。

COMラッパーはActiveX時代のアプリケーションと.Netの世界を橋渡しする方法として、マイクロソフトも推奨している正しい戦略です。COMラッパーの仕組みと実装方法の詳細は、以下のサイトが参考になると思います。

• MSDN: COM 呼び出し可能ラッパー
• MSDN: 方法: COM ラッパーを作成する

ご参考になれば。

Comments

[koronatail]

NpgsqlはActiveXから呼び出されることを想定したつくりになっていないのですね。
非常に参考になりました。
諸事情で可能であればNpgsqlを利用したかったのですが今回はおとなしくODBCを使って接続したいとおもいます。
解答ありがとうございました。