XL 2019 Gerer la position écran ou afficher une cellule

escouger · 21 Avril 2022

Bonjour,
Après une commande "Atteindre" j'aimerais pouvoir déterminer l'adresse sur l'écran ou sera affichée cette cellule.
Le plus souvent je voudrais que la cellule soit affichée en haut et à gauche de l'écran.
Je n'ai rien vu dans les forums.
Merci pour vos avis

Dudu2 · 21 Avril 2022

Bonjour,

VB:

Sub a()
    Call AfficheEnHautAGauche([G107])
End Sub

Sub AfficheEnHautAGauche(Cellule As Range)
    ActiveWindow.ScrollColumn = Cellule.Column
    ActiveWindow.ScrollRow = Cellule.Row
End Sub

job75 · 21 Avril 2022

Bonjour escouger, Dudu2,

Pour cadrer la cellule active :

VB:

Sub Cadrage()
Application.GoTo ActiveCell, True
End Sub

A+

XL 2019 Gerer la position écran ou afficher une cellule

escouger

XLDnaute Occasionnel

Dudu2

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Discussions similaires