Nwlapcug.com


Come convertire un documento Word o Excel foglio di calcolo in una Query di Microsoft Access

Query di Microsoft Access sono essenzialmente le istruzioni SQL, che eseguono operazioni sui database. Queste istruzioni sono scritte con testo non formattato, che si può fare in qualsiasi applicazione di elaborazione testi o ambiente, tra cui MS Word ed Excel. Conversione di una query alla volta da Word o Excel per Access è una semplice operazione di taglia e incolla. Tuttavia, conversione di molte query richiede l'aiuto di un programma corto. Creare questo programma utilizzando l'ambiente di sviluppo integrato di Access Visual Basic.

Istruzioni

Convertire Excel foglio di calcolo a mano

1

Creare un nuovo foglio di calcolo Microsoft Excel e digitare o incollare l'istruzione seguente in una cella:

Selezionare * da GamesTable dove GameTitle = \"Monopoly.\"

2

Aprire Access e creare una tabella di database di piccolo campione chiamata \"GamesTable\" con il campo \"GameTitle\" e tutti gli altri campi che desideri.

3

Creare alcune righe di dati di esempio alla tabella, essere sicuri di includere \"Monopoly\" per il titolo di uno dei giochi. Premere \"Control-S\" per salvare la tabella.

4

Aprire una nuova query premendo \"Create\" sulla barra degli strumenti di accesso, seguito premendo \"Query Design. \" (premere \"Objects,\" seguita da \"New\" e poi \"Query,\"Se si utilizza Access 2003.) Fare doppio clic la \"GamesTable\" voce nella \"Show Table\" nella finestra di dialogo, quindi premere il \"Escape\" chiave per chiudere la finestra.

5

Pulsante destro del mouse sulla scheda della query, che consente di visualizzare \"Query1\" e selezionare \"SQL vista. \"

6

Tornare a Excel, quindi selezionare e copiare negli Appunti l'istruzione SQL scritto in precedenza \ "(selezionare * da...). \"

7

Spostare nuovamente l'accesso \"SQL visualizzazione. \" selezionare tutto il testo SQL esistente, quindi incollare sopra esso premendo \"Control-V.\"

8

Eseguire la query premendo il \"Run\" icona sulla barra di accesso, o tasto destro del mouse sulla scheda della query e selezionando \"Datasheet vista. \" avviso che verrà visualizzato solo il gioco specificato nell'istruzione SQL che è stato copiato da Excel.

Convertire il documento di Word con un programma

9

Convertire manualmente le query da Word utilizzando i passaggi indicati per Excel. Sostituire \"Word\" per \"Excel\" come si ripete la procedura. In alternativa, è possibile completare i passaggi seguenti per utilizzare un programma che converte per voi molte istruzioni SQL in una sola volta.

10

Aprire Word e inserire le stringhe di query, uno per riga. Utilizzare la seguente query di esempio per la tabella GamesTable. Assicurare che l'ultima riga del documento è l'ultima query.

Selezionare da GamesTable
VAI
SELEZIONARE
da GamesTable dove (((GamesTable.GameTitle)=\"Monopoly\"))
VAI
Selezionare GameTitle from GamesTable WHERE (((GamesTable.GameTitle) come \ "chees\")).

11

Salvare il file come testo normale, quindi importare il file in Access. Selezionare la \"tab\" carattere e non il \"semicolon\" come il delimitatore di testo durante il completamento dell'importazione guidata. Assicurarsi che il nome della tabella appena importata sia \"Select.\"

12

Abilitare le macro in Access: premere \"Alt-F,\" quindi fare clic su \"Options.\" fare clic su centro \"Trust, \" quindi il \"Trust Center\" pulsante. Fare clic su impostazioni \"Macro, \" seguita da \"Enable tutte le macro, \" quindi chiudere tutte le finestre di dialogo aperte. Chiudere e quindi riaprire l'accesso. Assicurarsi di disattivare le macro dopo aver terminato la procedura descritta in questo articolo.

13

Premere \"Alt-F11,\" quindi premere \"Insert,\" seguita da \"Module.\" incollare questo codice nel modulo:

Public Sub makeQueries()

Const cstrQueryName = \"Select\"
() Dim dbs As DAO. Database
Dim rst As DAO. Recordset
Dim qdf come QueryDef

Dim i As Integer
Dim qName

Set dbs = CurrentDb
Set rst = dbs. OpenRecordset(cstrQueryName)
Io = 0
While Not rst. EOF

Debug.Print \"SQL: \" & rst(\"Field1\")

qName = \"q\" & CStr(i)
Set qdf = dbs. CreateQueryDef(qName)
QDF. SQL = rst(\"Field1\"). Valore

rst.MoveNext
i = i + 1

Loop
RST. Chiudere
DBS. Chiudere
End Sub

14

Posizionare il cursore in un punto qualsiasi nel programma solo elencato e premere \"F5\" per eseguirlo. Tornare ad Access, chiudere e quindi riaprire la finestra di navigazione per visualizzare le nuove query (cioè, \"q0\"o \"q1\"). Fare doppio clic sulla query per eseguirli.

Consigli & Avvertenze

  • Ai principianti di accesso possono ritirare l'abilità rapidamente creando tabelle semplici, una colonna ed eseguendo query SELECT base su tali tabelle. Creare tabelle da liste che vi sono familiari, come cibi preferiti, film o giochi. Utilizzare Progettazione query Access per creare istruzioni SELECT visivamente, prima di tentare di regolare istruzioni SQL.