excel - VBA 経由で Excel を PostgreSQL に接続する

Question

Excel で VBA のようなクエリを作成SELECTできるので、Excel から PostgreSQL DB をクエリできますか?

可能であれば、データベースへの接続方法を教えてください。Google で検索しましたが、結果が見つかりませんでした。

Answer 1

参照として使用できるコードを次に示します。それが役に立てば幸い。

Sub SelectBasic()

        Dim objDb_con
        Dim strSomeValue As String

        Set objDb_con = CreateObject("ADODB.Connection")
        Set Rsdatatype = CreateObject("ADODB.RecordSet")

        glbConnString = Trim(ActiveSheet.Range("B1").Value)
        //Connection string format:Driver={PostgreSQL Unicode};Database=MyDB;server=192.16*.*.**;UID=USERID;Pwd=pasword //comment it
        If glbConnString = "" Then
         MsgBox "Enter the Connection String"
        Else:

        objDb_con.Open glbConnString

        strSql = "select strSomeValue  from SOMETABLE where Something=1"
        Rsdatatype.Open strSql, objDb_con, adOpenKeyset, adLockpessimistic
        If Rsdatatype.EOF = False Then strSomeValue = Rsdatatype.Fields(0).Value
        Rsdatatype.Close

        End If
        objDb_con.Close
    End Sub

Answer 2

必要なデータを記述するテーブルまたはビューを PostgreSQL に作成します。

VBA から ODBC または ADO 接続を使用して PostgreSQL に接続します。ODBC を使用している場合は、DSN を介して作成し、odbcad32.exeその DSN を VB で使用する必要があります。直接接続するだけでは簡単ではありません。

見る：

• VBA で ADO を使用して PostgreSQL に接続する
• PostgreSQL クエリから Excel シートへ
• http://jackdebear.blogspot.com.au/2011/11/connecting-to-postgres-from-excel.html
• リモート Postgres データベースと Excel ワークブック間のインポート/エクスポート フローの有効化
• ADO は ODBC ドライバーで動作しますか、それとも OLE DB プロバイダーのみで動作しますか?
• Excel VBAとADOを使用してクエリ結果をデータテーブルに入れる方法は?

Oracle を使用するより適切に記述された例ですが、原理は同じです - ODBC/ADO。