Problème de syntaxe pour masquer une colonne

Cekankonvaou

XLDnaute Junior
Bonjour à tous,

J'ai un petit souci pour masquer une colonne. Surement trois fois rien et un bête problème de syntaxe, mais je tourne en rond sans y arriver (et ça m'énerve!! :) )

1-J'ai une macro d'initalisation qui identifie les colonnes suivant le contenu de la première ligne
Code:
Sub initia()

With Sheets(1).Activate
    coltoto = (Sheets(1).Cells.Find(("TOTO"), After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Column)
End With

End Sub

2-une macro auto_open qui doit, entre autre, masquer certaines colonnes
Code:
Sub auto_open()

Call initia

With Sheets(1).Activate
            Set col = Sheets(1).Cells(1, coltoto)
            If Not col Is Nothing Then col.Selection.EntireColumn.Hidden = True
End With


End Sub

3-le tout avec la variable coltoto déclaré Public
Code:
Public coltoto As Long

C'est quoi le truc que je fais pas bien???


Merci d'avance pour votre aide (et votre indulgence :) )

Bertrand
 

Pièces jointes

  • 130607_masquer colonne.xlsm
    18.3 KB · Affichages: 28
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 215
Messages
2 086 319
Membres
103 177
dernier inscrit
grizly