Bonjour,

Je bute sur un truc (apparemment) tout bête...

Avec ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub worksheet_activate()
 
    Me.ScrollArea = "$A$1:$A$120"
'   Range("$A$1:$W$1").Select
'      With ActiveWindow
'         .Zoom = True
'         .Zoom = ActiveWindow.Zoom - 1  '1.5
'      End With
End Sub
Je ne peux pas aller au-delà de ligne 109 !

A noter que quelques lignes sont masquées et que les premières lignes (du haut) sont figées.

J'ai désactivé le zoom au cas où, mais le problème semble être ailleurs.

merci d'avance pour votre aide.
Cdt