Bonjour,

je suis nouveau sur votre forum et nouvel utilisateur de VBA

je réalise une petit macro pour masquer / afficher différente colonne.

je voudrai ne pas "perdre" la cellule active.

j'ai cherché un peu, voici le résultat

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub info_gén()
 
    Dim Cellule
    Cellule = ActiveCell.Row
    Application.Goto Reference:="D:H"
    Selection.EntireColumn.Hidden = False
    Application.Goto Reference:="I:M"
    Selection.EntireColumn.Hidden = True
    Range(Cellule, 1).Select
 
End Sub


merci pour votre aide.