W tym artykule dowiemy się, jak aktywować funkcję pełnoekranową i wyłączyć przycisk zmiany rozmiaru okna za pomocą VBA.
Wyjaśnienie logiczne
Stworzyliśmy makro „ActivatingFullScreen”, aby zmienić właściwości aplikacji Excel, aby włączyć funkcję pełnoekranową.
Użyliśmy zdarzenia zmiany rozmiaru okna skoroszytu, aby wyłączyć przycisk zmiany rozmiaru okna.
Wyjaśnienie kodu
Application.DisplayFullScreen = Prawda
Ustawiliśmy właściwość DisplayFullScreen aplikacji na True, aby włączyć funkcję pełnoekranową.
Wn.WindowState = xlMaximized
Ustawiliśmy właściwość WindowState okna Excela na xlMaximized, aby uniemożliwić powrót okna do normalnego rozmiaru.
Proszę postępować zgodnie z poniższym kodem!
Option Explicit Sub ActivatingFullScreen() 'Aktywacja pełnego ekranu Application.DisplayFullScreen = True End Sub 'Wprowadź poniższy kod w module ThisWorkbook Private Sub Workbook_WindowResize(ByVal Wn As Window) 'Zmiana stanu okna na maksymalny rozmiar Wn.WindowState = xlMaximized Application.DisplayFullScreen Napis końcowy
Jeśli podobał Ci się ten blog, podziel się nim ze znajomymi na Facebooku. Możesz również śledzić nas na Twitterze i Facebooku.
Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy poprawić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail