excel полный экран отключается при минимизации и максимизации

Question

У меня есть код для получения полного экрана для книги Excel. Но когда я свожу к минимуму рабочую книгу и Maximize, функция полного экрана автоматически отключается. Для этой книги мне нужен полный экран во всех условиях. Пожалуйста, предложите.

Application.DisplayFullScreen = True 
Application.CommandBars("Full Screen").Enabled = False 
'Disable the Esc key. 
Application.OnKey "{ESC}", "" 

Answer 1

Попробуйте это.

Private Sub Workbook_Open() 
'this sub is automatically called on opening the workbook 

Application.WindowState = xlMaximized 
'the active window is expanded to the biggest size available 
End Sub