
Private Sub Workbook_Open() Application.DisplayFullScreen = True End Sub |
Private Sub Workbook_BeforeClose(Cancel As Boolean) ''chiude e riattiva funzioni Application.DisplayFullScreen = False End Sub Private Sub Workbook_Open() Application.DisplayFullScreen = True End Sub |
Sub Auto_open() Application.DisplayFullScreen = True End Sub |
Sub Auto_open() Application.DisplayFullScreen = True End Sub //////Due macro distinte Sub Auto_close() Application.DisplayFullScreen = False End Sub |
