Probleme ouverture base de donnees vba
Résolu
SIGI_forever
Messages postés
25
Date d'inscription
Statut
Membre
Dernière intervention
-
Polux31 Messages postés 6917 Date d'inscription Statut Membre Dernière intervention -
Polux31 Messages postés 6917 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai cree une base de donnees access, et quelque part dans le code, je dois utiliser le chemin d'acces
j'ai donc une macro qui va le chercher et qui le met dans une variable nommee filename
filename=Application.CurrentProject.Fullname
j'ai teste la valeur de filename et le fichier est le bon
mais au moment d'ouvrir la base de donnees:
runtime error 3024
couldn't find file 'filename'
voici le code correspondant
Dim strDB As String
Dim objDB As Database
strDB = "file"
Set objDB = OpenDatabase(strDB)
.../...
objDB.Close
Set objDB = Nothing
j'ai cree une base de donnees access, et quelque part dans le code, je dois utiliser le chemin d'acces
j'ai donc une macro qui va le chercher et qui le met dans une variable nommee filename
filename=Application.CurrentProject.Fullname
j'ai teste la valeur de filename et le fichier est le bon
mais au moment d'ouvrir la base de donnees:
runtime error 3024
couldn't find file 'filename'
voici le code correspondant
Dim strDB As String
Dim objDB As Database
strDB = "file"
Set objDB = OpenDatabase(strDB)
.../...
objDB.Close
Set objDB = Nothing
A voir également:
- Probleme ouverture base de donnees vba
- Fuite données maif - Guide
- Base de registre - Guide
- Supprimer les données de navigation - Guide
- Page d'ouverture google - Guide
- Formules mathématiques de base - Télécharger - Études & Formations
4 réponses
Dim strDB As String
Dim objDB As Database
strDB = filename ?
Pourquoi ne pas mettre directement :
Set objDB = OpenDatabase(filename)
Dim objDB As Database
strDB = filename ?
Pourquoi ne pas mettre directement :
Set objDB = OpenDatabase(filename)
Mais si tu exécutes Application.CurrentProject.FullName ce qui te donne le nom du fichier que tu utilises actuellement, à quoi ça sert de le réouvrir?
