afficher sélection au centre de l'écran

[JeffdeBruges]

Bonjour,
J'ai un grand tableau qui contient un planning de congés.
La 1ère colonne contient les noms des personnes, les colonnes suivantes correspondent aux dates sur les 6 prochains mois (1 jour par colonne).
A la saisie d'un nouveau congé pour une personne, la cellule correspondante à la personne et à la date est marquée par code VBA.
Puisque les personnes sont en lignes et les dates en colonnes, la zone de marquage est différente à chaque traitement. Par ex Dupont qui est en ligne 50 a demandé un congé pour la colonne DB
Or, après l'inscription d'un nouveau congé par VBA, la cellule correspondante est bien sélectionnée (son adresse est affichée dans la zone Nom) mais pas affichée au centre de l'écran qui affiche le coin supérieur gauche (A1...).
Je connais le raccourci Ctrl + RetArr qui affiche la cellule sélectionnée, mais en enregistrement de macro ça ne donne rien d'exploitable pour moi (small ou widescroll).
Comment faire pour afficher les cellules correspondant au congé au centre de l'écran ?
Merci par avance pour toute suggestion.
A+
Je viens de trouver ScrollColumn...

 

[pierrejean]

Re : afficher sélection au centre de l'écran

bonjour Jeff de brugges

voici une façon de mettre la cellule selectionnée en haut et a gauche de l'ecran

ActiveWindow.ScrollColumn = Selection.Column
ActiveWindow.ScrollRow = Selection.Row

 

[JeffdeBruges]

Re : afficher sélection au centre de l'écran

Bonjour ou bonsoir pierrejean et merci mille fois pour votre aide.
Formateur de métier, je me retrouve pour au moins 2 mois (et plus j'espère) à développer en VBA 10 à 12 heures par jour, 6 jours par semaine.
Je reprends une application, dont le code collé dans Word, fait 21 pages en taille 8 pts avec marges de 1 cm...
Des tas de variables avec des noms complexes, des appels API, plusieurs fichiers en réseau avec droits d'accès spéciaux, bref de quoi justifier beaucoup d'efforts pour y arriver.
Je vois que vous avez écrit près de 1.600 messages sur ce forum !!!
En tout cas, votre aide me permet d'avancer et je vous en remercie vivement.
Certainement à plus tard avec d'autres questions.
Au fait vous aussi avez peut-être des questions ???
Cordialement