Macro pour incrémenter le zoom d'1%

Bonjour Forum,

Je veux définir précisément un zoom dans une feuille.

J’aimerais faire une macro qui incrémente le zoom d’1% à chaque clic sur un bouton.

Quelqu’un pourrait-il m’aider à l’écrire ?

Merci !!!!

Bonjour gloub,

Quelque chose comme ça ?

Sub zoomPlus()
ActiveWindow.zoom = ActiveWindow.zoom + 1
End Sub

Tu aurais pu trouver tout seul en utilisant l'enregistreur de macro...

Merci pour ta réponse, c'est exactement ça.

En fait, j'avais tenté l'enregistreur de macros, mais j'avais calé en pensant qu'on ne pouvait pas additionner une valeur à "ActiveWindow.zoom".

J'aurais dû tenter le coup...

Merci en tous cas.