Discussion :

[bedoch]

Je recontre un probleme avec la simple macro suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub test2()
'
' test2 Macro
'
 
'
    Columns("D:D").Select
    Selection.EntireColumn.Hidden = True
End Sub

Des que je la lance sur mon onglet cela me gele les colonne jusqu'a la colone H, par contre sur un autre onglet sur la feuille cela marche parfaitement, quelq'un aurait il une idée ?

[Jason T]

Edit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Columns("D").Select

Je pensais avoir dit une connerie mais finalement non donc je remet ma réponse.

[drakkar_agfa]

Bonjour,

Veux-tu que la macro s'applique à la feuille active?
Essais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

activesheet.Columns("D:D").EntireColumn.Hidden = True

sinon

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

worksheets("Feuil1").Columns("D:D").EntireColumn.Hidden = True

[Minick]

Salut,

Je pense que ta 1ere ligne doit etre fusionne.
Ce qui expliquerait cela.

Essaies (j'ai mi D5 mais evidemment il ne faut pas qu'elle soit fusionnee):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("D5").EntireColumn.Hidden = True

++
Minick

[bedoch]

j'ai remis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Columns("D").Select

et

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Selection.EntireColumn.Hidden = True

l'un derière l'autre et maintenant ça marche, bizarre^^.merci quand meme pour toutes ces réponses.

[aalex_38]

Comme le montre les codes de Drakar et Minick, tu peux tout faire avec une seule ligne de code, le select sert rarement même s'il est très utilisé par l'enregistreur de macro il ralentit le code en selectionnant alors que la plupart du temps on veut agir ou utiliser la valeur de la cellule mais pas la selectionner.
J'ai des anciens codes qui font tellement de select que la tête me tourne, juste en regardant l'ecran