1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

Modier nom d'une colonne vba access

[Résolu]
Signaler
Messages postés
63
Date d'inscription
jeudi 30 mars 2006
Statut
Membre
Dernière intervention
7 août 2008
 -
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
 -
Bonjour,

Pouriez-vous m'aidez je cherche a modifier le nom d'une colonne de ma table par programmation vb access.
J'ai essayer ce type de requete mais cela ne fonctionne pas.

ALTER TABLE ma_table MODIFY COLUMN [Numéro de voirie] TO NUM_DOMICILE

merci d'avance

---------
Manhino
---------

4 réponses

Réponse 1 / 4
Messages postés
63
Date d'inscription
jeudi 30 mars 2006
Statut
Membre
Dernière intervention
7 août 2008
voici la reponse pour se a qui sa interesse:

Librairie : Microsot ADO Ext 2.X for dll and security Microsof ActiveX Data Object 2.X Library


Dim MCat As New ADOX.Catalog
Dim MTable As ADOX.Table
Dim MField As ADOX.Column
Set MCat.ActiveConnection = CurrentProject.Connection
Set MTable = MCat.Tables("Sacs_poubelles1") 'Table
Set MField = MTable.Columns("Numéro de voirie") 'Ancien nom
MField.Name = "NUM_DOMICILE"  'Nouveau nom

---------
Manhino
---------
Réponse 2 / 4
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
 70
http://groups.google.fr/group/comp.databases.ms-access/browse_thread/thread/670c4649b5d041cd/627dc055da0054da?hl=fr&lnk=st&q=Access+rename+field+SQL#627dc055da0054da

par SQL, j'y crois pas trop, Access a une vision personnelle de la chose
Réponse 3 / 4
Messages postés
63
Date d'inscription
jeudi 30 mars 2006
Statut
Membre
Dernière intervention
7 août 2008
merci je vais voir sa
Réponse 4 / 4
Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
 70
en condensant:

Set MCat.ActiveConnection = CurrentProject.Connection
MCat.Tables("Sacs_poubelles1").Columns("Numéro de voirie").Name = "NUM_DOMICILE"
Répondre Posez votre question