Inputbox bouton cancel qui marche pas

Résolu
predateur Messages postés 73 Statut Membre -  
predateur Messages postés 73 Statut Membre -
Bonjour,

J'utilise inputbox pour permettre à l'utilisateur d'entrer un nom qui sera ensuite attribué au fichier exporté en .csv.Voici mon code

nom_fichier = InputBox("Saisissez le nom du fichier à créer", "CHOIX DU NOM DU FICHIER", "SiteStation")

chemindataexport_asciiSiteSta = App.Path + "\" + nom_fichier & ".csv"

Le problème c'est que même si je clique sur CANCEL, le fichier est créé et s'appelle .csv

donc j'aimerai savoir comment faire s'il vous plaît pour que lorsque j'appuye sur le bouton CANCEL, ca ferme le dialogue sans que ca soit exporté, c'est à dire sans que ca lise le code d'exportation:
chemindataexport_asciiSiteSta = App.Path + "\" + nom_fichier & ".csv"

je vous remercie d'avance

2 réponses

  1. carbon3
     
    L'appui sur Cancel envoie une chaîne vide en guise de variable, donc :

    if nom_fichier <> "" then
    chemindataexport_asciiSiteSta = App.Path + "\" + nom_fichier & ".csv"
    else
    autre instruction...
    end if

    Il n'est jamais trop tard
    0
  2. predateur Messages postés 73 Statut Membre 3
     
    merci.
    0