ouverture d'un fichier access sous excel - VB/VBA/VBS - Programmation
MarshPosté le 08-03-2006 à 15:19:47
Bonjour
je suis débutant sur VBA
je souhaiterai exporter une base de donne access sous excel tout d'abord je demande la copy du fichier dans un autre repertoire
Dim Sourcemedicine As String, Destinationmedicine As String
Sourcemedicine = "C:\jvserver2001\Database\medicine.mdb" ' Définit le nom du fichier source. Destinationmedicine = "C:\euraf\medicine.mdb" ' Définit le nom du fichier cible. FileCopy Sourcemedicine, Destinationmedicine
ce code fonctionne 1) Mais si le repertoire existe, j'ai une erreur je souhaiterai verifier si le fichier existe dans le repertoire de destination si oui le supprimer, puis déplacer le fichier, dans le cas contraire déplacer le fichier
2) je souhaiterai ouvrir la base pour le mettre dans un fichier excel
A)mais le fichier acces est code par un code le code pour l'ouverture est par exemple " ABCD" comment je peux faire pour que le code soit fait par programmation
pour l'instant, je dois taper le code manuelement
apres avoir taper le code, le fichier access posse plusieur base, comment puis je faire pour selectionner par programmation un de ce base , par exemple la base que je souhaiteri prendre est la base "agenda"
Marsh Posté le 08-03-2006 à 15:19:47
Bonjour
je suis débutant sur VBA
je souhaiterai exporter une base de donne access sous excel
tout d'abord je demande la copy du fichier dans un autre repertoire
Dim Sourcemedicine As String, Destinationmedicine As String
Sourcemedicine = "C:\jvserver2001\Database\medicine.mdb" ' Définit le nom du fichier source.
Destinationmedicine = "C:\euraf\medicine.mdb" ' Définit le nom du fichier cible.
FileCopy Sourcemedicine, Destinationmedicine
ce code fonctionne
1) Mais si le repertoire existe, j'ai une erreur
je souhaiterai verifier si le fichier existe dans le repertoire de destination
si oui le supprimer, puis déplacer le fichier, dans le cas contraire déplacer le fichier
2) je souhaiterai ouvrir la base pour le mettre dans un fichier excel
Workbooks.OpenDatabase _
Filename:=Destinationmedicine
le code suivant fonctionne
A)mais le fichier acces est code par un code
le code pour l'ouverture est par exemple " ABCD"
comment je peux faire pour que le code soit fait par programmation
pour l'instant, je dois taper le code manuelement
apres avoir taper le code, le fichier access posse plusieur base, comment puis je faire pour selectionner par programmation un de ce base , par exemple la base que je souhaiteri prendre est la base "agenda"
merci de votre aide