Sådan Connect Excel til SQL hjælp af Visual Basic

Den regnearksprogram Microsoft Excel har Visual Basic, et programmeringssprog, der er indbygget i den. Udviklere bruger dette sprog til at oprette Structured Query Language kommandoer, bedre kendt som "SQL-kommandoer." De generelle trin i tilslutning Excel til eksterne datakilder gennem SQL-forespørgsler kan nævnes: at skabe en forbindelse til databasen; kører forespørgslen; overføre hentet data; og lukke forbindelsen. Brug VB til at køre Excel SQL-forespørgsler lader udviklere bruger data fra en række forskellige kilder uden for Excel. Disse kilder omfatter databaser oprettet i Access, SQL Server og andre databaseprogrammer.

Vejledning

• Åbn Excel, skriv derefter en liste over navne i en kolonne og aldre i et tilstødende kolonne. Mærk toppen af ​​disse kolonner med teksten "navne" og "middelalder." Dette trin opretter en database med eksempeldata til din SQL-program til at hente. Du kan oprette en tabel med forskellige data, hvis du gerne vil.

• Træk en markering område rundt om bordet, og skriv "MyTable" i tekstfeltet til venstre for formellinjen. Dette skaber en række navn for eksempeldataene, som dit program bliver nødt til at få adgang til data.

• Gem filen som "C: \ MyDatabase.xlsx" og derefter lukke filen.

• Tryk på "Control", efterfulgt af "N" for at oprette et nyt regneark. Du vil gemme din SQL-program i dette ark.

• Tryk på "Alt", efterfulgt af "F11" for at komme ind i VB udviklingsmiljøet, almindeligvis forkortet som "IDE". Udviklere skrive og undertiden eksekvere VB programmer i denne IDE.

• Klik på "Indsæt" menuen og derefter klikke på "Modul" delen. Denne handling opretter en ny kode vindue for dig at indtaste dit SQL-program notering.

• Klik på "Funktioner" overskrift menuen og klik på "Referencer." Placer en check i afkrydsningsfeltet "Microsoft ADO." Denne handling synliggør de databaseobjekter at Excel har brug for at køre SQL-forespørgsel.

• Indsæt følgende program i den nye kode vinduet. Sub sqlVBAExample () Dim objConnection Som ADODB.Connection Dim objRecSet Som ADODB.Recordset Set objConnection = Ny ADODB.Connection objConnection.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0; datakilde = c: \ myDatabase.xlsx; Extended Properties = "" Excel 12,0 XML; HDR = YES ""; " objConnection.Open Set objRecSet = Ny ADODB.Recordset objRecSet.ActiveConnection = objConnection objRecSet.Source = "SELECT * FROM mit bord" objRecSet.Open Range ("D10"). CopyFromRecordset objRecSet objRecSet.Close objConnection.Close Set objRecSet = Nothing Set objConnection = Nothing End Sub

• Klik på en af ​​programmets udsagn, og tryk derefter på "F5" for at køre programmet.

• Tryk på "Alt" og derefter "F11" for at vende tilbage til Excel-regneark. Regnearket vil vise resultaterne af SQL-forbindelse, dit program etableret. Resultaterne omfatter database tabel, du oprettede tidligere.