Bonjour,
Je réitère une demande d'aide en expliquant plus en détails mon problème :
J'aimerais que la macro suivante s'exécute automatiquement si une cellule change de valeur
1 2 3 4 5 6 7 8 9 10 11
| Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("Donnees").Range("J1") = FAUX Then
Sheets("Patient").Range("F14").ClearContents
Sheets("Patient").Range("F15").ClearContents
Sheets("Patient").Range("H14").ClearContents
Sheets("Patient").Range("H15").ClearContents
End If
End Sub |
Pour être plus précis, le VRAI ou FAUX de la cellule « Donnees !J1 »
est simplement créé par un 'Bouton de Contrôle' dont la cellule liée est le "Donnees!J1" et c'est en cliquant sur ce bouton que cette cellule met le mot "VRAI" si coché et "FAUX" si décoché.
J'ai placé cette macro dans toutes les feuilles du projet mais impossible de l'exécuter en mode "pas à pas", même si je place mon curseur devant le "If" et que je demande l'exécution jusqu'au curseur, rien ne se passe.
Comme je le dis dans mon message, le
If Sheets("Donnees").Range("J1") = FAUX Then
.
fonctionne parfaitement dans une autre macro, j'aimerais simplement qu'il s'exécute automatiquement avec la macro lorsque je clique sur ce bouton.
J'espère que ces informations pourront vous permettre de m’aider.
Merci
Partager