Bagaimanakah Saya Boleh Menyoal Pangkalan Data SQL Secara Terus daripada Kod VBA Excel Saya?

Menyiasat SQL daripada VBA dalam Excel

Menggunakan VBA dalam Excel, anda boleh melanjutkan fungsi hamparan anda dengan berinteraksi secara langsung dengan pangkalan data SQL. Ini membolehkan anda melaksanakan pertanyaan SQL, mendapatkan semula hasil dan menyepadukannya ke dalam buku kerja Excel anda.

Pertimbangkan subrutin VBA berikut, yang bersambung ke contoh SQL Server tertentu dan melaksanakan pertanyaan SQL:

Sub ConnectSqlServer()

    Dim conn As ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim sConnString As String

    ' Adjust according to your environment
    sConnString = "Provider=SQLOLEDB;Data Source=INSTANCE\SQLEXPRESS;" & _
                  "Initial Catalog=MyDatabaseName;" & _
                  "Integrated Security=SSPI;"

    ' Create connection and recordset objects
    Set conn = New ADODB.Connection
    Set rs = New ADODB.Recordset

    ' Open connection and execute query
    conn.Open sConnString
    Set rs = conn.Execute("SELECT * FROM Table1;")

    ' Check for data
    If Not rs.EOF Then
        ' Transfer results to Excel sheet
        Sheets(1).Range("A1").CopyFromRecordset rs
        ' Close recordset
        rs.Close
    Else
        MsgBox "Error: No records returned.", vbCritical
    End If

    ' Clean up
    If CBool(conn.State And adStateOpen) Then conn.Close
    Set conn = Nothing
    Set rs = Nothing

End Sub

Untuk menggunakan subrutin ini, ubah suai yang berikut bahagian:

• Sumber Data: Gantikan "INSTANCESQLEXPRESS" dengan nama instance SQL Server anda.
• Katalog Permulaan: Gantikan " MyDatabaseName" dengan nama pangkalan data yang anda ingin sambungkan kepada.
• Keselamatan Bersepadu: Laraskan kepada "True" jika menggunakan pengesahan Windows atau "False" jika menggunakan pengesahan SQL Server. Dalam kes kedua, gantikan "Keselamatan Bersepadu=SSPI;" dengan "ID Pengguna=[nama pengguna];Kata Laluan=[kata laluan];".

Setelah diubah suai, jalankan subrutin VBA untuk mewujudkan sambungan, laksanakan pertanyaan SQL yang dinyatakan dalam pernyataan "Laksanakan", dan isikan keputusan pada helaian Excel yang ditentukan.

Atas ialah kandungan terperinci Bagaimanakah Saya Boleh Menyoal Pangkalan Data SQL Secara Terus daripada Kod VBA Excel Saya?. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!