Union([C6], [C13], [C20], [C23], [I13], [I20], [I23]).Locked = False
[C9].Locked = IIf(compt1 = 1, False, True)
[C13].Locked = IIf(compt2 = 1, False, True)
Union([C28], [C30], [C38], [C41], [C47], [C48], [C49], [C55], Range("F47:G47"), Range("F48:G48"), Range("F49:G49"), [I28],[I30], [I38], [I41], [I47], [I48], [I49], Range("I55:I56"), [I58]).Locked = True