Sayfalar arası geçiş çubuğunu kaldırmak

[doukan84]

Hayırlı haftasonları arkadaşlar...

Çalışma kitabımdaki sayfalar arası geçişi sağlayan çubuğu kaldırmak istiyorum..

Sayfayı gizle ile yaptığım zaman köprülerim ve formüllerim çalışmıyor ve anasayfa mutlaka kalıyor.. sitede gördüm açlışta bir program gibi bir giriş sayfası var onun üstündeki butonlarla işi hallediyorsun.. sanki excel değilde başka bir programmış gibi olmuş... Tam olarak nerenin kaybolmasını istediğim resimdede gösterdim.. Yardımlar için çok sağolun.. Evde 2010 var ama iş yerimde 2003 var bunu her ikisi içinde anlatırsanız sevinirim..

 

[Necdet]

Merhaba,

Aşağıdaki kodları Thisworkbook (Bu çalışma kitabı) un kod bölümüne koplayayıp dener misiniz?

Dosya açıldığında gizler, kapanırken gösterir.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 
    With ActiveWindow
        .DisplayHorizontalScrollBar = True
        .DisplayWorkbookTabs = True
    End With
 
End Sub

Private Sub Workbook_Open()
 
    With ActiveWindow
        .DisplayHorizontalScrollBar = False
        .DisplayWorkbookTabs = False
    End With
 
End Sub

 

[doukan84]

Çok güzel hocam cidden sağolun süper işimi gördü... harika...Yardım için teşekkür ederim

Birde hocam.. Bu üst menüler varya onları iptal etmek için nasıl bir kod yazmamız lazım

 

[Necdet]

Çok güzel hocam cidden sağolun süper işimi gördü... harika...Yardım için teşekkür ederim

Birde hocam.. Bu üst menüler varya onları iptal etmek için nasıl bir kod yazmamız lazım

Merhaba,

Üst menüden kastınız nedir anlamadım ama, ben yukarıdaki kodları makro kaydet ile elde ettim.

Sizde bu yöntemi kullanabilirsiniz.

Makro kaydet tuşuna basın ve excel seçeneklerinden istediğiniz görüntüyü elde edin ve makro kaydını durdun. Sonra da kodları inceleyin.