Probleme Souris/ScrollAera

Bonjour à tous et merci à celle ou à celui qui pourra m'aider.
J'ai une feuille excel avec un ScrollAera pour figer ma page à l'intérieur de A1:T30. Au delà de cette zone aucun accès.
La formule est la suivante :
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Me.ScrollArea = "$A$1:$T$30"
End Sub
Mon problème :
Quand j'ouvre cette page et que je ne touche pas à la souris, le ScrollArea ne marche pas.
Si je touche la souris d'une cellule, tout fonctionne à merveille.
Il y-a t-il un moyen que le ScrollArea fonctionne avec ou sans souris
Un grand merci à vous tous
Gustav

4 réponses

  1. Bonjour,
    Et en mettant aussi la commande dans le module thisWorkbook
    Private Sub Workbook_Open()
        Sheets("Feuil1").ScrollArea = "$A$1:$T$30"
    End Sub
    

    Cdlt
    1. Un grand merci à toi pour ta réponse rapide.
      Malheureusement ça bugge!
      La formule que je t'ai donnée a été mise dans VBA de la feuille en question et non dans Thisworkbook. Pour info
      Si tu as une autre piste, merci d'avance
      Bonne soirée
      Gustav
      1. Et en mettant aussi la commande dans le module thisWorkbook
    2. Oui merci mais ca marche pas, j'ai déjà essayé!
      Ne peut-on pas rajouter à cette formule une ligne?
      Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
      Me.ScrollArea = "$A$1:$T$30"
      End Sub
      Merci à toi?
      1. Contributeur
        Bonjour,

        bizarre que la proposition de frenchie 'bugue'
        D'ailleurs ça ne veut rien dire. Précise...
        eric
      2. mais ca marche pas, j'ai déjà essayé! . Curieux, chez moi ça fonctionne bien, quand le classeur s'ouvre , il pointe sur la feuille1 et limite bien la plage en question.
    3. En fait dans mon classeur, chaque feuille a ses propres valeurs. Donc dans une feuille je mets une formule, dans une autre feuille une autre formule avec une autre valeur.
      En fait comme je te l'ai dit, tout marche nickel si je bouge la souris. Sinon, ScrollArea ne fonctionne pas.
      Merci pour ta patience
      1. Contributeur
        En fait comme je te l'ai dit, tout marche nickel si je bouge la souris
        Rien que de très normal puisque tu utilises l'événement SelectionChange
        Il faut essayer de comprendre ce que tu écris...

        Fais comme frenchie t'a montré. Autant de lignes que de feuilles concernées.
        eric