Bonjour je recois des données quotidiennement toujours sur le même fo rmat, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Bonjour je recois des données quotidiennement toujours sur le même fo rmat, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Bonjour je recois des données quotidiennement toujours sur le même fo rmat, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" <remigo@discussions.microsoft.com> a écrit dans le message de news:
7223227B-D261-4CA1-9DE3-6FA78DB6F7BA@microsoft.com...
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" <remigo@discussions.microsoft.com> a écrit dans le message de news:
7223227B-D261-4CA1-9DE3-6FA78DB6F7BA@microsoft.com...
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour insérer des nouvelles données dans une table Access,
on se doit de respecter les "restrictions" de la table.
Le type de données doit correspondre entre ceux du classeur (colonne par colonne)
avec le type de données des champs de la table Access
Si la table d'access a une restrinction par exemple : "Un champ ne peut pas être vide"
pour valideer un enregistrement, cette restriction doit aussi être respectée.
IL y en a d'autres... cela dépend de ta table ! As-tu fait ce type de vérifications ?
"remigo" a écrit dans le message de news:
Bonjour ça marche jusqu'avant la ligne:
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM
[Plage]"
Pourtant mon champ nommé plage est bien configurer sur la feuille excel et
ma table Access porte exactement les mêmes noms de champs que ma feuille excelPour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour insérer des nouvelles données dans une table Access,
on se doit de respecter les "restrictions" de la table.
Le type de données doit correspondre entre ceux du classeur (colonne par colonne)
avec le type de données des champs de la table Access
Si la table d'access a une restrinction par exemple : "Un champ ne peut pas être vide"
pour valideer un enregistrement, cette restriction doit aussi être respectée.
IL y en a d'autres... cela dépend de ta table ! As-tu fait ce type de vérifications ?
"remigo" <remigo@discussions.microsoft.com> a écrit dans le message de news:
90D8833A-6AE0-47CF-8B76-9EDEEF5933F8@microsoft.com...
Bonjour ça marche jusqu'avant la ligne:
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM
[Plage]"
Pourtant mon champ nommé plage est bien configurer sur la feuille excel et
ma table Access porte exactement les mêmes noms de champs que ma feuille excel
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" <remigo@discussions.microsoft.com> a écrit dans le message de news:
7223227B-D261-4CA1-9DE3-6FA78DB6F7BA@microsoft.com...
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour insérer des nouvelles données dans une table Access,
on se doit de respecter les "restrictions" de la table.
Le type de données doit correspondre entre ceux du classeur (colonne par colonne)
avec le type de données des champs de la table Access
Si la table d'access a une restrinction par exemple : "Un champ ne peut pas être vide"
pour valideer un enregistrement, cette restriction doit aussi être respectée.
IL y en a d'autres... cela dépend de ta table ! As-tu fait ce type de vérifications ?
"remigo" a écrit dans le message de news:
Bonjour ça marche jusqu'avant la ligne:
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM
[Plage]"
Pourtant mon champ nommé plage est bien configurer sur la feuille excel et
ma table Access porte exactement les mêmes noms de champs que ma feuille excelPour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour insérer des nouvelles données dans une table Access,
on se doit de respecter les "restrictions" de la table.
Le type de données doit correspondre entre ceux du classeur (colonne par colonne)
avec le type de données des champs de la table Access
Si la table d'access a une restrinction par exemple : "Un champ ne peut pas être vide"
pour valideer un enregistrement, cette restriction doit aussi être respectée.
IL y en a d'autres... cela dépend de ta table ! As-tu fait ce type de vérifications ?
"remigo" a écrit dans le message de news:
Bonjour ça marche jusqu'avant la ligne:
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM
[Plage]"
Pourtant mon champ nommé plage est bien configurer sur la feuille excel et
ma table Access porte exactement les mêmes noms de champs que ma feuille excelPour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour insérer des nouvelles données dans une table Access,
on se doit de respecter les "restrictions" de la table.
Le type de données doit correspondre entre ceux du classeur (colonne par colonne)
avec le type de données des champs de la table Access
Si la table d'access a une restrinction par exemple : "Un champ ne peut pas être vide"
pour valideer un enregistrement, cette restriction doit aussi être respectée.
IL y en a d'autres... cela dépend de ta table ! As-tu fait ce type de vérifications ?
"remigo" <remigo@discussions.microsoft.com> a écrit dans le message de news:
90D8833A-6AE0-47CF-8B76-9EDEEF5933F8@microsoft.com...
Bonjour ça marche jusqu'avant la ligne:
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM
[Plage]"
Pourtant mon champ nommé plage est bien configurer sur la feuille excel et
ma table Access porte exactement les mêmes noms de champs que ma feuille excel
Pour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" <remigo@discussions.microsoft.com> a écrit dans le message de news:
7223227B-D261-4CA1-9DE3-6FA78DB6F7BA@microsoft.com...
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!
Pour insérer des nouvelles données dans une table Access,
on se doit de respecter les "restrictions" de la table.
Le type de données doit correspondre entre ceux du classeur (colonne par colonne)
avec le type de données des champs de la table Access
Si la table d'access a une restrinction par exemple : "Un champ ne peut pas être vide"
pour valideer un enregistrement, cette restriction doit aussi être respectée.
IL y en a d'autres... cela dépend de ta table ! As-tu fait ce type de vérifications ?
"remigo" a écrit dans le message de news:
Bonjour ça marche jusqu'avant la ligne:
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM
[Plage]"
Pourtant mon champ nommé plage est bien configurer sur la feuille excel et
ma table Access porte exactement les mêmes noms de champs que ma feuille excelPour le temps que va durer l'exportation, on doit créer une plage nommée
de la colonne à exporter vers la base de données.
Cette plage nommée dans l'exemple s'appelle "Plage".
La toute première ligne de la plage nommée "plage" représente une étiquette
de colonne du même nom de champ de la table
où les données seront exportées.
Dans l'exemple suivant, il ne te restera plus qu'à adapter le nom des
objets selon ton application.
toto = Nom de la table dans la base de données Comptoir.mdb
Pour ce qui est du champ de numéro automatique dans ta base de données,
il va se mettre à jour tout seul !
Évidemment, tu dois ajouter la bibliothèque : Microsoft DAO 3.6 objects Librairy
'--------------------------------------------
Sub ExporterVersAccess()
Dim bd As DAO.Database
Dim Rst As DAO.Recordset
With Worksheets("Feuil1")
.Range("B4:B" & .Range("B65536").End(xlUp).Row).Name = "Plage"
End With
Set bd = OpenDatabase(ThisWorkbook.FullName, False, False, "excel 8.0")
bd.Execute "INSERT INTO toto IN 'C:ExcelComptoir.mdb' SELECT * FROM [Plage]"
ThisWorkbook.Names("Plage").delete
bd.Close
Set bd = Nothing
End Sub
'--------------------------------------------
"remigo" a écrit dans le message de news:
Bonjour je recois des données quotidiennement toujours sur le même format, et
je veux les exporter vers access et ce de facon automatique.
Comment je peux faire?
Merci à l'avance!