XL 2016 Code vba plein écran

L_Wa · 27 Décembre 2022

Bonjour à tous,

J'utilise ce code VBA sur divers tableurs me permettant d'ouvrir le fichier en plein écran :

Sub Workbook_Open()
Application.DisplayFullScreen = True = Application.DisplayFullScreen = False
Worksheets("ACCUEIL").Activate
End Sub

Seul bémol, l'affichage ne s'adapte pas à la taille de plusieurs écrans. Par exemple sur mon écran (là où les tableurs sont édités) pas de PB, dès qu'un collègue ouvre un de ces tableurs, s'il dispose d'un écran plus petit ou plus grand l'affichage n'est plus correctement réparti.

Avez-vous une solution ?

D'avance merci !

gbinforme · 27 Décembre 2022

Bonjour,
Cela ne serait-il pas plutôt :

VB:

Sub Workbook_Open()
Application.DisplayFullScreen = True ' plein écran
Worksheets("ACCUEIL").Activate
End Sub

fanch55 · 27 Décembre 2022

Bonjour :

VB:

Private Sub Workbook_Open()
    Application.DisplayFullScreen = True ' plein écran
    With Worksheets("ACCUEIL")
        .Activate
        .Columns("A:F").Select ' ou .Range("A3:M22").select
    End With
    ActiveWindow.Zoom = True
End Sub

L_Wa · 27 Décembre 2022

Bonjour @gbinforme et @fanch55 !

Merci pour vos retours, en effet @gbinforme erreur de copié collé 😉

@fanch55 , si je comprends bien ton code, la sélection des colonnes A : F signifie que l'on met uniquement cette plage en plein écran ?

fanch55 · 27 Décembre 2022

L_Wa à dit:
@fanch55 , si je comprends bien ton code, la sélection des colonnes A : F signifie que l'on met uniquement cette plage en plein écran ?

Tout à fait, on essaye d'afficher l'intégralité de la plage demandée dans l'écran affiché ( qu'il soit fullscreen ou non ).

si c'est une série de colonnes, priorité à celles-ci,
le nombre de lignes sera dépendant de la résolution écran .
si c'est une série de lignes, priorité à celles-ci,
le nombre de colonnes sera dépendant de la résolution écran .
si c'est une plage, celle-ci sera casée dans l'affichage,
le nombre de lignes et de colonnes éventuellement supplémentaires sera dépendant de la résolution écran .

L_Wa · 27 Décembre 2022

@fanch55 très clair merci !

Merci à vous deux pour votre aide 👍

A bientôt

XL 2016 Code vba plein écran

L_Wa

XLDnaute Nouveau

gbinforme

XLDnaute Impliqué

fanch55

XLDnaute Barbatruc

L_Wa

XLDnaute Nouveau

fanch55

XLDnaute Barbatruc

L_Wa

XLDnaute Nouveau

Discussions similaires

XL 2016 Code vba plein écran

L_Wa

XLDnaute Nouveau

gbinforme

XLDnaute Impliqué

fanch55

XLDnaute Barbatruc

L_Wa

XLDnaute Nouveau

fanch55

XLDnaute Barbatruc

L_Wa

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency