Discussion :

[jpenja]

Bonjour,
je voudrais savoir s'il existe une propriété qui permette après avoir sélectionner une cellule de la positionner forcément en haut à gauche de l'écran(comme la cellule A1 à l'ouverture d'Excel).

Code :

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

1
2
 
feuil1.range("C126").select

Par défaut la cellule est bien sélectionnée mais se trouve au centre de l'écran.
merci d'avance

[ouskel'n'or]

Oui, ça existe, j'ai vu passé ça sur le forum il y a longtemps (un an ?) mais je ne me souviens plus de la syntaxe
Juste pour que tu ne te décourages pas dans tes recherches.
Je regarde mais ne promets rien...

[ouskel'n'or]

Youpi ! J'ai retrouvé tout seul, comme un grand !

Edit
Correction
Pour que tu puisses l'utiliser, tu dois d'abord te positionner en A1, ce qui donne en fait

Code :

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

1
2
3
4
5
6
Sub Test2()
    Adres = ActiveCell.Address
    Range("A1").Select
    ActiveWindow.SmallScroll Down:=Range(Adres).Row - 1
    ActiveWindow.SmallScroll ToRight:=Range(Adres).Column - 1
End Sub

[jpenja]

Merci encore à toi ouskel'n'or.Celà fait deux fois en deux jours que tu me donne la solution.
Je vais essayer d'adapter celà à une listbox.
A+