Automatisch volledig scherm bij maximaliseren vanaf taakbalk.

[corvdh]

Ik heb een bepaald Excel 2010 document wat ik altijd in volledig scherm gebruik.
Nu heb ik via vba ingesteld dat dit bestand bij het openen word gemaximaliseerd naar volledig scherm en bij het sluiten weer terug schakeld naar normaal scherm.

Private Sub Workbook_Open()

    
    Application.DisplayFullScreen = True

        
   End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean)

    
    Application.DisplayFullScreen = False


   End Sub

Alleen als ik het bestand minimaliseer naar de taakbalk en daarna weer maximaliseer veranderd de weergave terug naar normaal scherm en moet ik dit dus handmatig weer naar volledig scherm schakelen.
Kan dit ook automatisch met een macro gebeuren?

 

[edmoor]

Probeer het eens met deze:

Private Sub Workbook_Open() 
    Application.WindowState = xlMaximized 
End Sub

 

[corvdh]

Dit even getest maar bij het openen word nu niet meer meteen geschakeld naar volledig scherm.
En bij maximaliseren vanaf de taakbalk schakeld hij nog steeds niet automatisch naar volledig scherm.

 

[Warme bakkertje]

Sub MinimizeAndWait()
    Application.WindowState = xlMinimized
    Do
        DoEvents
    Loop While Application.WindowState = xlMinimized
    Application.DisplayFullScreen = True
End Sub

Ofwel met een knop op je werkblad of met sneltoets verbonden aan macro.

 

[corvdh]

Ik heb deze macro getest en deze werkt goed.
Ik ben nu alleen verplicht om bij het minimaliseren van het scherm altijd de knop te gebruiken waar ik deze macro aan heb toegewezen.
Als ik bijvoorbeeld via de toetsen combinatie Windows M alle openstaande vensters minimaliseer en ik daarna het Excel bestand weer maximaliseer dan moet ik toch weer handmatig schakelen naar volledig scherm.

Als deze macro bij het maximaliseren automatisch geactiveerd zou kunnen worden dan zou het helemaal perfect zijn, dan heb ik geen knop meer nodig om dit te doen.

 

[pixcel]

Wat je hier zou willen is een applicationwindowresize event. Die is er helaas niet. Wel een workbook.windowresize maar die wordt niet afgevuurd als je een geminimaliseerd Excel vanaf de taakbalk maximaliseert.
Resteert: een timer, of de api calls in duiken.