Bonjour à tous,
j'ai une. j'ai un code où la selection est de f14: aj164 et il prend en compte la zone D14:AJ164.
Sub Effacer_Heures_TH()
ActiveSheet.Unprotect
Range("f14:aj164").Select
Selection.ClearContents
Selection.Interior.ColorIndex = xlNone
Range("f14").Select
ActiveSheet.Protect
End Sub
Il doit garder en mémoire une ancienne consigne.
Merci pour vos suggestions
A+
j'ai une. j'ai un code où la selection est de f14: aj164 et il prend en compte la zone D14:AJ164.
Sub Effacer_Heures_TH()
ActiveSheet.Unprotect
Range("f14:aj164").Select
Selection.ClearContents
Selection.Interior.ColorIndex = xlNone
Range("f14").Select
ActiveSheet.Protect
End Sub
Il doit garder en mémoire une ancienne consigne.
Merci pour vos suggestions
A+