Vider des cellules vis-à-vis du contenu d'une autre cellule
Bonjour tout le monde, j'ai un fichier et je cherche à vider les cellules si la cellule avant indique "à l'arrêt", j'avais pensé à mettre le code dans "Worksheet_SelectionChange" mais je ne sais pas comment faire. Merci de votre aide !
Bonjour
De quelles cellules parlez-vous ? C25 à C29 dans la feuille Planning ?
Crdlt
Edit : sinon une tentative comme ceci
- Click droite sur l'onglet Planning
- choisir "Visualiser le code"
- Remplacez tout ce que vous avez dans la fenêtre par le code ci-dessous
Option Explicit
Dim stpevt As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Or stpevt = True Then Exit Sub
If Not Intersect(Target, Range("C25:C29")) Is Nothing Then
stpevt = True
Target.Offset(0, -1).ClearContents
End If
stpevt = False
End SubFaites des essais en changeant la valeur entre C25 et C29
Autre point :
- allez dans le gestionnaire de noms
- Sélectionnez "prénoms"
- dans la rubrique "Fait référence à", mettez la formule suivante --> =DECALER(Planning!$M$1;;;NBVAL(Planning!$M:$M))
- confirmez en cliquant sur OK
Cela va vous éviter d'avoir des vides dans votre liste de validation. La liste sera actualisée automatiquement à chaque ajout que vous ferez dans la colonne M bien entendu.
Si ok -->
Crdlt
Merci et bonne journée