Bonjour à tous,

J'ai un problème dans le code suivant qui fonctioone lorsque la variable est ManteN et pas lorsqu'elle est ManteT, la seule différence (à première vue) réside dans les espaces.

C'est étonnant car le "presque" même code fonctionne pour l'affichage des photos.

Message d'erreur :
Erreur durant l'ouverture du fichier <e:\Mantes2\Fiches>

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Private Sub Image59_Click()
 
ManteN = "e:\Mantes2\CD\F" & [N°Ordre] & ".tif"
ManteT = "e:\Mantes2\Fiches d'élevage\F " & [Nom] & ".jpg"
Dim stAppName As String
    If Dir(ManteN) <> "" Then
        stAppName = "C:\Program Files\XnView\XnView.EXE " & [ManteN]
        Call Shell(stAppName, 1)
    Else
        If Dir(ManteT) <> "" Then
            stAppName = "C:\Program Files\XnView\XnView.EXE " & [ManteT]
            Call Shell(stAppName, 1)
        Else
        End If
    End If
 
End Sub
Si quelqu'un peut m'aider

Merci d'avance

Cordialement