Tion et zoom Ecran
Salut tout le forum et tous ses membres éclairés.
Je suis confronté à une situation que je n'arrive pas à gérer.
J'ai conçu un fichier depuis mon ordinateur portable qui a la résolution 1366*768 et avec un zoom de 70% mes feuilles se présentent bien. Mais mes collègues qui utilisent ledit fichier sur des Bureautiques de plus grande résolution 1920*1080 et autres sont obligés de zoomer 100 ou plus pour plus de clarté.
Ma préoccupation : Comment faire pour que à l'ouverture de mon fichier en fonction de la résolution de l'écran le zoom soit conséquent ? Sans modifier le Zoom initial bien sur
Bonsoir KTM,
Perso j'utilise une petite procédure assez simple
' La zone d'affichage va de la collone A à T
Application.EnableEvents = False
With ThisWorkbook.Sheets("MaFeuille")
.Activate
ActiveWindow.ScrollRow = 1
' Selectionner les colonnes à afficher correctement
.Columns("A:T").Select
' Définir le zoom nécessaire
ActiveWindow.Zoom = True
.Range("A1").Select
End With
Application.EnableEvents = TrueA toi de voir si cela te convient
Merci BrunoM45
Se serait simple avec une seule feuille.
Mais mon fichier comporte plusieurs feuilles. C'est ce qui me complique les choses.
OK Je suis sur d'y trouver ma solution.Merci