Appliquer le code d'un onglet à tout le classeur et Bug

Bonjour,

Il y a quelques temps, je me suis fais aider sur le fichier joint,

pour inclure un code d'automatisation des lignes récurrentes sur l'onglet IGR.

J'avoue mon incapacité a adapter ce code pour tous les onglets du classeur, pouvez-vous m'aider à réaliser c: j'ai un bug sur le fichier , toujours dans l'onglet IGR, je ne parviens plus à accéder aux colonnes C.

Merci de vote aide

Courtoises salutations.

Salut Fabzu,

effectivement, petite approximation coupable! Désolé, hein!

Portion de code à remplacer dans IGR, Worksheet_SelectionChange.

'
'cache et montre la colonne 'Vérif'
If Not Intersect(Target, Range("C:C")) Is Nothing Then
    If Left(Target.Offset(0, 1), 16) = "Commissionnement" Then
        Columns(6).Hidden = IIf(Columns(6).Hidden = True, False, True)
        Cells(Target.Row, 1).Select
    End If
End If
'

Ça roule, à part ça?

A+

allo curulis57 t génial. Mais Tout le classeur ne fonctionne pas

pour inclure le code de l'onglet IGR à tous les onglets du classeur ?

J'avoue mon incapacité , peux-tu m'aider à réaliser cela ?

Merci de ta nouvelle aide

Bonne journée.

Re-bonjour,

BUG Le code ne fonctionne que sur la feuille IGR,

Re-Merci Beaucoup.

Bjr,

1. j'ai fais des modifications sur mes listes (ajout d'affaires), et je me retrouve avec un bug. Le code ne fonctionne plus.

2. Je souhaiterais que les chiffres ne soit pas repris dans les futurs tableaux. (uniquement infos clt nom clt et n° police).

Merci de votre aide.

Cordialement