[RESOLU]Limité Défilement d'une feuille avec souris

[cathodique]

Bonjour,

Peur-être simple mais je n'arrive pas à concrétiser.

Je voudrais que la feuille ne défile pas plus bas que la ligne 31 en utilisant la souris.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Plage concernée A1:P31
ActiveSheet.ScrollArea = "A1:P31"
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1
End Sub

Bon dimanche. Merci

 

[Paf]

Re : Limité Défilement d'une feuille avec souris

Bonjour,

Sur XL2003, ActiveSheet.ScrollArea = "A1😛31" fonctionne, à la conditions que lignes et colonnes ne soient pas masquées.

peut-être idem pour XL 2007 ?

A+

 

[Roland_M]

Re : Limité Défilement d'une feuille avec souris

bonjour,

voir comme ceci !

j'ai tout libéré et remis le scroll !

 

[cathodique]

Re : Limité Défilement d'une feuille avec souris

Messieurs,

Je vous remercie pour votre aide. J'ai compris que pour le scrollarea fonctionne, il ne faut pas masquer les lignes et colonnes.

Bon dimanche à tous.

 

[job75]

Re : Limité Défilement d'une feuille avec souris

Bonjour à tous,

J'ai compris que pour le scrollarea fonctionne, il ne faut pas masquer les lignes et colonnes.

Il suffit de ne pas masquer une ligne sous la zone.

Edit : chez moi une hauteur de 1 suffit.

A+

 

[cathodique]

Re : [RESOLU]Limité Défilement d'une feuille avec souris

C'est impeccable, à une ligne prés c'est exactement ce que je voulais obtenir.

Merci beaucoup Job75.

Bonne fin de dimanche.