λογισμικό

* Γνώση Υπολογιστών >> λογισμικό >> Microsoft Access

Πώς να εξάγει δεδομένα από μια βάση δεδομένων στο Excel Χρήση μακροεντολών

Εξαγωγή δεδομένων από μια βάση δεδομένων στο Excel χρησιμοποιώντας μακροεντολές είναι μια εξοικονόμηση χρόνου . Αντί για μη αυτόματη εξαγωγή των δεδομένων , έχουν το Excel μακροεντολές κάνει τη δουλειά για σας . Δημιουργήστε τη μακροεντολή , γράψτε τον κωδικό , στη συνέχεια, επαναλάβετε τη μακροεντολή κάθε φορά που θέλετε να εξαγάγετε τα δεδομένα . Η μακροεντολή έχει δημιουργηθεί χρησιμοποιώντας τη Visual Basic for Applications ( VBA ) , μια γλώσσα προγραμματισμού που είναι ενσωματωμένη στο Excel . Η δύναμη της VBA σας επιτρέπει να εισάγετε δεδομένα από οποιαδήποτε εξωτερική βάση δεδομένων στο Excel . Οδηγίες
Η

1 Πιέστε το πλήκτρο " Alt " και " F11 " από τη σελίδα Excel για το οποίο θα θέλατε να εισαγάγετε τα δεδομένα . Αυτό ανοίγει την Επεξεργασία Visual Basic ( VBE ) . 2

Κάντε κλικ στο " Εισαγωγή" και στη συνέχεια " ενότητα ". Αυτό ανοίγει ένα κενό παράθυρο για τον κωδικό σας .
Εικόνων 3

Πληκτρολογήστε τον κωδικό για την εξαγωγή της βάσης δεδομένων σας στο κενό παράθυρο . Για παράδειγμα , ο παρακάτω κώδικας αντλεί δεδομένα από μια βάση δεδομένων της Access και τις εισαγωγές της σε ένα υπολογιστικό φύλλο : .

Sub proSQLQuery1 ( ) Dim varConnectionDim varSQL

Range ( "A1" ) CurrentRegion.ClearContents

varConnection = " ODBC ? Database DSN = MS Access ? DBQ = C : \\ test.mdb ? Driver = { Driver κάνει Microsoft Access ( * . mdb ) } "

varSQL = "SELECT tbDataSumproduct . μήνα , tbDataSumproduct.Product , tbDataSumproduct.City ΑΠΟ tbDataSumproduct "

Με ActiveSheet.QueryTables.Add ( Connection : = varConnection , Προορισμός : = ActiveSheet.Range ( " A1 " ) ) . CommandText = varSQL.Name = " ερώτημα - 39008 . » . Ανανέωση BackgroundQuery : = FalseEnd με

End Sub
Η

4 Πατήστε το πλήκτρο" F5 "για να εκτελέσετε τον κώδικα
5

Κάντε κλικ στο "Αρχείο " και στη συνέχεια κάντε κλικ στο κουμπί " Κλείσιμο και επιστροφή στο Microsoft Excel " στο μενού Αρχείο .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα