macro pour creer une table access depuit un excel

chich

XLDnaute Occasionnel
Bonsoir a tous
je cherche une solution qui a partir d'un bouton dans un userform excel
déclenche la suppression de la table "LES CLIANTS" dans un fichier access "Listable.accdb"
et creer une nouvelle table access"LES CLIANTS" avec un clé automatique qui accepte les doublons
depuis un autre fichier excel "xxxxxxx"dans mon fichier access "Listable.accdb" dans le meme repertoire
merci d'avance
Cordialement
 
Dernière édition:

chich

XLDnaute Occasionnel
Re

cette ligne le fait déjà: "ID COUNTER CONSTRAINT PrimaryKey PRIMARY KEY, "
Re

J'ai retenu cette version qui fonctionne très bien chez moi est il possible d'y
adapter le champ ID COUNTER CONSTRAINT PrimaryKey PRIMARY KEY
merci d'avance
Cordialement
Public Const Fichier$ = "C:\Users\chich\Documents\Base.accdb"

'Activer la référence Microsoft Access 15.0 Object Library
Sub Insertion_Donnees()
Dim acc As New Access.Application

acc.opencurrentdatabase Fichier 'Table Access" 'Plage du tableau Excel
acc.DoCmd.TransferSpreadsheet acImport, 8, "CLIENTS", "Tables Access.xlsm", True, "A1:L22"
acc.closecurrentdatabase
Set acc = Nothing
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 323
Messages
2 087 299
Membres
103 512
dernier inscrit
sisi235