Protection Cellules (Rectification Code)

[marfipo]

Bonsoir à tous,
je reviens vers vous pour une petite modification concernant une partie de mon code qui fait la protection
je m'explique : sur le fichier ci inclus dans le module newmonthsheet j'ai cette partie dans le code

  NbLg = Range("D" & Rows.Count).End(xlUp).Row
  Cells.Locked = False
  Range("D10:D" & NbLg).Locked = True
  ActiveSheet.Protect Password:=""

cette partie quand je fais l'incrémentation par exemple de février vers Mars elle fait la protection des cellules que j'ai déja saisi sur février et qui reste sur mars dans la colonne D mais les cellules vide restent libre

ce que je souhaite c'est de modifier cette partie du code pour faire la même chose avec la colonne E

Merci d'avance

 

[Papou-net]

Re : Protection Cellules (Rectification Code)

Bonsoir marfipo,

Si j'ai bien compris la question:

NbLg = Range("D" & Rows.Count).End(xlUp).Row
  Cells.Locked = False
  Range("D10:E" & NbLg).Locked = True
  ActiveSheet.Protect Password:=""

A +

Cordialement.

 

[marfipo]

Re : Protection Cellules (Rectification Code)

Merci beaucoup papou-net c'est ce que je voulais