[VBA] Fonction if !!! Need help

Résolu

Dog killer Messages postés 57 Date d'inscription Statut Membre Dernière intervention -
Dog killer Messages postés 57 Date d'inscription Statut Membre Dernière intervention - 7 juin 2007 à 10:29

Bonjour, j'avais créé un post a propos de if sans réponse , bref!
je vais reprendre mon problème: je voulais utiliser la fonction si dans une cellule de mon classeur mais j'ai besoin de plus de huit si donc je doit passer en VBA avec la fonction IF . J'ai essayé de m'y mettre mais ce que j'ai écrit comporte des érreur !!!! (boite de dialogue) donc si vous pouvez m'aider???
PS: au debut je ne voulais pas de macro mais maintenant je pense mettre un boutton pour l'actionner.

If B14="" then B16=""
Else
   If B9="diam interieur" then
      If B14>B11 then
      B15="REBUT"
      Else
         If B14<B10 Then B15="A USINER"
         Else
            If B12<B14<B11 then B15="BONNE"
            End if
   Else
      If B14<B11 then
      B15="REBUT"
      Else
         If B14>B10 Then B15="A USINER"
         Else
            If B12<B14<B11 then B15="BONNE"
            End if
End if

merci

A voir également:

[VBA] Fonction if !!! Need help
Fonction si et - Guide
Fonction miroir - Guide
Need for speed network - Télécharger - Jeux vidéo
Fonction moyenne excel - Guide
Télécharger need for speed pc gratuit complet - Télécharger - Jeux vidéo

2 réponses

Réponse 1 / 2

blux Messages postés 27109 Date d'inscription Statut Modérateur Dernière intervention 3 359

Salut,

c'est quoi ton erreur ?

Dog killer Messages postés 57 Date d'inscription Statut Membre Dernière intervention 25

ca me dit : else sans if

blux Messages postés 27109 Date d'inscription Statut Modérateur Dernière intervention 3 359

C'est normal, tu as 8 if et 3 end if, alors il se perd !

Prends l'habitude d'indenter ton code, tu verras où ils doivent être placés...

Ca peut donner un truc comme ça :

If B14="" then
    B16=""
Else
   If B9="diam interieur" then
      If B14>B11 then
        B15="REBUT"
      Else
         If B14<B10 Then
            B15="A USINER"
         Else
            If B12<B14<B11
                then B15="BONNE"
            End if
         End if
      End if
   Else
      If B14<B11 then
         B15="REBUT"
      Else
         If B14>B10 Then
            B15="A USINER"
         Else
            If B12<B14<B11 then
                B15="BONNE"
            End if
         End if
      End if
   End if
End if

--
A+ Blux

 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"

Réponse 2 / 2

Dog killer Messages postés 57 Date d'inscription Statut Membre Dernière intervention 25

Merci beaucoup

Discussions similaires

Méthode find dans VBA - Recherche de données sous Excel

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

Remplir une cellule (texte) en fonction d'une autre (texte).

Votre réponse

Discussions similaires