Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 16/06/2011, 16h50   #1
Futur Membre du Club
 
Jean Pierre
Inscription : mars 2009
Messages : 63
Détails du profil
Informations personnelles :
Nom : Jean Pierre
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : mars 2009
Messages : 63
Points : 19
Points : 19
Par défaut Mise à jour des références par VBA

Bonjour,

Un certain Raymond m'avait fourni il fut un temps du code qui permettait de lister les références cochées dans VBE. Je ne retrouve malheureusement plus ce code.

Je vais installer une petite application ACCESS chez des utilisateurs qui ont ACCESS en local et qui n'ont pas forcément les bonnes références cochées (et dans le bon ordre).

Existe-t-il un moyen à l'ouverture de ma base de s'assurer que les références sont bien cochées et de les mettre à jour si tel n'est pas le cas.

Merci beaucoup pour votre aide.

JPG
jpg75014 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/06/2011, 16h57   #2
Membre éclairé
 
Homme Michel
Développeur informatique
Inscription : février 2008
Messages : 261
Détails du profil
Informations personnelles :
Nom : Homme Michel
Localisation : France, Hérault (Languedoc Roussillon)

Informations professionnelles :
Activité : Développeur informatique
Secteur : Finance

Informations forums :
Inscription : février 2008
Messages : 261
Points : 304
Points : 304
Par défaut Ceci fonctionne

Code :
1
2
3
4
5
6
7
8
 
Function GetReferences()
Dim Ref As Reference
For Each Ref In Application.References
    Debug.Print "Référence : " & Ref.name & " - Version : " & Ref.Major & "."  _
                                            & Ref.Minor & " - FullPath : " & Ref.FullPath
Next Ref
End Function
Michel
Orion34080 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/06/2011, 17h31   #3
Futur Membre du Club
 
Jean Pierre
Inscription : mars 2009
Messages : 63
Détails du profil
Informations personnelles :
Nom : Jean Pierre
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : mars 2009
Messages : 63
Points : 19
Points : 19
Merci pour ta réponse.

En fouillant dans l'aide, j'ai vu les méthodes AddFromFile et Remove, mais je crains que tout le monde n'ait pas forcément les fichiers logées sur les mêmes chemins.

Par contre, nous disposons tous des mêmes références et des mêmes versions.

Est-il possible de les ajouter en les appelant par leurs noms ?
Ref.Name -> AddFromName ?

Merci encore

JPG
jpg75014 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 19h16.


 
 
 
 
Partenaires

Hébergement Web