Πώς να Μετονομασία Στήλες για VBA και Access

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

Ξεκινήστε την Access 2007 , επιλέξτε " Εργαλεία βάσης δεδομένων " και κάντε κλικ

Πληκτρολογήστε το παρακάτω, για να δημιουργήσετε ένα νέο sub " Visual Basic ". :

Sub renameColumns ( )

Press " . Enter" 2

Πληκτρολογήστε το παρακάτω, για να δηλώσει "string" και " βάση δεδομένων " μεταβλητή :

Dim sqlString As String

Dim dbs Ως βάση δεδομένων εικόνων
3

Πληκτρολογήστε τα ακόλουθα για να δημιουργήσετε έναν νέο πίνακα που ονομάζεται " MyTable " και τα δύο πεδία :

sqlString = " CREATE TABLE MyTable ( FirstName TEXT ( 25 ) , Επώνυμο TEXT ( 25 ) ) ? "

DoCmd.RunSQL ( sqlString )
Η 4

Πληκτρολογήστε τα ακόλουθα για να μετονομάσετε τα πεδία " MyTable : "

dbs.TableDefs ( " MyTable " ) . πεδία ( " FirstName " ) . Name = " ΟΝΟΜΑ "

dbs.TableDefs ( " MyTable " ) . πεδία ( "Επώνυμο" ) . Name = " ΕΠΙΘΕΤΟ "

Κάντε κλικ μέσα σου " renameColumns " sub και πατήστε το πλήκτρο " F5 " για να το τρέξει .
Η
εικόνων