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

Résolu
Jenni - 11 févr. 2024 à 13:57
 Jenni - 12 févr. 2024 à 16:22

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!

A voir également:

1 réponse

yg_be Messages postés 23327 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 15 novembre 2024 Ambassadeur 1 551
11 févr. 2024 à 18:46

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

Oh oui effectivement je voulais inscrire B8 ;)

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

0