Microsoft Access frågor är i huvudsak SQL-satser , som utför operationer på databaser . Dessa uttalanden är skrivna med vanlig oformaterad text , som du kan göra i valfritt ordbehandlingsprogram eller miljön , inklusive MS Word och Excel . Konvertera en fråga i taget från Word eller Excel till Access är ett enkelt snitt - och - klistra in . Men konvertera många frågor kräver hjälp av ett kort program . Skapa det här programmet med Access Visual Basic integrerad utvecklingsmiljö . Saker du behöver
Microsoft Access
Microsoft Word Review Microsoft Excel
Visa fler instruktioner Review Konvertera Excel-kalkylblad genom Hand
1
Skapa ett nytt Microsoft Excel och skriver eller klistrar följande uttalande i en cell :
SELECT * från GamesTable VAR GameTitle = " Monopol . "
2
öppna tillträdet och skapa ett litet prov databas tabell som kallas " GamesTable " med fältet " GameTitle " och alla andra områden som du vill .
3
Skapa några rader exempeldata till bordet , är noga med att inkludera " Monopol " för titeln av ett av spelen . Tryck på " Ctrl- S " för att spara tabellen .
4
Öppna upp en ny fråga genom att trycka på " Skapa " på Access-verktygsfältet , följt av att trycka på " Query design . " ( Tryck på " Objekt ", följt av " Nytt " och sedan " Query " om du använder Access 2003 . ) Dubbelklicka på " GamesTable " post i " Visa tabell " dialogrutan och tryck sedan på " Escape " -tangenten att stänga rutan .
5
Högerklicka på frågans fliken , vilket kommer att visa " Fråga1 " , och välj " SQL View . "
6
Återgå till Excel , välj och kopiera till Urklipp SQL-satsen du skrev tidigare " ( SELECT * från ... ) . "
7
Flytta tillbaka till Access " SQL View . " Välj alla befintliga SQL text och sedan klistra över den genom att trycka " Ctrl- V . "
8
Kör frågan genom att trycka på " Run "-ikonen på Access- verktygsfältet , eller högerklicka på frågans fliken och välja " Datablad . " Observera att Access visar bara spelet du angav i SQL-uttryck som du kopierat från Excel .
Konvertera Word-dokument med ett program
9
manuellt konvertera frågor från Word med hjälp stegen för Excel . Ersätt " Word " för " Excel " som du upprepar stegen . Eller , gå igenom följande steg för att använda ett program som kommer att konvertera till dig många SQL-satser på en gång .
10
Öppna Word och skriv in dina frågesträngarna , en per rad . Använd följande som sökfrågor för GamesTable tabellen . Se till den sista raden i dokumentet är den sista frågan
Välj * från GamesTable , . SELECT * FROM GamesTable WHERE ( ( ( GamesTable.GameTitle ) = " Monopol " ) ) ; välj GameTitle från GamesTable WHERE ( ( ( GamesTable.GameTitle ) som " * ostar * " ) ) .
11
Spara filen som vanlig text , och sedan importera filen i Access. Välj " fliken " karaktär och inte " semikolon " som textavgränsare medan slutföra importguide . Se till att namnet på den nyligen importerade tabellen " Välj ".
12
Aktivera makron i Access : tryck på " Alt - F , " klicka sedan på " Alternativ". Klicka på " Säkerhetscenter " därefter " Säkerhetscenter " -knappen . Klicka på " Makroinställningar , " följt av " Aktivera alla makron , " stäng alla öppna dialogrutor . Stäng och sedan åter öppnar Access . Var noga med att inaktivera makron efter avslutad stegen i den här artikeln .
13
Tryck " Alt - F11 , " tryck sedan på " Infoga ", följt av " modul . " Klistra in koden i modulen :
Public Sub makeQueries ( ) katalog
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 Medan Inte rst.EOFDebug.Print " SQL : " & rst ( " Field1 " ) qname = " q " & CStr ( i) Ställ Qdf = dbs.CreateQueryDef ( QName ) qdf.SQL = rst ( " Field1 " ) . Valuerst.MoveNexti = i + 1Looprst.Closedbs.CloseEnd Sub
14
Placera markören någonstans i programmet bara noterade och tryck " F5 " för att köra den. Återgå till Access , nära och sedan åter öppna navigation fönstret för att se de nya frågor ( dvs. , " Q0 " eller " q1 " ) . Dubbelklicka på frågor för att köra dem . Addera
