1. Ce site utilise des "témoins de connexion" (cookies) conformes aux textes de l'Union Européenne. Continuer à naviguer sur nos pages vaut acceptation de notre règlement en la matière. En savoir plus.

XL 2016 Conditions lancement macro + msgbox

Discussion dans 'Forum Excel' démarrée par niiiiiiiiiico, 8 Janvier 2019.

  1. niiiiiiiiiico

    niiiiiiiiiico XLDnaute Occasionnel

    Inscrit depuis le :
    19 Juillet 2007
    Messages :
    219
    "J'aime" reçus :
    0
    Bonjour,

    Je cherche à lancer une macro si une condition est réunie sinon apparition de message box

    Si la condition n'est pas réunie, ça marche j'ai bien la msgbox. Si la condition est réunie ça marche partiellement, la macro se lance mais tout à la fin j'ai quand même l'apparition de la msgbox

    Comment n'avoir la msgbox uniquement quand la condition n'est pas réunie ?

    Sub Condition2()

    If Sheets("Data").Range("A1").Value <> "" Then
    Call RAZ
    End If
    MsgBox "L'onglet Data est déjà vide"

    End Sub

    Merci !!!
     
  2. Chargement...

    Discussions similaires - Conditions lancement macro Forum Date
    Pb d'affichage, de conditions et de lancement de macro Forum Excel 22 Juin 2010
    lancement macro sous conditions Forum Excel 26 Mai 2009
    macro avec plusieur conditions Forum Excel Mercredi à 19:43
    Faire une moyenne pondérée dépendante de plusieurs conditions Forum Excel Mardi à 21:29
    Recherche de valeur double conditions Forum Excel 11 Janvier 2019

  3. cp4

    cp4 XLDnaute Impliqué

    Inscrit depuis le :
    7 Novembre 2015
    Messages :
    517
    "J'aime" reçus :
    32
    Utilise:
    Excel 2010 (PC)
    Bonjour,
    Code (Visual Basic):
    Sub Condition2()
    If Sheets("Data").Range("A1").Value <> "" Then ' condition si A est vide alors
    Call RAZ 'on execute cette macro
    Else 'sinon
    MsgBox "L'onglet Data est déjà vide" 'on affiche msgbox
    End If 'fin de condition
    End Sub
    Bonne journée
     
    niiiiiiiiiico aime votre message.
  4. niiiiiiiiiico

    niiiiiiiiiico XLDnaute Occasionnel

    Inscrit depuis le :
    19 Juillet 2007
    Messages :
    219
    "J'aime" reçus :
    0
    Merci beaucoup !!
     

Partager cette page