Discussion :

[pijaku]

Bonjour,

Après avoir filtré les données d'une feuille dans une autre feuille (créée pour l'occasion), l'option "Figer les volets" (ActiveWindow.FreezePanes = True) semble fonctionner de manière aléatoire.
Elle fige les volets un peu ou elle veut.
J'ai, semble-t'il, réussit à contourner ce souci, mais pourriez-vous me confirmer ce fait?

Pour filtrer, j'utilises

Code :

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

1
2
Set rng = MaFeuille.Range("CA1:CA2")
MaFeuille.Range("A1:C10000").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=rng, Unique:=False

Pour activer la première cellule après filtre :

Code :

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

MaFeuille.Range("A" & MaFeuille.Range("A1:A10000").Offset(1).SpecialCells(xlCellTypeVisible).Row)

Avec ce code, cela fige un peu n'importe ou, même en sélectionnant la bonne cellule (la première visible après filtre)...

[Philippe Tulliez]

Bonjour Pijaku,
Tu n'as pas affiché la ligne de code qui fige les volets ?
Et que souhaites-tu figer ?

[pijaku]

Salut Philippe,

Je penses que mon Excel a du bugguer** pendant quelques semaines.
Je viens de retester et … tout va bien.

Tant mieux.

Merci de ta participation, en tout cas.
Je clos.

**ou alors autre chose dans le code qui bloquait cette fonctionnalité.
En effet, j'ai pas mal de procédures événementielles, de code écris par macro etc...
Dans tout ce fourbi, quelque chose a du mettre le bazar.
En te fabriquant un fichier avec code test, tout semble fonctionner comme il le faut.
Voilà.
Encore merci