Att veta hur man ska utföra Structured Query Language uttalanden mot ett Excel-ark kan vara värdefulla . Microsoft Excel är ett kalkylprogram som ingår i Microsoft Office-paketet . SQL används främst i relationsdatabaser , men kan också användas för att läsa ett Excel- kalkylblad . Visual Basic for Applications ( VBA ) används för att automatisera rutinuppgifter i Microsoft Office- program . I några få steg kan du skriva VBA- kod som ska köras en SQL-sats och läsa data sparas i ett Excel- kalkylblad .
1 .
Starta Microsoft Excel 2007 och skriv " COLUMN1 " i " A1 ", " kolumn2 " i " B1 ".
Typ "A " i " A2 " , "B " i " A3 " , " C " i " A4 " , "D " i " A5 ".
typ " 1 " i " B2 " , "2 " i " B3 " , "3 "i " B4 " , " 4 " i " B5 "
Spara ditt kalkylblad till " C . : \ " som " book1. xls . "
2 .
Starta Microsoft Office Access 2007 och klicka på " tom databas "och välj sedan "Skapa ". Klicka på " Databas Verktyg "och välj " Visual Basic . "Klicka på " Infoga " och välj " Module "
3
Skriv följande för att skapa . " runSQLExcel " subrutin .
Private Sub runSQLExcel ( )
Tryck på " Enter ".
4 .
Skriv följande för att definiera variabler :
Const adOStatic=3
Const adLkOpt=3
Const adCmdString= H1
5
Skriv följande för att definiera och öppna anslutningar till Excel- kalkylblad .
Set objectConn=CreateObject ( " adodb . Anslutning " )
Set objectRst=CreateObject ( " ADODB. Recordset " )
objectConn. Open " Provider=Microsoft. Jet. OLEDB . 4,0 , " _
" Data Source=C: \ Book1. xls , " _
" Extended Properties=" " Excel 8. 0 , HDR=Ja ; "";"
6
Skriv följande för att köra en SQL-sats och öppna ett nytt Recordset .
objectRst . Öppna " SELECT * FROM [ Blad1 $ ] " , _
objectConn , adOStatic , adLkOpt , adCmdString
7 .
Skriv följande för att loopa igenom din Recordset och Visa resultat för båda kolumnerna i kalkylbladet :
duga tills objectRst . EOF
MsgBox " Colum1 : " objectRst. Fields. Item ( " COLUMN1 " ) Värdet "" _
" Colum2 . " objectRst . Fields. Item ( " COLUMN2 " ) . Value
objectRst. MoveNext
Loop
Tryck " F5 " att köra din subrutin .
Previous:nothing Next:hur man läser en CSV -fil med VB