[VBA Excel] FileDialog non reconnu

Question

Bonjour, 

Je tourne avec Office 2000 et j'utilisais un fichier excel avec macros créé sous excel 2003. Seulement depuis 15 jours, j'ai le message d'erreur suivant à l' exécution d'une macro: 
" Erreur de compilation: 
Type défini par l'utilisateur non défini " sur la ligne Dim fd As 
FileDialog. 

Dim fd As FileDialog 
Set fd = Application.FileDialog(msoFileDialogFilePicker) 

Dim vrtSelectedItem As Variant 

With fd 
.AllowMultiSelect = False 
If .Show = -1 Then 
For Each vrtSelectedItem In .SelectedItems 
If vrtSelectedItem <> "" Then 
GoTo suite 
End If 
Next vrtSelectedItem 
Else 
End If 
End With 

Je sais qu'il existe des problèmes de compatibilités entre les différentes version d'excel, mais bon jusque là le code s' exécutait bien. 
FileDialog étant absent de la bibliothèque de VBA, que dois-je coché dans les références disponibles, voir rajouter pour que cela fonctionne de nouveau. 

Merci de votre aide

HUGOFLASH · Answer

bonjour,

FilDialog fait appelle à la référence Microsoft Office nn.n Object Library

micmic1320 · Answer

La référence Microsoft Office 9.0 Object Library est cochée.

FileDialog n'est parait-il disponible qu'à partir d'excel 2002.
Et pourtant jusqu'ici le code fonctionnait sans problèmes.

HUGOFLASH · Answer

Oui c'est vrai, il est diponible depuis 2002, va voir sur ce site il te propose une solution.

http://officesystem.access.free.fr/apiopenfile.htm

us_30 · Answer

Bonsoir,

J'ai déjà rencontré ce type de problème, et de mémoire, il suffit de recocher la référence " Microsoft Office XX.0 Object Library" avec la version d'Excel la plus basse. Les autres versions plus récentes resteront compatibles sans nouvelles interventions...

Amicalement,
Us.

micmic1320 · Answer

Mon but n'est pas de réécrire le code puisque je suis le seul à utiliser excel 2000, tous les autres utilisant ce fichier travaillent avec excel 2003.
Ce qui tient du miracle, c'est que le code ait pu fonctionner sous excel 2000 sans qu'il n'y ait aucune référence à FileDialog dans la bibliothèque et aujourd'hui, il vient de s'apercevoir que l'objet n'était pas référencé !!!

Et en installant la bibliothèque Microsoft Office 11.0 Object Library, est-ce que ça changerait quelque chose ?

HUGOFLASH · Answer

oui, tu peux installé Microsoft Office 11.0 Object Library, tu auras accée FileDialog

micmic1320 · Answer

Problème, je n'arrive pas à trouver Microsoft Office 11.0 Object Library,  même après des recherches sur les moteurs de recherche....

HUGOFLASH · Answer

c'est pour ça que moi j'utilise le plus possible les API de Window, afin de ne pas dépendre d'une version de l'application.
tu aura Microsoft Office 11.0 Object Library que en installent une version office 2003.

[VBA Excel] FileDialog non reconnu

8 réponses

Votre réponse