chaelie2015
XLDnaute Accro
Bonjour Forum
je souhaite afficher par defaut dans des cellules (BB11 : bb16) et (BB 22: bb32) si elles sont vide "En cours" et si je saisie un text la valeur c'efface
ci dessous un code pour une cellule
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$BB$11" Then
If Target.Value = "En cours" Then Target.Value = ""
ElseIf Range("bb11").Value = "" Then
Range("bb11").Value = "En cours"
End If
End Sub
Merci
je souhaite afficher par defaut dans des cellules (BB11 : bb16) et (BB 22: bb32) si elles sont vide "En cours" et si je saisie un text la valeur c'efface
ci dessous un code pour une cellule
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$BB$11" Then
If Target.Value = "En cours" Then Target.Value = ""
ElseIf Range("bb11").Value = "" Then
Range("bb11").Value = "En cours"
End If
End Sub
Merci
Dernière édition: