Si plusieurs conditions réunies alors macro sinon ne rien faire

Condition

cs13 -
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention - 15 mai 2015 à 19:17

Bonjour,

je voudrai faire ou ne pas faire une action en fonction des conditions, remplies ou non.

C'est à dire:
si la dernière ligne de la colonne c sur la feuille2 est "moteur" et que la valeur de C2 sur ma feuille 1 et > 0 alors le résultat de c2 feuille1 = c2-1 sinon ne pas exécuter les macros et mettre un mesgbox "stock à zéro"

Il me manque des trucs... Le savoir faire sans doute :-)

If Sheets("Feuil2").Range("c65536").End(xlUp) = "moteur" and Sheets ("Feuil1").range ("c2")>0 Then Sheets("Feuil1").Range("c2") = Sheets("Feuil1").Range("c2") - 1 else (ne pas exécuter la macro et afficher mesbox= "stock à zéro"

Un grand merci pour votre aide.

Afficher la suite

A voir également:

Vba if plusieurs conditions
Mise en forme conditionnelle excel plusieurs conditions - Guide
L'indice n'appartient pas à la sélection vba - Forum VB / VBA
Incompatibilité de type vba ✓ - Forum Programmation
Excel compter cellule couleur sans vba - Guide
Vba attendre 1 seconde ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention 1 713

Bonjour,

   If Sheets("Feuil2").Range("C65536").End(xlUp) = "moteur" And Sheets("Feuil1").Range("C2") > 0 Then
        Sheets("Feuil1").Range("C2") = Sheets("Feuil1").Range("C2") - 1
    Else
        '(ne pas exécuter la macro et afficher mesbox= "stock à zéro"
        MsgBox "Stock à zéro"
        'sortie macro
        Exit Sub
    End If

Discussions similaires

Cellule clignotante sous condition

Mise en forme conditionnelle avec plusieurs conditions

Fonction SI à plusieurs conditions avec inférieur et supérieur

Fonction SI avec MAX imbriqué

Le champ calculé TCD

NB.SI en fonction de 2 critères sur 2 plages

Votre réponse

Discussions similaires