probleme de zoom excel

voila bonjour a tous

j'utilise un écran tactile pour lire un fichier excel et a l'ouverture du fichier j'ai entre la formule

Code:

---

1 2	ActiveWindow.Zoom = 30

---

En effet, le zoom doit impérativement et réglé a 30 sinon le fichier sera en parti caché.

Le problème c'est que l’utilisateur du fichier peut régler le zoom même si le fichier excel et en mode plein écran, et ceux du fait que de toucher l’écran avec ses 2 doigts et de les écarter provoquent l'effet zoom ou de-zoom (comme sur un iphone quoi).

ma question est la suivante : est-il possible de régler une bonne fois pour toute le zoom et puis de verrouiller la fonction zoom dans le code.
merci

Bonjour,

Sachant qu'il n'y a pas d’évènement lié a la modification du zoom, tu peux ruser en remettant le zoom a 30 a chaque sélection de cellule du classeur.

a mettre dans ThisWorkbook

Code:

---

1 2 3

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) ActiveWindow.Zoom = 30 End Sub

---