[Résolu][Calc] Avertissement en cas dépassement valeur

[gunsman]

Bonjour à tous,

Voilà j'ai un fichier dans lequel j'aimerais que lorsque la valeur atteint une certaine valeur, un userform s'affiche. Par exemple si A2 supérieur à 60 000, un message s'affiche, avec la possibilité de continuer. Par contre à partir de 80 000, j'aimerais que le message soit plus insistant.

Pour le moment j'utilise le formatage conditionnel. A 60 000 passages en orange, à 80 000 passages en rouge. Mais cela ne suffit, pas, il faudrait vraiment un message d'avertissement à 60 000 et un message plus insistant à 80 000. Avec la possibilité de remettre à 0 ce compteur via le message.


Est-ce possible ?


Aujourd"hui, le seul changement de couleur n'est pas suffisant. J'ai bien pensé à faire un Msgbox, mais je ne sais pas lui ajouter un bouton, continuer ou remettre à 0.


Merci pour votre aide


Je suis en version 5 de Libreoffice

[yclik]

Bonjour
A priori plusieurs solution
créer une fonction dans l'editeur de macro,
déclencher une macro sur un évènement feuille.

Dans ce cas poster dans la section Macro en joignant un classeur exemple au message

Sujet déplacé en section Macros et API par la modération

[yclik]

Bonjour
Un exemple en PJ avec une alerte si une cellule dépasse un seuil

alerte.ods

la fonction

Code : Tout sélectionner

Function alerte(arg1 as Integer)
if arg1 > 10 then msgbox ("Attention ")
End function

et dans une cellule B9

Code : Tout sélectionner

=ALERTE(A9)

si la valeur testée est en A9 (ici >10)

[gunsman]

Genial !

Merci beaucoup pour ton aide, je teste ça.



Et en plus le code est relativement court.

[gunsman]

Voilà j'ai testé et modifié un peu le code en changeant integer par long car j'avais besoin d'une valeur égale à 60 000.


Maintenant la question que je me pose, c'est est-ce possible de faire la même chose pour une plage de valeur (entre 60 000 et 79 999) pour afficher un second message au dessus de 80 000 ?

[zeguedon]

Bonjour,

est-ce possible de faire la même chose pour une plage de valeur (entre 60 000 et 79 999)

a priori avec :

Code : Tout sélectionner

if arg1 > 60000 And arg1 < 79999 then msgbox ("Blablabla")

A+

[gunsman]

Je n'ai qu'un mot, MERCI !


J'espère que ce fil servira à d'autres.