Discussion :

[mfoxy]

Bonjour le forum,

Je cherche en vain depuis plusieurs jours , peut-être mal, mais je ne trouve pas réponse à ma question qui pourtant devrait être je pense déjà posée.

En gros j'ai , actuellement, 3 tables.

Une bd que je remplis via un formulaire
Deux bd qui me permette de créer et récupérer des correspondances pour création d une bd reprenant tout mes besoins.

Pour ma question :

Je souhaiterais pouvoir updater l ensemble des enregistrement de mes bd existante via un excel

En gros j exporte ma bd actuelle vers excel, fait toute mes modifs ( exepte champs identique) et réimporté l excel sur ma bd existante pour modifier l entièreté de celle-ci ( pas ajouté nouveau record mais update existant)

Ainsi je ne perds pas tout mon formulaire base sur des query,vba,...

J espère avoir été assez explicite

Pourriez vous m indiquer la marche à suivre

Merci

[marot_r]

Bonjour et pourquoi passer par une étape Excel plutôt que de faire les modifs directement dans Access ?

Sinon voici comment le faire "à la main".

1. Tu exportes ta table au format Excel.
2. Tu y fais tes modifications avec Excel.
3. Tu effaces les données dans la table Access.
   Attention : les données, pas la table elle-même.
4. Tu importes les données dans la table Access à partir de ton Excel.

Voilà, tu viens de remplacer toutes les données existantes dans Access par celles dans Excel.

A+

[mfoxy]

Merci bcp,

Tout simplement parceque je m en sort mieux avec excel , et que je reçois ma base de bd par excel.
Je débute avec access, mais me rends déjà compte de la portée d access au niveau bd et traitement de données

[marot_r]

Bonjour.

Note qu'il est possible d'automatiser les étapes manuelles si tu en as besoin.

A+

[ForexFinite]

Bonjour.

Note qu'il est possible d'automatiser les étapes manuelles si tu en as besoin.

A+

Salut Marot,

Je suis dans la même situation que mfoxy et je souhaiterais pouvoir automatiser ce process. Pourrais tu nous partager le script ?

[marot_r]

Bonjour.

Ce n'est pas vraiment un script mais seulement quelques instructions VBA.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
'Export des données vers Excel
call docmd.TransferSpreadsheet(acExport, ,"TaTable", "X:\TonChemin\TaTable.xlsx")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
'Import des données
dim db as dao.database:set db=currentdb
call db.execute("Delete [TaTable].* from [TaTable]", dbFailOnError) 'Vide la table
set db=Nothing
 
call docmd.TransferSpreadsheet(acImport, ,"TaTable", "X:\TonChemin\TaTable.xlsx")

A+