Excel Tam ekran sorunu

[hlojan]

Arkadaşlar

Workbook açılışına

    On Error Resume Next

    With Application
        .DisplayFullScreen = True
        .CommandBars("Full Screen").Visible = False
        .CommandBars("Worksheet Menu Bar").Enabled = False
    End With

ekledim. Tam ekran açılıyor

Ama simge durumuna küçültüğümde tam ekran bozuluyor.

Yardımlarınzıı bekliyorum
iyi çalışamalr

 

[cems]

Bir şekilde false yaptığınız komutları her zaman başka bir şekilde true yapmalısınız. Aksi durumda sorun yaşatabilir.

Sayfaya bir tuş ekleyerek

On Error Resume Next

    With Application
        .DisplayFullScreen = False
        .CommandBars("Full Screen").Visible = True
        .CommandBars("Worksheet Menu Bar").Enabled = True
    End With

deneyin.