Migrer des données excel vers Access puis vers une base de données liée MySQL
Bonjour à tous,
Dans le cadre d'un projet informatique, on m'a demandé d'utiliser un fichier excel afin de créer une base de données qui servira à alimenter un application Iphone.
J'ai donc fais le choix de créer une base de données Mysql
Utilisant ce MLD
Code:
1 2
| Employe: {id_employe, nom_employe, prenom_employe, date_dispo, etc...}
Employe offshore: {id_employe_offshore, etc...} |
Aucune table de ne contient de clés étrangères il n'y a donc aucune contraintes d'intégrités.
J'ai par la suite crée une base de données Iphone.accdb, que j'ai lié avec la base de données MySql via ODBC. La base Mysql peu donc être implémentée à partir de cette base Access de manière synchrone.
Maintenant sur mon fichier excel, j'ai en VB crée une maccro qui prépare les données à leur importation, je m'explique.
J'ai un fichier qui sert au manager afin de gérer la plannification des employés tout au long du projet. J'ai donc grâce à ma maccro crée plusieurs feuille afin d'y envoyer seulement les données qui m'intéressent et qui alimenteront les tables de ma base.
Maintenant je souhaite migrer ces données vers access grâce à cette même maccro j'ai donc essayé en utilisant différentes sources sur internet en vain.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
| Sub connexion_bdd()
'RENDRE LE TRAITEMENT INVISIBLE
Application.ScreenUpdating = True
Dim db As Database
Dim rs As DAO.Recordset
Dim Fl1 As Worksheet
Set db = OpenDatabase("C:\Users\thibaut31600\Documents\Iphone.accdb")
'OUVERTURE DU LIEN AVEC UNE TABLE DE LA BASE
Set rs = db.OpenRecordset("employe")
Set Fl1 = Worksheets("matricule employe")
rs.AddNew
rs.Fields("id_employe") = Fl1.Range("A1").Value
rs.Update
'FERMETURE DU LIEN AVEC LA TABLE
rs.Close
'FERMETURE DU LIEN AVEC LA BDD
db.Close
Application.ScreenUpdating = True
End Sub |
Ce code me retourne l'erreur 3343 en rapport avec le format de ma base.
j'ai aussi essayé avec une base de données mdb ors il semble y avoir un problème avec les tables liées dans ce cas là :aie:
Je me tourne donc vers vous afin que vous me fournissiez des indications et quelques conseils si possible.
Cordialement
Thibaut31600 étudiant en base de données