Problème pour ouvrir une formule

Bonjour j'ai trouvé un excellent sujet sur ce forum

https://www.excel-pratique.com/~files/doc2/Table_SO_au_choix_c1.xls

Mais je n'arrive pas à modifier la macro (ALT F8) il ne m'affiche rien dans la fenêtre.

Je suis débutant donc mon erreur est surement à la hauteur de mon niveau

Merci de toute l'aide que vous pourrez m'apporter

Bonjour,

Fais un clic droit sur l'onglet Table SO, puis Visualiser le code

Ne compte pas sur moi pour t'expliquer ce code, mon domaine est plutôt celui des formules.

@+

Bonjour,

La touche de raccourci pour accéder au VBA est Alt + F11.

Bonne journée.

Bonjour à tous,

Autres façons de coder :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i%
    If Not Application.Intersect(Target, Range("a2")) Is Nothing Then
        Application.ScreenUpdating = False
        Range("b:bc").EntireColumn.Hidden = False 'affiche tout
            Select Case Target
                Case Is = 2: i = 32 'af (i= N°colonne)
                Case Is = 3: i = 36
                Case Is = 4: i = 40
                Case Is = 5: i = 44
                Case Is = 6: i = 48
                Case Is = 7: i = 52 'az
                Case Is = 8: Exit Sub
                Case Else: Exit Sub
            End Select
        Range(Cells(1, i), Cells(1, 55)).EntireColumn.Hidden = True
    End If
End Sub

ou encore

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i%
    If Not Application.Intersect(Target, Range("a2")) Is Nothing Then
        Application.ScreenUpdating = False
        Range("b:bc").EntireColumn.Hidden = False 'affiche tout
        If Target = "" Or Target > 7 Then Exit Sub
            i = Target * 4 + 24
        Range(Cells(1, i), Cells(1, 55)).EntireColumn.Hidden = True
    End If
End Sub

Amicalement

Claude

Super merci beaucoup

-- Sam Fév 05, 2011 8:53 pm --

A la demande surement justifié de claude je reposte ici ma question commetn dupliquer cette fonction pour pouvoir l'appliquer sur plusieurs ligne ?

A3

A4

A5 ect ?

Car j'ai tenté de copier coller le code mais beaucoup d'erreurs apparaissent