Macro Excel

Résolu
Bonjour,

Je dois mettre une macro qui affiche une fenêtre d'erreur indiquant qu'il faut mettre un chiffre si une cellule précise de la feuille de calcul (D15) n'est pas renseignée.
Je remercie d'avance celles ou ceux qui voudront bien m'aider à saisir cette ligne d'écriture.

Eve

8 réponses

  1. Salut,

    Regarde si ça te convient

    MsgBox "Vous devez saisir une valeur en D15"
    0
    1. Bonsoir,
      Je te remercie de ta réponse. Cependant, j'ai besoin que le message ne s'affiche que si cette cellule est vide. S'il y a déjà un chiffre, le message ne doit pas apparaitre.

      Merci si tu peux me répondre
      Eve
      0
      1. Re,

        Voilà

        If [D15] = "" Then MsgBox "Vous devez saisir une valeur en D15"
        0
        1. Merci beaucoup
          ça marche.
          Je me rends compte maintenant que malgré tout, le reste de ma macro continue de s'exécuter au lieu de s'arreter pour que l'on puisse saisir la valeur en D15.

          Je n'avais pensé à ça.
          Super sympa de m'aider
          0
          1. Je dois trouver 2 solutions :
            soit saisir dans une fenetre de message la valeur qui se placera en D15 et la macro n'est pas se pourvuit ;
            soir arrêter la macro, saisir la valeur en D15 et reprendre ensuite l'exécution de la macro.
            Si je peux encore solliciter ton aide, je te remercie beaucoup si ce n'est pas trop abuser.
            Bonne soirée
            0
        2. Contributeur
          Salut le forum

          Pour n'autoriser qu'une saisie numérique dans la cellule.

          If Not IsNumeric([D15]) Or IsEmpty([D15]) _
              Then MsgBox "Vous devez saisir une valeur numérique en D15"

          Mytå
          0
          1. Re

            si D15 est vide, tu as le message, la cellule D15 est sélectionnée pour une saisie, le code s'arrête sinon le code continu

            If [D15] = "" Then
            MsgBox "Vous devez saisir une valeur en D15"
            [D15].Select
            Exit Sub
            Else

            'place ici ce que doit faire la macro si D15 est renseignée

            End If
            0
            1. Alors là, c'est super
              C'est exactement ce que je voulais.
              je me dépatouille un peu mais parfois il faut se faire aider.
              Merci pour tes renseignements
              Eve
              0
              1. Re,

                si tes attentes sont satisfaites, met le statut de la discussion en résolu
                0