plein écran vb

Question

Bonjour,

Voilà je voudrais bien mettre une feuille excel en affichage plein écran sous vb quand cette feuille est activée.

En fait j'ai bien trouvé un code sur internet mais je ne sais pas ou le placer car quand je le  met dans workbook ca ne marche pas.

Application.WindowState = xlMaximized

Merci d'avance

gbinforme · Answer

bonjour

quand cette feuille est activée. 

alors tu dois le mettre dans Sub Worksheet_Activate()

et ce serait bien que dans  Worksheet_Deactivate() tu fasse l'inverse...

gbinforme · Answer

bonjour

Essayes comme ceci :

Private Sub Worksheet_Activate()
    ActiveWindow.WindowState = xlMaximized
End Sub

Private Sub Worksheet_Deactivate()
    ActiveWindow.WindowState = xlNormal
End Sub

Pour être en plein écran il faut que la fenêtre excel soit plein écran.

gbinforme · Answer

bonjour

Dans ce cas le code que tu avais mis n'est pas adapté, essaies ceci :
Private Sub Worksheet_Activate()
    Application.DisplayFullScreen = True
End Sub

Private Sub Worksheet_Deactivate()
    Application.DisplayFullScreen = False
End Sub

gbinforme · Answer

bonjour

C'est bien ainsi qu'il faut faire mais sans doute que tes événements sont inhibés : crées une macro (n'importe où) et exécute la, avec
Application.EnableEvents = True

gbinforme · Answer

bonjour

Les fonction événementielles Activate ou Desactivate sont déclenchées par les événements de rentrer ou sortir de la feuille mais il faut qu'ils soient actifs.
La fonction que je t'ai fait utiliser n'avait pour but que de les activer car ils devaient être inactifs dans ton paramétrage : Excel garde le dernier paramètre qui a été attribué.

Plein écran vb

5 réponses

Discussions similaires

Newsletters