Maintenir cellule active en milieu de page

vmatthieu · 26 Juin 2013

bonjour à tous,
je descends de lignes en lignes un gros fichier et il faut (pour comparer des données) que je vois toujours les 10 lignes qui suivent).
Quelqu'un a t'il une astuce pour que je puisse toujours voir les 10 lignes suivantes(sachant que je ne rentre pas dans la cellule, je fais juste une mise en couleur)
J'ai essayé avec une macro évenementiel et un offset (+10,1) puis offset (- 9,1) , non seulement cela ne me fait pas apparaitre les lignes du dessus et en plus cela me décale de 3 colonne sur la droite (allez comprendre)

enfin bref, si il y a une bonne ame ......

merci d'avance
bonne soirée

Pierrot93 · 26 Juin 2013

Re : Maintenir cellule active en milieu de page

Bonjour,

essaye peut être ceci, àutiliser dans le module de la feuille concernée :

Code:

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row > 10 Then ActiveWindow.ScrollRow = Target.Row - 10
End Sub

bon après midi
@+

PMO2 · 26 Juin 2013

Re : Maintenir cellule active en milieu de page

Bonjour,

Quelque chose comme

Code:

Sub aa()
If TypeName(Selection) = "Range" Then
  ActiveWindow.ScrollRow = Range(Selection.Address).Row
End If
End Sub

vmatthieu · 26 Juin 2013

Re : Maintenir cellule active en milieu de page

Merci à vous deux,
la macro évenementielle de pierrot me convient parfaitement
merci beaucoup de vos réponse rapide (et efficace)
bonne fin de journée

Maintenir cellule active en milieu de page

vmatthieu

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

PMO2

XLDnaute Accro

vmatthieu

XLDnaute Occasionnel

Discussions similaires

Maintenir cellule active en milieu de page

vmatthieu

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

PMO2

XLDnaute Accro

vmatthieu

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency