Erreur de code

Résolu
mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   -  
yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   -

Bonjour,
Dans le code VBA suivant:
For i = 1 To 20
    If ActiveCell.Value = 0 Then Exit For
Next

je veux arrêter la boucle dès que le contenu de la cellule active n'est pas un nombre entier. Or, ici ça ne fonctionne pas: si la cellule contient du texte, elle continue! Elle ne s'arrête que sur une cellule vide ...
Comment corriger ? 


Windows / Chrome 123.0.0.0

1 réponse

  1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     

    bonjour,

    connais-tu la fonction isnumeric()?

    1
    1. mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   19
       

      Merci pour ta réponse!
      Non, je ne la connaissait pas ... Après recherche sur le net, je l'ai utilisée et ça fonctionne parfaitement!
      Merci pour to aide, cordialement, Mikel

      0
      1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588 > mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention  
         

        Tu veilles alors à marquer la discussion comme résolue?

        1
      2. mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention   19 > yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention  
         

        Oui, la discussion est résolue, mais si je clique sur l'icone "pouce vers le haut", la fenêtre "marquée comme résolue" ne s'affiche plus ???

        0
      3. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588 > mikel831 Messages postés 237 Date d'inscription   Statut Membre Dernière intervention  
         

        Je l'ai marqué comme résolue.

        0