XL 2013 Mon code VBA ne fonctionne pas correctement

  • Initiateur de la discussion Initiateur de la discussion marcelio
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

marcelio

XLDnaute Occasionnel
Bonjour le forum,
Après plusieurs jours à chercher sans avoir trouver l'erreur que j'ai faite, je viens vous voir.
Un clic de la colonne H13 à V18 m'indique l'endroit où se trouvent les noms de la même ligne sur les colonnes AM, BG et CA.
Tout fonctionne correctement.
Mon seul souci il n’y a que la colonne AM qui fonctionne correctement
Car si on sort du tableau H13 à V18 le bleu disparait de la colonne AM, tandis que sur les colonnes BG et CA elle reste figées.
Hors elle devrais disparaitre comme la colonne AM.
Si vous pouviez me dire ce que j'ai oublié de faire.
Merci d'avance.
Marcelio
 

Pièces jointes

Hors elle devrais disparaitre comme la colonne AM.
Si vous pouviez me dire ce que j'ai oublié de faire.
Merci d'avance.
Marcelio
Bonjour à tous
La PJ devrait faire
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    ActiveSheet.Unprotect
    [AM8:AM19].Interior.Color = [L1].Interior.Color
    [bg8:bg19].Interior.Color = [L2].Interior.Color
    [ca8:ca19].Interior.Color = [L3].Interior.Color
    If Intersect(ActiveCell, [H13:V18]) Is Nothing Then Exit Sub
    '---------------
    '---------
 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour