XL 2019 macro pour masquer puis afficher colonnes a la demande

[GDINFO]

Bonjour a tous

je cherche a faire un bouton dans ma feuille qui macro qui permettrez de choisir une colonne de début puis une colonne de fin pour les masquées et un bouton de remise a zero.

Affiche colonne
Sub AS1_Click()
For Each cell In ActiveSheet.Range("H3:AL3"):
If cell.Value = [I2] Then
Columns(cell.Column).Select
Selection.EntireColumn.Hidden = False
End If
Next cell
End Sub

Masque colonne
Sub MS1_Click()
For Each cell In ActiveSheet.Range("H3:AL3"):
If cell.Value = [I2] Then
Columns(cell.Column).Select
Selection.EntireColumn.Hidden = True
End If
Next cell
End Sub

J'avais fait ca a une époque I2 étant un numéro de semaine
je sais pas comment integrer 2 variables pour la colonne de debut et celle de fin

si vous pouvez m'aider

 

[Phil69970]

Bonjour @GDINFO

Avec un fichier on comprendrait mieux ce que tu veux faire

 

[GDINFO]

Bonjour @GDINFO

Avec un fichier on comprendrait mieux ce que tu veux faire

 

[GDINFO]

je vous joint un fichier modele, j'espere avoie été plus clair
merci

 

[Phil69970]

@GDINFO

Je te propose ce fichier

Merci de ton retour