Limiter un Zoom en VBA

Bonjour à tous, je rencontre un petit problème j'aimerai coder la page de mon classeur afin de limiter le zoom à 130% et plus.

je veux que l'utilisateur puisse zoomer pour rentrer des données mais qu'il ne puisse pas dezoomer après 130%.

Merci d'avance !

Bonjour,

Le zoom n'est pas un événement détectable par excel.

On peut se servir de SelectionChange() pour modifier l'affichage lors d'une sélection :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If ActiveWindow.Zoom < 130 Then ActiveWindow.Zoom = 130
End Sub

eric

Merci Eric !

Ce texte à l'air plus que correct mais quand je le rentre dans le worksheet ça ne marche pas.

Il faut le mettre dans le module de la feuille concernée et la correction s'effectue lors de la sélection d'une autre cellule.

eric

Ha oui je vois ouais c'est pas mal merci eric mais y a vraiment pas moyen de le bloquer ?

Le zoom n'est pas un événement détectable par excel...

C'est bien dommage en tout cas merci de ton aide.

Rechercher des sujets similaires à "limiter zoom vba"