Ecran se stabilise en retard

Bonjour

J'ai ce code sur un bouton de tri qui fonctionne bien un inconvénient l'image ne se stabilise pas de suite

il y a une espèce d'éclair avant la stabilisation.

Ou est mon erreur dans le code?

Je vous remercie

Private Sub CommandButton3_Click()
triA
ActiveWindow.ScrollRow = 1
ActiveWindow.ScrollColumn = 60
End Sub

Bonjour,

Le scroll te permet de te déplacer d'1 ligne et de 60 colonnes. N'est-il mieux de te déplacer directement sur ta cellule via Cells(row, column).Activate ?

Tout dépend de ton besoin.

Bonne journée.

Bonjour

Merci pour ton aide

Mon besoin est d'avoir en haut a gauche la cellule BG1

Si tu as une idée du code je suis preneur

Crdlt

Bonjour,

A la place des 2 lignes scrolls :

Range("BG1").Activate

Bonne journée.

Je viens d'essayer ça ne fonctionne pas

La cellule qui est en haut a gauche c'est AX1

Chez moi ça fonctionne.

Quel est ton code VBA ?

Bonne journée.

Le code de la macro triA

Sub triA()

ActiveWorkbook.Worksheets("POULES").Sort.SortFields.Clear

ActiveWorkbook.Worksheets("POULES").Sort.SortFields.Add Key:=Range("BG4"), _

SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal

With ActiveWorkbook.Worksheets("POULES").Sort

.SetRange Range("BG4:CO11")

.Header = xlNo

.MatchCase = False

.Orientation = xlTopToBottom

.SortMethod = xlPinYin

.Apply

End With

End Sub

Hormis le code enregistré, sur ton commande click tu dois avoir ça :

Private Sub CommandButton3_Click()
triA
Range("BG1").Activate
End Sub

Est-ce le cas ?

Bonne journée.

Bonjour,

Application.Goto [BG1], True
eric

Désolé mais cela ne fonctionne pas

Bonjour Eric

merci pour ton aide

Ton code je le met où? bouton ou module ?

Crdlt

Bonjour,

A la place de mon

Range("BG1").Activate

Par contre ça ne marche pas n'est pas une réponse assez précise. Ligne qui ne fonctionne pas, message d'erreur, résultat, etc ...

Bonne journée.

Merci Eric

J'ai trouvé a mettre en début du code module

Bonne journée

Re bonjourJe reviens à la charge pour la stabilisation de l'écran
J'ai mis ce morceau de code en haut du code module (Merci Eriiic)   Application.Goto [BF1], True
Pour le bouton 1 ça va la colonne F apparait
Pour les boutons 2  3  4 les colonnes F et G sont masquées
Comment remédier à ce problème?

Heuuu, en demandant d'afficher BF tu arrives à voir F toi ?

oui tout a fait

j'ai 4 tableaux identiques l'un en dessous de l'autre avec chacun un bouton indépendant pour faire le tri.

Bouton (1 )tri A impeccable en mettant [BF1] la colonne F s'affiche normalement la cellule BF1 et bien en

haut a gauche.

Pour les 3 autres boutons en mettant [BF1] c'est la cellule H1 qui apparait en haut a gauche

Bis repetita

@eriiic : Ca ressemble presque à du spam !

Bah, obligé à mon corps défendant...

Bonjour

Mon problème est résolu

Cordialement