[VBA] Besoin d'aide
Ykarul
-
Msylvain Messages postés 11 Statut Membre -
Msylvain Messages postés 11 Statut Membre -
Bonjour,
Je débute en VBA (en fait j'apprend tout seul) et j'aurais donc besoin de votre aide pour mon petit problème :
Lorsque je rempli la cellule "B15", cela entraine le remplissage d'autres cellules, dont la cellule "F16" sur laquelle une formule renvoi le bouléen VRAI ou FAUX.
Malgré des tonnes de recherche sur internet, je n'arrive pas a faire en sorte que:
Une fois la cellule B15 renseignée, si F16 renvoie FAUX, alors B15 est effacée (le contenu), et un message d'erreur s'affiche.
Ca parait pourtant assez simple mais j'ai toujour un bug quelquepart....
Je débute en VBA (en fait j'apprend tout seul) et j'aurais donc besoin de votre aide pour mon petit problème :
Lorsque je rempli la cellule "B15", cela entraine le remplissage d'autres cellules, dont la cellule "F16" sur laquelle une formule renvoi le bouléen VRAI ou FAUX.
Malgré des tonnes de recherche sur internet, je n'arrive pas a faire en sorte que:
Une fois la cellule B15 renseignée, si F16 renvoie FAUX, alors B15 est effacée (le contenu), et un message d'erreur s'affiche.
Ca parait pourtant assez simple mais j'ai toujour un bug quelquepart....
7 réponses
-
Bonjour,
pour ton problème essais:
If Range("F16") = "FAUX" Sheets("ta feuille").Select ' tu met le nom de ta feuille Application.ActiveSheet.Range("B15").ClearContents Msgbox("message d'erreur") 'tu met le message que tu souhaite End If
Sylvain -
En fait j'ai déja réussi a faire ca en ajoutant ce code à mon bouton final de validation, cependant j'aimerais que cette macro se déclenche juste après la saisie de la case B15 (si cette saisie a renvoyé FAUX sur F16, donc).
Comment je dois procéder pour cela? -
il faut que tu gere la gestion d'evenement sur ta feuille : voilà un très bon tuto qui te permettra de faire ce que tu souhaite.
il te suffira de colle le code Msylvain dans l'evenement "change"
http://silkyroad.developpez.com/VBA/EvenementsFeuille/ -
Je ne suis pas pro en VBA mais si tu place ce bout de code juste derrière le moment où dans ton code la cellule se remplit alors si c'est faux cela déclenchera le IF et le message apparaîtra.
En espérant être clair ^^
Sylvain -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Bon, ba avec "FAUX" ca ne marche pas. J'ai mis FAUX (sans les "), et la ca marche, sauf si c'est N/A qui apparait (au lieu de vrai ou faux, quand la comparaison n'est pas possible), ce qui me lance le débogage....
-
Bon ba j'ai trouvé la solution tout seul alors je l'écris quand même.
Quand ma case est vide, j'ai mis un SI pour ne plus avoir le test VRAI/FAUX mais un tiret (ca peut etre n'importe quoi d'autre mais pas rien ("")) -
Désolé je ne suis pas retourné sur internet dans la soirée. Tant mieux si tu as trouvé ;).
Sylvain
