Discussion :

[AndréPe]

Bonsoir.
Dans mon application, j'utilise des bases externes qui sont référencées.
Elles s'ouvrent donc au lancement de l'application.

En cours de travail, il doit y avoir possibilité de supprimer la référence d'une de ces bases externes, ce qui se fait bien par

Code :

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

1
2
3
4
5
For Each ref In Application.References
    If ref.Name = abrev Then
      References.Remove ref
    End If
  Next

mais la base en question reste ouverte (le fichier base.ldb est toujours présent dans le répertoire).
Ce n'est pas bien gênant, quand il n'y en a qu'un, mais j'aimerais pouvoir fermer la base pour assainir la situation.

Comment fermer cette base en VBA ?
Amitiés

[zibi7]

Bonjour,
Rentre-il dans la boucle ? car si non ça pourrait être la condition

Code :

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

1
2
3
4
5
6
For Each ref In Application.References
    If ref.Name = "abrev" Then
      References.Remove ref
    End If
  Next

sinon j'ai trouvée ça dans l'aide de vba:
Remove, méthode:
object.Remove(component)
object Expression d'objet qui prend la valeur d'un objet figurant dans la rubrique "Application".
component Pour la collection LinkedWindows, un objet. Pour la collection References, une référence à une bibliothèque de types ou à un projet. Pour la collection VBComponents, une constante énumérée représentant un module de classe, une feuille ou un module standard. Pour la collection VBProjects, un projet autonome.

en espérant que ça va t'aider

[AndréPe]

Merci zibi7,
La piste que tu signales efface la référence, mais ne ferme pas la base.Je cherche.

Merci
amitiés

[Domi2]

Bonjour,

Je suis un peu perplexe...

Si ton application utilise d'autres bases Access comme "bibliothèque", pourquoi vouloir les fermer en cours d'utilisation ?

Une explication serait sans doute bienvenue.

Domi2

[AndréPe]

@Domi2
Bonjour,
Je souhaite fermer les bases bibliothèques qui ne sont plus référencées simplement pour nettoyer l'environnement.

Elles peuvent évidemment rester ouvertes, ce n'est pas catastrophique, mais c'est inutile.
La fermeture de l'application les fermera.
Amitiés

[Domi2]

Bonjour,

La fermeture de l'application les fermera

Ben oui... Et ce que tes utilisateurs sont "perturbés" par les fichiers .ldb (pour autant qu'ils regardent dans le gestionnaire de fichiers ?

Je n'ai pas d'autre solution qu'un bon "Kill" après avoir supprimé la référence.

Domi2