Inputbox bouton cancel qui marche pas

Résolu/Fermé
predateur Messages postés 73 Date d'inscription lundi 22 mars 2004 Statut Membre Dernière intervention 20 février 2008 - 20 juil. 2006 à 20:03
predateur Messages postés 73 Date d'inscription lundi 22 mars 2004 Statut Membre Dernière intervention 20 février 2008 - 20 févr. 2008 à 15:41
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

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
predateur Messages postés 73 Date d'inscription lundi 22 mars 2004 Statut Membre Dernière intervention 20 février 2008 3
20 févr. 2008 à 15:41
merci.
0