vba Afficher une msgbox de façon aléatoire Fermé

Question

Bonjour à tous, 

Je voudrais qu'une msgbox s'affiche uniquement de temps en temps lorsqu'un utilisateur exécute une macro. Il s'agit de demander à ce qu'une référence soit recontrôlée à la main avant de poursuivre.

Je ne souhaite pas que cette msgbox s'ouvre à chaque fois qu'on lance la macro car, à la longue, plus personne n'en tiendrait compte (et moi d'abord).

Merci de tenir compte du fait que je suis encore (...et toujours...) novice.

A vous lire,

Configuration: Windows 7 / Firefox 42.0

Zoul67 · Answer

Bonjour,

Dans le code de ta macro, génère un nombre entier aléatoire r (par ex. entre 1 et 100).
cf. https://forums.commentcamarche.net/forum/affich-17702958-resolu-vba-excel-nombre-aleatoire

Ensuite, fais un test par rapport à un plafond (par ex. r <= 20?) ; si la condition est vraie, affiche le MsgBox (ici, dans 20% des cas).


A+

f894009 · Answer

Bonjour,

demander à ce qu'une référence soit recontrôlée Sur quel critere ?? Car il faut un evenement pour declancher l'affichage de cette MsgBox

refcemad · Answer

Bonjour,

Merci pour votre aide.
J'ai un peu de mal avec certains concepts alors j'ai fini par contourner le problème en générant dans une cellule (B2) une valeur aléatoire entre 1 et 100 et en la récupérant dans mon code avec :

If Range("B2").Value < 10 Then
                msgbox Range("D2").Value, , Range("C2").Value
End if

C'est peut-être pas très chic mais ça me convient...
Merci encore et à bientôt.

Vba Afficher une msgbox de façon aléatoire

3 réponses

Discussions similaires