Discussion :

[Nicoyong]

Bonjour,
Je m'adresse à votre communauté, car je suis en train de développer une macro VBA sous Excel qui sera utilisé sous un système 32 et 64 bits. Je rencontre un problème au niveau de mes chemins de référence DLL, en effet sous un environnement 32 bits mon chemin d'accès est : « C:\Program Files\ …. » Alors que sous un système 64 bits il sera : « C:\Program Files (x86)\ … ».
Donc, ma question est : existe-t-il une façon de déclarer le chemin des DLL en fonction du système sous lequel ma macro s'exécute.
Merci d’avance pour l'attention portée à mon problème.

[piotr76]

Bonjour

A essayer, la fonction Environ. C'est un classique, mais ça aide toujours
Dans un module standard la fonction MyEnv

Code :

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

1
2
3
Function MyEnv(arg1 As Integer) As String
    MyEnv = Environ(arg1)      'Un coup de F1 sur Environ pour + d'explications, mais on reste dans le laconique
End Function

Dans une feuille vierge, "A1" =1, "B1"=MyEnv(A1), tirer vers le bas. Pour du 64 bits, ça va jusqu'à 39.
Après, il faut faire le tri



Cordialement

[Invité]

Bonjour,
Visual Basic For Applications est une librairie par défaut elle se trouve comme tu l'as dit dans C:\Program Files\ ou C:\Program Files (x86)!

pour palier a cela tu peux utiliser l'instance effectivement chargé.

Code instance Vba :

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

txt =VBA.Left("TOTO",1)

pour Word, Excel, Fso... pas de référence mais du CreateObject

Code :

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

1
2
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")

Code :

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

1
2
Dim Wdr As Object
Set Wdr = CreateObject("Word.Application")

[Nicoyong]

merci pour vos réponses mais mes connaissances en VBA ne permettent pas de comprendre. Pourriez-vous détailler un petit peu plus, je vous remercie d'avance.

[Invité]

Bonjour,
comme dit plus haut, Visual Basic For Applications est une référence chargé par défaut, elle ce trouve au choix dans C:\Program Files\ ou C:\Program Files (x86); comme les référence sont incluses dans ton projet VB elle ce retrouve en doublons (Conflit)! toutes le instruction VBA (Trim, Left, Ucase...) font référence à cette dll difficile de ce passer de Visual Basic dans VBA!

donc on utilisera l'instance VBA qu’excelle aura réellement chargé en mémoire.

Code :

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

txt =VBA.Left("TOTO",1)

on évitera dans la mesure du possible de sélectionner de référence dans son projet VBA.

Code Avec sélection de référence :

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

dim Wrd as New  Word.Application

Code Pas de sélection de référence :

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

1
2
dim Wrd as Object
Set Wrd = CreateObject("Word.Application")

[Nicoyong]

Un grand merci pour vos explications.
j'ai pu appliquer vos précieux conseils sur la partie de macro que j'ai écrite moi-même, ce qui a corrigé mes problèmes concernant la DLL relatifs à Word.
mais il doit me manquer une subtilité car je n'arrive pas à appliquer ce correctif dans un code j'ai récupéré sur le net pour générer un fichier PDF, la DLL concernant PDF créateur ne pose toujours problème.