Πώς να αλλάξετε τον τύπο δεδομένων Με Macro Access

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

1 Ανοίξτε το Microsoft Access , στη συνέχεια να αρχίσει τη δημιουργία ενός πίνακα δεδομένων του δείγματος κάνοντας κλικ στο " τραπέζι" το στοιχείο του μενού " Δημιουργία " του . Θα χρησιμοποιήσετε VBA για να αλλάξετε τον τύπο δεδομένων ενός πεδίου σε αυτόν τον πίνακα . 2

Πληκτρολογήστε "Βιβλίο " στο πάνω κελί της δεύτερης στήλης , στο παράθυρο του πίνακα πλέγματος ανοίξατε στο βήμα 1 . Πληκτρολογήστε " Τιμή " στο κελί στα δεξιά του "Βιβλίου " κύτταρο .
Εικόνων 3

Πληκτρολογήστε το όνομα του βιβλίου στο πρώτο κελί κάτω από την «Βιβλία» επικεφαλίδα στήλης και πληκτρολογήστε ένα δείγμα τιμή στο πρώτο κελί κάτω από τη στήλη " Τιμή " . Πληκτρολογώντας τον αριθμό αυτόματα καθιστά Access καθορίζουν τη στήλη " Τιμή " ως μη - κείμενο , αριθμητικό πεδίο .
Η

4 Πιέστε το πλήκτρο " Control- S , " στη συνέχεια, πληκτρολογήστε " Booktable » για να δώσει αυτό το όνομα στο δείγμα δεδομένων.
5

κάντε δεξί κλικ στην καρτέλα " Booktable " και επιλέξτε " προβολή σχεδίασης ". Η " τιμή " γραμμή του πλέγματος που εμφανίζεται θα εμφανίσει " Αριθμός ". Αυτό δείχνει ότι η " Τιμή " πεδίο είναι αριθμητικό , όχι κείμενο , πεδίο . Κλείστε την καρτέλα με δεξί κλικ και επιλέγοντας "Close ".
Η

6 Πατήστε το πλήκτρο " Alt - F11 " για να εισάγετε την κωδικοποίηση παράθυρο για μακροεντολές VBA . Κάντε κλικ στο "Εισαγωγή " " ενότητα " του μενού για να εισαγάγετε μια νέα λειτουργική μονάδα ή ένα παράθυρο για την εισαγωγή του προγράμματος πεδίο αλλάζει σας .
Η 7

Επικολλήστε τον ακόλουθο πρόγραμμα στη μονάδα . " Εκτέλεση " δήλωση αυτού του προγράμματος εκτελείται μια εντολή SQL , " ALTER TABLE , " σχετικά με τα δεδομένα " Booktable " . Αυτή η εντολή αλλάζει τον τύπο πεδίου της " Τιμή " τομέα από τις αριθμητικές σε κείμενο .

ChangeDataType Public Sub ( )

Dim dbase Όπως DAO.Database

Set dbase = CurrentDb

dbase.Execute ( « ALTER TABLE Booktable ALTER ΣΤΗΛΗ [ τιμή ] κείμενο ( 25 ) ? " )

End Sub
8

Εκτελέστε το πρόγραμμα κάνοντας κλικ σε ένα των καταστάσεων και κάνοντας κλικ στο μενού " Run " του " Run " εντολή του .
Η 9

Επιστροφή στην πρόσβαση πατώντας το πλήκτρο " Alt - F11 , " τότε εμφανιστεί ξανά την άποψη του σχεδιασμού των δεδομένων " Booktable " από χρησιμοποιώντας βήμα οδηγίες 5άρια. Η "τιμή", σειρά εμφανίζει τώρα " Κείμενο " αντί του "Number ".
Η
εικόνων