Macro Excel

Résolu/Fermé
Evedll Messages postés 74 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 26 septembre 2023 - 6 sept. 2010 à 22:36
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 - 6 sept. 2010 à 23:30
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


A voir également:

8 réponses

Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
6 sept. 2010 à 22:56
Salut,

Regarde si ça te convient

MsgBox "Vous devez saisir une valeur en D15"
0
Evedll Messages postés 74 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 26 septembre 2023
6 sept. 2010 à 22:59
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
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
6 sept. 2010 à 23:03
Re,

Voilà

If [D15] = "" Then MsgBox "Vous devez saisir une valeur en D15"
0
Evedll Messages postés 74 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 26 septembre 2023
6 sept. 2010 à 23:13
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
Evedll Messages postés 74 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 26 septembre 2023
6 sept. 2010 à 23:21
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

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Mytå Messages postés 2973 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 942
6 sept. 2010 à 23:17
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
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
6 sept. 2010 à 23:21
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
Evedll Messages postés 74 Date d'inscription vendredi 6 juillet 2007 Statut Membre Dernière intervention 26 septembre 2023
6 sept. 2010 à 23:28
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
Mike-31 Messages postés 18313 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 21 avril 2024 5 073
6 sept. 2010 à 23:30
Re,

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