Adapter à l'ecran

Bonjour à tous,

J'ai réaliser un projet qui est en phase de finition.

Je désire savoir si avec Excel existe t-il une possibilité d'adapter le projet en fonction de la grandeur de l'écran?

Mon souci actuel c'est que crée ce projet sur un 24" et je voudrai utiliser ce projet sur un portable avec 13" sans pour autant repasser feuille par feuille et zoomer. Mais là aussi il faudrai que je rentre dans les macros pour changer toutes les dimensions c'est fastidieux.

Si quelqu'un aurait la solution, je suis preneur.

avec mes remerciements anticipés

Amicalement

Noel

Bonjour à tous,

Un code que j'ai mis dans ma barre "Perso" (Zoom toutes les feuilles)

Sub Zoom()
Dim Feuille, Sh, Rep As String
        Sh = ActiveSheet.Name
        Rep = InputBox("Zoom à combien ?", , 100)
        If Rep = "" Or IsNumeric(Rep) = False Then Exit Sub
        Application.ScreenUpdating = False
    For Each Feuille In ActiveWorkbook.Sheets
        With Feuille
            .Activate
            ActiveWindow.Zoom = Rep
        End With
    Next Feuille
        Sheets(Sh).Activate
End Sub

Bonne journée

Claude.

Bonjour à tous,

Bonjour Claude,

Je te remercie de ce bout de code ça me semble très intéressant.

En plus de ce zoom aurait-il possibilité de rajouter les dimensions de la fenêtre?

Merci

Amicalement

Noel

re,

Je ne sais pas faire, je n'utilise pas de fenêtres

Claude.

Re

Qu'utilises-tu pour que quand tu zoom le résultat sois sans fenetre.

Merci

Amicalement

Noel