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 :

Problème avec Err.Number [XL-2007]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Juin 2006
    Messages
    622
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 622
    Par défaut Problème avec Err.Number
    Bonjour

    Depuis la version 2007, j'ai remarqué ce problème...
    Pourquoi Err.Number prend il la valeur de 9 !!
    Avec Excel 2003 il restait à 0.




    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Sub test_error()
     
        Debug.Print Err.Number '=0
        Sheets(1).Range("A1").Value = "coucou"
        Debug.Print Err.Number 'pourquoi = 9 ????
     
    End Sub
    Merci
    @+
    Dams'

  2. #2
    Membre Expert Avatar de rvtoulon
    Homme Profil pro
    Agent Technique
    Inscrit en
    Mars 2009
    Messages
    1 042
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 49
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Agent Technique
    Secteur : Santé

    Informations forums :
    Inscription : Mars 2009
    Messages : 1 042
    Par défaut
    Slt,
    j'ai aussi Excel 2007, et j'ai essayé ton code dans un nouveau classeur.
    Il me met "coucou" en A1 ,j'ai mis un msgbox apres debug.print.

    Résultat Err.number = 0, C'est OK.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    Sub test_error()
     
        Debug.Print Err.Number  '=0
        Sheets(1).Range("A1").Value = "coucou"
        Debug.Print Err.Number 'pourquoi = 9 ????
        MsgBox Err.Number 
     
    End Sub
    A+

  3. #3
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Juin 2006
    Messages
    622
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 622
    Par défaut
    Bizarre...
    Moi il me met 9 dans le message.
    Par contre, ma macro ne plante pas et il m'écrit bien coucou dans A1...

    Également fait avec un nouveau classeur (non enregistré) et copié tel quel dans le module 1.

    L'erreur 9 correspond à : "L'indice n'appartient pas à la sélection"

    Quelqu'un d'autre peut-il tester ?

  4. #4
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Juin 2006
    Messages
    622
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 622
    Par défaut
    Je viens de tester sur un autre ordi... résultat = 0 !!!
    C'est quoi ce délire ?!!
    Pourquoi chez moi c'est 9 !!?
    Quelqu'un d'autre peut-il tester ?

    Créer un nouveau document et copier ce code dans un nouveau module... ça prend 30 secondes...
    merci

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Sub test_error()
     
        Sheets(1).Range("A1").Value = "coucou"
        MsgBox Err.Number 
     
    End Sub

  5. #5
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Juin 2006
    Messages
    622
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 622
    Par défaut
    test avec encore un autre ordi... résultat = 9 aussi !!

  6. #6
    Inactif  

    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    4 555
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 4 555
    Par défaut
    Bonjour,

    Je viens de recopîer très exactement ce code et de le lancer (Excel 2007)

    Je connaissais le résultat, mais bon ...

    ====>>> Err.Number reste à 0 (bien évidemment)

    Et la version d'Excel n'a là rien à voir ...

    Seule conclusion possible :

    Le code que tu nous montres n'est qu'une partie de ton code réel

    Fais-nous (pour voir), un copier coller complet et fidèle de ton code...

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

Discussions similaires

  1. IMAP problème avec message uid et msgno Bad Message Number
    Par 12Heracles dans le forum Bibliothèques et frameworks
    Réponses: 1
    Dernier message: 17/02/2009, 19h39
  2. [Struts-Layout] problème avec layout :number
    Par john_wili dans le forum Struts 1
    Réponses: 0
    Dernier message: 10/02/2009, 17h40
  3. [ADO] Problème avec OracleType.Number
    Par Mast3rMind dans le forum C#
    Réponses: 1
    Dernier message: 16/08/2007, 19h46
  4. [ORACLE]Problème avec NUMBER
    Par HexChit dans le forum Oracle
    Réponses: 2
    Dernier message: 17/10/2006, 10h56
  5. Problème avec la mémoire virtuelle
    Par Anonymous dans le forum CORBA
    Réponses: 13
    Dernier message: 16/04/2002, 16h10

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