Microsoft accès intégré dans l'environnement de programmation Visual Basic pour Applications ou VBA , permet aux utilisateurs d'effectuer l'une des opérations de données disponibles dans l'interface utilisateur standard d'Access . Ces opérations comprennent les requêtes SQL qui modifient le type de données d'une colonne de la table , comme de nombre entier au texte . Les utilisateurs d'accès peuvent prendre plusieurs approches pour changer le type de données d' un champ avec VBA. Modification des types de terrain avec des macros VBA peut être fait en quelques étapes simples. Instructions
1

Ouvrez Microsoft Access , puis commencer à créer un tableau de données d'échantillons en cliquant sur l'option "Créer" de menu " Table" . Vous utilisez VBA pour modifier le type d'un champ de données dans ce tableau.
2

type " livre " dans la cellule en haut de la deuxième colonne, dans la fenêtre de la grille de table ouverte à l'étape 1. Tapez " Prix " dans la cellule à droite de la cellule " Book" .
3 Type de

n'importe quel nom de livre dans la première cellule en dessous de la tête de la colonne «Livres» et tapez un échantillon prix dans la première cellule dans la colonne «Prix» . Taper le nombre fait automatiquement accès définissent la colonne « Prix » comme un non - texte, un champ numérique .
4

Appuyez sur " Ctrl- S ", puis entrez " Booktable " de donner ce nom à l'échantillon données.
5

un clic droit sur l'onglet " Booktable » et sélectionnez « mode Création. " Le " Prix " ligne de la grille qui apparaît affichera « Numéro ». Cela indique que le champ " Prix " est un numérique , pas de texte, champ . Fermer l'onglet en cliquant droit et en cliquant sur «Fermer».
6

Appuyez sur " Alt- F11 " pour entrer dans la fenêtre de codage pour les macros VBA. Cliquez sur l' option " Module " du menu "Insertion " pour insérer un nouveau module ou une fenêtre pour entrer dans votre programme sur le terrain changeant.
7

Collez le programme suivant dans le module . La déclaration "Exécuter" de ce programme exécute une commande SQL, " ALTER TABLE ", sur les données " Booktable " . Cette commande modifie le type de champ du champ " Prix " de numérique en texte .

Publique ChangeDataType Sub ( )

Dim dBase comme DAO.Database

Set dbase = CurrentDB Photos

dbase.Execute ( " ALTER TABLE ALTER COLUMN Booktable [ prix ] texte ( 25) ;")

End Sub
8

exécuter le programme en cliquant sur l'une de ses déclarations et en cliquant sur " Run " La commande du menu " Run" .
9

de retourner à l'accès en appuyant sur " Alt- F11 ", puis ré-afficher la vue de conception des données " Booktable " par en utilisant les instructions de l'étape 5. La ligne «Prix» affiche maintenant " texte " au lieu de "Nombre ".