Bonjour à tous, bonjour Papou-net,
Merci pour ces échanges super intéressants !
@Papou-net : la macro de votre fichier d'exemple est exactement celle dont j'ai besoin ! Mais j'ai aussi besoin d'en ajouter une seconde - basée sur le même modèle - à ma feuille.
Votre macro :
"Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("A1:A10"), Target) Is Nothing And Target.Count = 1 Then
If Target.Value = "" Then Target.Value = "Veuillez entrer le seuil de passage"
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub"
Maintenant, je voudrais ajouter un autre message pour une autre plage de cellules. Par exemple :
"Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("B1:B10"), Target) Is Nothing And Target.Count = 1 Then
If Target.Value = "" Then Target.Value = "Veuillez entrer un prix"
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub"
Je me demande comment faire coexister les 2 (par précaution, j'aurais certainement 10 messages différents à présenter dans des plages de cellules différentes lorsque les cellules sont vides, donc cette macro à adapter * 10). En effet, si je la tape à la suite, cela ne fonctionne pas.
Vous aurez compris que je suis totalement incompétent en VBA, cela fait des heures que je cherche et je me dis que vous aurez certainement une réponse à portée de clic.
Merci beaucoup !
Benjamin