Verrouillage de plage de cellules sous condition en VBA

Tino0733

XLDnaute Nouveau
Bonjour à tous,

Je cherche depuis quelques jours à verrouiller un plage de cellules à chaque ligne selon certaines conditions.
Je vous joins le fichier.

Cependant, mon problème est le suivant :
Dans ma colonne J j'ai un Si ....
Dans ma colonne K j'ai uniquement des OK

Mon but est de faire en sorte que lorsque ma colonne K est différente de ma colonne J alors je verrouille les cellules de la colonne L à la colonne AE.

Et ce sur les 52 lignes suivantes à partir de la ligne 9.

Par exemple:
- à la ligne 10 colJ<>colK donc il doit verrouiller les cellules "L10:AE10"
- à la ligne 11 colJ=colK donc il ne doit pas me verrouiller les cellules.

Ainsi de suite jusqu'à la ligne 60.


Enfin, dans mes manipulations, j'ai malencontreusement caché la ligne 9. Et mon programme je souhaite qu'il démarre de la ligne 9 jusqu'à ce que x<60.

J'oubliais de préciser que mon problème se trouve sur la feuille Service GAC et module 3 sous VBA.

Par avance merci de toutes vos pistes et réponses.
 

Pièces jointes

  • Tableau de suivi docs admin PFE QFEVRE.xlsm
    85.7 KB · Affichages: 82

Tino0733

XLDnaute Nouveau
Re : Verrouillage de plage de cellules sous condition en VBA

Bonjour,

Actuellement un nouveau problème se pose à moi j'ai 3 choses à rajouter à ce fichier.

Maintenant que les macros fonctionnent, je souhaite verrouiller les cellules de la feuille Service GAC comme demandé ci-dessus mais également la plage de cellules des situations de 1 à 20 sur la feuille d'après qui s'appelle Situation ST.

De plus, je souhaiterais que ma macro qui vérifie les documents administratifs des ST dans la feuille Contrat ST se lance automatiquement lors de l'ouverture du fichier. J'ai essayé mais je me plante ...

Enfin, est-il possible de mettre une date dans une macro : explications.
Ma macro envoie un mail pour dire que les documents administratifs du sous-traitant ne sont pas à jour. Mais une fois le mail envoyé, il n'y a pas de rappel. Est-ce possible alors de mettre une opération de différence du genre 5 jours ouvrés après le premier envoi si toujours rien renvoyer. Exemple : si le lundi ça envoie un mail et bien vendredi ça renvoie.

PS: Au cas où, le mot de passe pour rentrer dans les macros est : "PFEQFE"

Par avance merci des pistes et solutions apportées.
Tino...
 

Pièces jointes

  • Tableau de suivi docs admin PFE QFEVRE 04 11 14.xlsm
    113 KB · Affichages: 56
  • Tableau de suivi docs admin PFE QFEVRE 04 11 14.xlsm
    113 KB · Affichages: 62
  • Tableau de suivi docs admin PFE QFEVRE 04 11 14.xlsm
    113 KB · Affichages: 60
Dernière édition:

Tino0733

XLDnaute Nouveau
Re : Verrouillage de plage de cellules sous condition en VBA

Bonjour,

J'ai réussi finalement à trouver ce que je souhaitais faire par rapport à cela.

Je remets mon fichier avec l'accessibilité pour que l'on puisse regarder si il n'y a pas moyens de faire plus simple peut-être.

En tous cas merci.
 

Pièces jointes

  • Tableau de suivi docs admin PFE QFEVRE 04 11 14.xlsm
    150.6 KB · Affichages: 61
  • Tableau de suivi docs admin PFE QFEVRE 04 11 14.xlsm
    150.6 KB · Affichages: 61
  • Tableau de suivi docs admin PFE QFEVRE 04 11 14.xlsm
    150.6 KB · Affichages: 73

Tino0733

XLDnaute Nouveau
Re : Verrouillage de plage de cellules sous condition en VBA

J'oubliais, dans mon fichier seule la contrainte de date est manquante, c'est-à-dire, que je ne suis pas encore arriver à faire ce que je souhaitais par rapport à cela, je vous remets l'explication :
"Enfin, est-il possible de mettre une date dans une macro : explications.
Ma macro envoie un mail pour dire que les documents administratifs du sous-traitant ne sont pas à jour. Mais une fois le mail envoyé, il n'y a pas de rappel. Est-ce possible alors de mettre une opération de différence du genre 5 jours ouvrés après le premier envoi si toujours rien renvoyer. Exemple : si le lundi ça envoie un mail et bien vendredi ça renvoie."

UNe fois cela réglé je ne pense pas vous embêter et en finir avec VBA.

Par avance merci de vos retours.
 

Discussions similaires

Statistiques des forums

Discussions
312 219
Messages
2 086 369
Membres
103 197
dernier inscrit
sandrine.lacaussade@orang