Πώς να συνδέσετε το Excel σε SQL Χρήση της Visual Basic

Η εφαρμογή λογιστικών φύλλων Microsoft Excel διαθέτει Visual Basic , μια γλώσσα προγραμματισμού , χτισμένη σε αυτό . Οι προγραμματιστές χρησιμοποιούν αυτή τη γλώσσα για να δημιουργήσετε δομημένα εντολές γλώσσα επερωτήσεων , πιο γνωστό ως " εντολές SQL . " Τα γενικά βήματα για τη σύνδεση του Excel σε εξωτερικές πηγές δεδομένων μέσω SQL ερωτήματα περιλαμβάνουν : τη δημιουργία μιας σύνδεσης με τη βάση δεδομένων ? Τρέχει το ερώτημα? Μεταφορά της παρατραβηγμένο δεδομένα ? Και το κλείσιμο της σύνδεσης . Χρησιμοποιώντας VB για να εκτελέσετε το Excel SQL ερωτήματα επιτρέπει στους προγραμματιστές να χρησιμοποιούν δεδομένα από διάφορες πηγές εκτός του Excel . Οι πηγές αυτές περιλαμβάνουν βάσεις δεδομένων που δημιουργήθηκαν σε Access, SQL Server και άλλες εφαρμογές βάσεων δεδομένων . Οδηγίες
Η

1 Ανοίξτε το Excel , στη συνέχεια, πληκτρολογήστε μια λίστα με ονόματα σε μια στήλη και τις ηλικίες σε μια γειτονική στήλη . Ονομάστε τις κορυφές αυτών των στηλών με τους κείμενο " Ονόματα" και " Εποχές ". Αυτό το βήμα δημιουργεί μια βάση δεδομένων του δείγματος για το πρόγραμμα SQL σας για να φέρω . Μπορείτε να δημιουργήσετε έναν πίνακα με διαφορετικά δεδομένα , αν θέλετε . 2

Σύρετε μια περιοχή επιλογής γύρω από το τραπέζι , στη συνέχεια, πληκτρολογήστε " MyTable " στο πλαίσιο κειμένου στα αριστερά της γραμμής τύπων . Αυτό δημιουργεί ένα όνομα περιοχής για τα δεδομένα του δείγματος , το οποίο το πρόγραμμά σας θα πρέπει να έχουν πρόσβαση στα δεδομένα
εικόνων 3

Αποθηκεύστε το αρχείο ως . "C: \\ MyDatabase.xlsx ", στη συνέχεια, κλείστε το αρχείο .
Η 4

Πατήστε "Control ", που ακολουθείται από " N " για να δημιουργήσετε ένα νέο υπολογιστικό φύλλο . Θα αποθηκεύσετε το πρόγραμμα SQL σας σε αυτό το φύλλο .
5

Press " Alt ", ακολουθούμενη από την " F11 " για να εισάγετε την ανάπτυξη VB περιβάλλον , κοινώς συντομογραφία του "IDE . " Οι προγραμματιστές γράφουν και μερικές φορές εκτελούν προγράμματα VB σε αυτό το IDE .
Η

6 Κάντε κλικ στο "Εισαγωγή" μενού , στη συνέχεια, κάντε κλικ στο " Ενότητα " στοιχείο. Η ενέργεια αυτή δημιουργεί ένα νέο παράθυρο κώδικα για να εισάγετε SQL καταχώρισή σας πρόγραμμα .
Η

7 Κάντε κλικ στο "Εργαλεία" τίτλο μενού , στη συνέχεια, κάντε κλικ στην εντολή "Αναφορές ". Τοποθετήστε έναν έλεγχο στο κουτάκι με την ένδειξη " αντικείμενα δεδομένων ActiveX της Microsoft . " Αυτή η ενέργεια καθιστά ορατό τα αντικείμενα της βάσης δεδομένων που πρέπει να εκτελέσετε το ερώτημα SQL Excel .
8

Επικολλήστε τον ακόλουθο πρόγραμμα σε νέο παράθυρο κώδικα .

Sub sqlVBAExample ( )

Dim objConnection Όπως ADODB.Connection

Dim objRecSet Όπως ADODB.Recordset

Set objConnection = Νέα ADODB.Connection

objConnection.ConnectionString = " Provider = Microsoft.ACE . OLEDB.12.0 ? Πηγή δεδομένων = c : \\ myDatabase.xlsx ? Επέκταση Properties = " " Excel 12.0 Xml ? HDR = YES " " ? "

objConnection.Open

Set objRecSet = Νέα ADODB . εγγραφών

objRecSet.ActiveConnection = objConnection

objRecSet.Source = " Επιλέξτε * Από MyTable "

objRecSet.Open

Range ( " D10 " ) . CopyFromRecordset objRecSet

objRecSet.Close

objConnection.Close

Set objRecSet = Τίποτα

Set objConnection = Τίποτα

End Sub
Τετάρτη 9

Κάντε κλικ σε μία από τις δηλώσεις του προγράμματος , στη συνέχεια, πατήστε το πλήκτρο "F5 " για να εκτελέσετε το πρόγραμμα .
Η 10

Πατήστε το πλήκτρο " Alt " και στη συνέχεια " F11 " για να επιστρέψετε στην υπολογιστικό φύλλο Excel . Το φύλλο θα εμφανίσει τα αποτελέσματα της σύνδεσης SQL που ιδρύθηκε το πρόγραμμά σας . Τα αποτελέσματα περιλαμβάνουν τον πίνακα βάσης δεδομένων που δημιουργήσατε νωρίτερα .
Η
εικόνων