Verrouillé cellule Excel selon une date d'échéance

Résolu
Jenni -  
 Jenni -

Bonjour,

J'aimerais verrouiller une plage de cellule selon une date d'échéance dans toutes les feuilles de mon classeur. La plage de cellule à verrouiller est toujours la même dans chaque feuille.

Je souhaite dire : Si la date dans la cellule B de la feuille 8 est plus grande que aujourd'hui, verrouille la plage de cellule A7 à C50. Si non rien faire.

Et ce pour toutes les feuilles de mon classeur.

Merci à l'avance!

1 réponse

  1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     

    bonjour,

    B est une colonne, pas une cellule.

    une suggestion:

    Option Explicit
    
    Sub jenni()
    Dim fl As Worksheet
    For Each fl In ThisWorkbook.Sheets
        If fl.[B8] > Now() Then
            fl.[A7:C50].Locked = True
        End If
    Next fl
    End Sub
    
    1
    1. Jenni
       

      Oh oui effectivement je voulais inscrire B8 ;)

      Un grand merci, je peux enfin avancer mon projet !!!

      0