Caché et montrer des colonnes sur plusieurs onglets

Bonjour,

Je souhaite à partir d'un onglet accueil cacher ou montrer une même colonne qui figure sur 3 différents onglets.

Quel objet pour la sélection dois-je mettre ( le point "option button" ou "la case à cocher" : le code que j'ai pour le moment est:

Private Sub OptionButton1_Click()

Dim ws As Worksheet

Set ws = ThisWorkbook.Worksheets("EXTRACTION")

If OptionButton1 = "True" Then

ws.Range("G:G").EntireColumn.Hide

End Sub

Merci d'avance

Bonjour,

Une contribution :

Sub Afficher_MasquerCol()

Dim NoCol As Integer

NoCol = 3
If Sheets("Onglet1").Columns(NoCol).Hidden = True Then
    Sheets("Onglet1").Columns(NoCol).Hidden = False
    Sheets("Onglet2").Columns(NoCol).Hidden = False
    Sheets("Onglet3").Columns(NoCol).Hidden = False
Else
    Sheets("Onglet1").Columns(NoCol).Hidden = True
    Sheets("Onglet2").Columns(NoCol).Hidden = True
    Sheets("Onglet3").Columns(NoCol).Hidden = True
End If

End Sub

Bonjour,

je propose ce code VBA :

Private Sub OptionButton1_Click()
  Dim i As Byte: Application.ScreenUpdating = 0
  For i = 1 To 3
    Worksheets(i).Columns(7).Hidden = (OptionButton1 = True)
  Next i
End Sub

c'est valable pour 3 feuilles qui se suivent, ici pour les 3 premières feuilles ; si ta feuille "EXTRACTION" est la 5ème feuille et que les 2 autres feuilles sont à droite, mets : For i = 5 to 7

dhany