Propriété ActiveWindow

[Didier]

Bonjour
A l'aide de macro je passe de feuille en feuile... le contenu de ces feuilles étant assez grandes l'utilisateur fait défiler le contenu au moyen des barres de défillement...
J'aimerais qu'à chaque fois que l'utilisateur arrive sur une feuille (à l'aide de la macro) on puisse voir la cellule A1. En général il réaffiche la feuille tel quel était lors de la dernière 'visite' (Exemple centré sur la cellule 'AZ 900'

J'ai essayé avec l'enregistreur de macro mais apparement il enregistre avec précision le défilement que j'ai effectué et moi j'aimerais revenir à chaque fois en haut à gauche

Pouvez vous m'aider

Merci d'avance

 

[Hellboy]

Bonjour Didier

Le code suivant effectuera ce que tu demande.

Ce code doit être introduit dans le Module ThisWorkBook

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
            Sh.Cells(1, 1).Select
End Sub

 

[Robert]

Bonjour Didier, bonjour le forum,

Je dirais qiue le plus simple serait de séletionner la cellule A1 avec Range('A1'). Select mais si tu ne tiens pas à modifier la cellule active, tu peux faire :

ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1

Édition

Bonjour Hellboy on s'est croisés...

Message édité par: Robert, à: 25/10/2005 17:26