Τρόπος εισαγωγής δεδομένων CSV σε έναν υπάρχοντα πίνακα Στην Access 2007

διαχειριστές βάσεων δεδομένων συχνά τρέχει στην ανάγκη εισαγωγής CSV δεδομένα σε έναν υπάρχοντα πίνακα της βάσης δεδομένων Access. Αυτό το έργο μπορεί να ολοκληρωθεί εύκολα με τη μέθοδο της " TransferText " σε Visual Basic for Applications . VBA μπορεί να χρησιμοποιηθεί για την αυτοματοποίηση των διαδικασιών της Access που είναι κατά τα άλλα ολοκληρωθεί το χέρι . Η μέθοδος " TransferText " χρησιμοποιείται για την εισαγωγή ή εξαγωγή δεδομένων κειμένου μεταξύ της τρέχουσας βάσης δεδομένων Access και ένα αρχείο κειμένου , όπως ένα CSV . Οδηγίες
Η

1 Κάντε κλικ στην καρτέλα " Εργαλεία βάσης δεδομένων " , και κάντε κλικ στο " Visual Basic " για να ανοίξετε το παράθυρο της Visual Basic. . Κάντε κλικ στο "Εισαγωγή" μενού και κάντε κλικ στο " Ενότητα " για να εισάγετε μια νέα λειτουργική μονάδα κώδικα 2

Δημιουργήστε μια νέα διαδικασία υπο πληκτρολογώντας τον ακόλουθο κώδικα :

Private Sub importCSVToTable ( )
εικόνων 3

Δημιουργία δύο μεταβλητές , μία για να κρατήσει το όνομα του τραπεζιού σας και το άλλο για να αποθηκεύσετε τη διαδρομή του αρχείου CSV .

Δημ. existingTable As String

Dim CSVPath Όπως String
Η

4 Ορίστε το όνομα του πίνακα και τη διαδρομή του αρχείου CSV

existingTable = " myTmpTbl "

CSVPath = "F : \\. longDistanceCharges.csv "
5

Πληκτρολογήστε την ακόλουθη γραμμή κώδικα για την εισαγωγή δεδομένων σας CSV σε υπάρχοντα πίνακα της βάσης δεδομένων σας .

DoCmd.TransferText acImportDelim , , existingTable , CSVPath , True

6

Τύπος " End Sub" για να ολοκληρώσετε τη διαδικασία υπο . Πατήστε το πλήκτρο " F5 " για να το τρέξει .
Η
εικόνων