Bpnsoir à tous
J'Ai une liste de validation(nom=Plage) sur toute la col B qui n'est pas barré donc je peut y mettre autre chose que item de la liste)
J'ai ceci qui bug juste a Plage(si item)
Dim cel As Range
For Each cel In Range('A1:A1000')
If cel = Range('A65536').End(xlUp).Row Then Resume
On Error GoTo Fin
If cel.Offset(0, 1) = Plage Then
cel.Select
With Selection.Font
.Strikethrough = True
End With
End If
Next cel
Fin:
Merci
Ok merci j'ai trouvé avec NB.SI en MFC
A+
temjeh
Message édité par: Temjeh, à: 29/04/2006 03:55
Message édité par: Temjeh, à: 29/04/2006 12:30
J'Ai une liste de validation(nom=Plage) sur toute la col B qui n'est pas barré donc je peut y mettre autre chose que item de la liste)
J'ai ceci qui bug juste a Plage(si item)
Dim cel As Range
For Each cel In Range('A1:A1000')
If cel = Range('A65536').End(xlUp).Row Then Resume
On Error GoTo Fin
If cel.Offset(0, 1) = Plage Then
cel.Select
With Selection.Font
.Strikethrough = True
End With
End If
Next cel
Fin:
Merci
Ok merci j'ai trouvé avec NB.SI en MFC
A+
temjeh
Message édité par: Temjeh, à: 29/04/2006 03:55
Message édité par: Temjeh, à: 29/04/2006 12:30