[VBA Excel] FileDialog non reconnu
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.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| 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
