Microsoft Access forespørgsler er hovedsagelig SQL-sætninger , som udfører operationer på databaser. Disse udsagn er skrevet med almindelig, uformateret tekst, som du kan gøre i ethvert tekstbehandlingsprogram eller miljø, herunder MS Word og Excel. Konvertering én forespørgsel ad gangen fra Word eller Excel til Access er en simpel cut- and- paste funktion. Men konvertere mange forespørgsler kræver hjælp af et kort program. Opret denne program ved hjælp af Access Visual Basic integrerede udviklingsmiljø. Ting du skal
Microsoft Access
Microsoft Word
Microsoft Excel
Vis Flere Instruktioner
Konverter Excel regneark ved Hand
1
Opret en ny Microsoft Excel-regneark og skriv eller indsæt følgende erklæring i enhver celle : Hej
SELECT * fra GamesTable WHERE GameTitle = " Monopoly ".
2
give adgang og skabe en lille stikprøve database tabel kaldet " GamesTable " med feltet " GameTitle " og alle andre felter, du gerne vil .
3
Opret et par rækker af eksempeldata til bordet , og sørg for at inkludere " Monopoly "til titlen på en af de spil . Tryk på " Ctrl- S " for at gemme tabellen.
4
Åbn en ny forespørgsel ved at trykke på "Opret " på Access værktøjslinjen , efterfulgt af at trykke på " Query Design. " ( Tryk på " Objects ", efterfulgt af " Ny" og derefter " Query ", hvis du bruger Access 2003 . ) Dobbeltklik på " GamesTable " element i " Vis tabel " dialogboksen , og tryk derefter på "Escape "-tasten at lukke kassen.
5
Højreklik på forespørgslen fane , som vil vise " forespørgsel1 " og vælg " SQL View . "
6
Retur til Excel , og derefter markere og kopiere til Udklipsholder SQL-sætningen , du skrev tidligere "( SELECT * fra ...). "
7
Flyt tilbage til Access " SQL View. " Vælg alle eksisterende SQL tekst og derefter indsætte over det ved at trykke på "Control -V ".
8
Kør forespørgslen ved at trykke på "Kør " ikonet på Access værktøjslinjen, eller højreklikke på forespørgslen fane og vælge " dataarkvisning. " Bemærk, at Access viser bare spillet , du har angivet i SQL-sætning, du har kopieret fra Excel .
Konverter Word-dokument med et program
9
manuelt konvertere forespørgsler fra Word ved hjælp af trinene givet til Excel . Stedfortræder " Word " for " Excel ", som du gentage trinnene . Eller udføre følgende trin for at bruge et program, der vil konvertere til dig mange SQL-sætninger på én gang.
10
Åbn Word og indtaste dine søgestrenge , én per linje. Brug følgende som eksempler på søgninger for GamesTable bordet. Sørg den sidste linje af dokumentet er den sidste forespørgsel
Vælg * fra GamesTable , . SELECT * FROM GamesTable WHERE ((( GamesTable.GameTitle ) = " Monopoly ")); vælg GameTitle fra GamesTable WHERE ((( GamesTable.GameTitle ) som " * oste * " ) ) .
11
Gem filen som ren tekst , og derefter importere filen til Access . Vælg " fanebladet" karakter og ikke " semikolon " som tekstseparator mens du udfylder import guiden. Sikre navnet på den nyligt importerede tabel " Vælg ".
12
aktivere makroer i Access : Tryk på " Alt- F ", klik derefter " Indstillinger". Klik på " Trust Center " og derefter på " Trust Center" knappen. Klik på " Indstillinger for makro , " efterfulgt af "Aktiver alle makroer " og derefter lukke alle åbne dialogbokse . Luk og genåbne Access. Vær sikker på at deaktivere makroer efter endt trinene i denne artikel.
13
Tryk på " Alt- F11 ", tryk derefter på "Indsæt ", efterfulgt af " Modul ". Indsæt denne kode i modulet :
Public Sub makeQueries ()
Const cstrQueryName = " Select " Dim dbs Som DAO.DatabaseDim rst Som DAO.RecordsetDim QDF Som QueryDefDim I som IntegerDim qNameSet dbs = CurrentDbSet rst = dbs.OpenRecordset ( cstrQueryName ) i = 0Do While Not rst.EOFDebug.Print " SQL : " & rst ( " Felt1 " ) Qname = " q " & CStr ( i) Indstil QDF = dbs.CreateQueryDef ( Qname ) qdf.SQL = rst ( " Felt1 "). Valuerst.MoveNexti = i + 1Looprst.Closedbs.CloseEnd Sub
14
Placer markøren et sted i programmet netop opført og tryk på " F5 " for at køre det . Vend tilbage til Access , tæt og derefter genåbne navigations vinduet for at se de nye forespørgsler ( dvs. " q0 " eller " q1 "). Dobbeltklik på de forespørgsler til at køre dem .