Masquer colonne avec incrémentation

Jeremy992 · 22 Août 2014

Bonjour le forum,

Voila j'ai une petite question !

Grâce a un bouton, j'aimerai masquer la colonne C et étiré d'une colonne, la colonne G.

Bon jusque la rien de compliquer, seulement voila j'aimerais qu'a chaque fois que j'appuie sur ce "bouton" ça me masquer les suivantes, par exemple:

Je re-appuyer,
Masque la cellule D et étire la colonne H d'une colonne.

Finalement c'est toujours la 3ème colonne visible et la dernière remplie.

Je vous joint un petit exemple 😉

Merciii !

Jeremy992 · 22 Août 2014

Re : Masquer colonne avec incrémentation

Je crois que je touche au but !!

J'ai donc le code suivant qui me permet de selectionner la 3ème colonne, de la masquer, mais je n'arrive pas a selectionner la dernière colonne (la colonne en entier), je selectionne seulement la 1er cellule de la dernière colonne, or je voudrais selectionner directement toute la colonne... une idée??

Code:

Sub suppr_ligne_auto()
Dim i As Integer
     For i = 3 To 287
        If Columns(i).Hidden = False Then
             Columns(i).Hidden = True
             Exit For
        End If
     Next i

[B]Cells(1, Columns.Count).End(xlToLeft).Select[/B]

Selection.AutoFill Destination:=ActiveCell.Resize(1, 2), Type:=xlFillDefault

Jeremy992 · 22 Août 2014

Re : Masquer colonne avec incrémentation

Peut-être quelque chose comme:

Code:

Columns.End(xlToLeft).Select

Mais je ne sais pas comment l'écrire...

Masquer colonne avec incrémentation

Jeremy992

XLDnaute Occasionnel

Pièces jointes

Jeremy992

XLDnaute Occasionnel

Jeremy992

XLDnaute Occasionnel

Discussions similaires

Masquer colonne avec incrémentation

Jeremy992

XLDnaute Occasionnel

Pièces jointes

Jeremy992

XLDnaute Occasionnel

Jeremy992

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency