IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

[vba-e] Gestion D'erreur Dans Un Inputbox


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 39
    Points : 28
    Points
    28
    Par défaut [vba-e] Gestion D'erreur Dans Un Inputbox
    Bonjour,

    EDIT : J'ai dit n'importe quoi, il ne s'agit pas du tout d'un user form, c'est simplement une inputbox.

    Lors de la gestion des erreurs, 2 erreures possibles se posent.

    Je rappelle que je traite des données numériques

    La première : L'utilisateur entre le chiffre 0 ( division par 0 )
    La seconde : L'utilisateur entre une CHAINE DE CARACTERE

    J'ai géré sans problèmes la division par 0.

    Par contre, pour ce qui est de la chaine de caractère ( vide ou non ), je n'arrive pas à trouver une solution.

    Quand l'utilisateur entre une chaine vide ( donc rien ), ou une chaine non vide, il se produit une incompatibilité de type, puisque la variable qui receuille l'information est de type DOUBLE.

    Donc je ne peut meme pas effectuer de test dessus avant de l'affecter à ma variable.

    Je ne sais pas si j'ai été trés limpide.

    Merci d'avance.

  2. #2
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 39
    Points : 28
    Points
    28
    Par défaut
    Rebonjour,
    Je viens de trouver la solution.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
     If InputBox("Veuillez entrer le prix") = "" Then
                MsgBox "Prix doit être renseigné !"
     End If
    La solution peut paraitre evident, ceci dit, je ne savais pas qu'on pouvait effectuer des tests sur des chaines de caractères directement sur une InputBox.

    Merci à tous, et désolé d'avoir fais perdre leur temps à ceux qui ont cherché, si chercheur il y a eu.

    RESOLU

  3. #3
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 39
    Points : 28
    Points
    28
    Par défaut
    Hum...

    En fait c'est terriblement faux ce que j'ai fais.

    La, le test est effectivement effectuer, le problème est que l'utilisateur devra entrer 2 fois la réponse, et donc le test ne sert a rien.

    En effet :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    If InputBox("Veuillez entrer le prix") = "" Then
                MsgBox "Le prix doit etre renseigné!"
                GoTo recommence0
    Else
                Prix = InputBox("Veuillez entrer le prix")
    End If
    Helppp ...

    Merci.

  4. #4
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 39
    Points : 28
    Points
    28
    Par défaut
    J'ai trouvé ( ENCORE ! ) ma réponse ici :

    http://silkyroad.developpez.com/VBA/GestionErreurs/

    Super complet ce tutorial.

    Bref moralité de l'histoire : cherche ou crève.

    A+ merci a tous.

    RESOLU.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Gestion des erreurs dans Application.Inputbox avec Range
    Par Aureus Magnus dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 08/05/2013, 12h38
  2. [OL-2010] Gestion des erreurs dans un script VBA
    Par sebastian37 dans le forum Outlook
    Réponses: 1
    Dernier message: 08/07/2011, 21h31
  3. Gestion d'erreur dans vba
    Par tribaleur dans le forum VBA Access
    Réponses: 2
    Dernier message: 07/02/2008, 09h19
  4. Gestion d'erreur dans les procédure
    Par speedy1496 dans le forum MS SQL Server
    Réponses: 5
    Dernier message: 20/01/2006, 13h02
  5. [VB6] Gestion des erreurs dans une dll
    Par zimba-tm dans le forum VB 6 et antérieur
    Réponses: 8
    Dernier message: 02/08/2004, 12h20

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo