Re : Mise en forme conditionnelle avec 14 conditions
Bonjour le forum!!
Bonjour Philippe!!
Je reviens sur ce post car démarrons la phase déploiement à toutes nos bases logistiques.
A partir d'un base contenant les 1200 immatriculations, je voudrais initier la base de chacun en copiant la plage des immatriculations des véhicules.
Je n'y arrive, la macro plante lorsque je copie une liste d'immatriculations dans la colonne C.
Aucun souci si je les saisie un par un mais plantage lorsque le copie une plage.
Ci dessous, en rouge, l'endroit où ça plante:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B21:B140")) Is Nothing Then
Application.EnableEvents = False
If Target.Value = "" Then
Range(Cells(Target.Row, 3), Cells(Target.Row, 66)).ClearContents
Range(Cells(Target.Row, 3), Cells(Target.Row, 66)).Interior.ColorIndex = xlNone
End If
Application.EnableEvents = True
End If
Je ne sais pas si il y a une solution mais, si je pouvais éviter de les saisir un par un, cela m'arrangerait bien .
Voila, voila...
Très bonne journée à tous !!