Tester le contenu d'une variable string issu d'un dialogue "ouverture..." annulé

[cabsen]

Bonjour à tous,

Je rencontre un soucis avec un test If dont voici le code :

Option Explicit
Dim chemFic As String

Public Sub selectionFichierAMettreEnForme()

chemFic = Application.GetOpenFilename("XCEL,XLS8")

If chemFic = Null Then 'Si l'utilisateur annule la boîte

    Range("ficSel") = "aucun fichier sélectionné !"
    
Else
    
    Range("ficSel") = chemFic
    
End If

End Sub

Lorsque l'utilisateur sélectionne un fichier excel dans le dialogue "Ouvrir..." tout se déroule correctement et le chemin est placé dans la cellule.

Lorsque l'utilisateur ne sélectionne aucun fichier ou clique le bouton annuler du dialogue, ça ne se passe pas comme je l'espérais. La valeur FAUX est placé dans la cellule et nom le texte d'information "aucun fichier sélectionné !".

J'ai testé Null, false, "FAUX", rien ne semble fonctionner.

Si quelqu'un a une piste, je suis preneur.

D'avance merci à tous

 

[Fred0o]

Re : Tester le contenu d'une variable string issu d'un dialogue "ouverture..." annulé

Bonjour Cabsen,

Tu y était presque. Chez moi, en mettant ceci, ça marche :

If chemFic = "Faux" Then 'Si l'utilisateur annule la boîte

A+

 

[cabsen]

Re : Tester le contenu d'une variable string issu d'un dialogue "ouverture..." annulé

Malheureusement, cela ne fonctionne pas chez moi. Je travaille sous Mac OS X et j'imagine qu'il y a une subtilité qui m'échappe…

En fait cela fonctionne avec "False" mais dans ce cas, lorsque l'utilisateur sélectionne bien un fichier et valide, cela ne fonctionne plus.

Merci Fred0o en tout cas, je vais tester toutes les manières d'écrire vide, faux ou non défini