Sayfalari Daha Kolay Goruntuleme

Konumuz daha cok kalabalik calisma kitaplarinda calisan arkadaslarimizi ilgilendirecek. Bazi calisma arkadaslarimda gordugum bir eksikten yola cikarak en basit sekliyle bir sayfa navigasyonu ornegi hazirlamaya calistim..

Soyleki ustteki ornegim cok fazla degil ama 12 sayfadan olusuyor sadece fikir olsun diye bir kac sayfa daha ekledim.  Bu sayfalari ustteki gibi bir menuyle gormek daha rahat olmazmiydi sizcede?

Aslinda ornegimizi cok daha genis bir kullanima gecirebilir yada daha profesyonelce degisiklikler yapabiliriz fakat sadece konuyu ve kod tanimak adina basit ama isinizi gorebilecek sekilde bu konuyu paylasiyorum, istekelerinizi ve fikirlerinizi tartisabiliriz..

Simdi bu ornegimizin yapimi icin gerekli kodu paylasayim;

Sub Sayfalari_Goster()
Application.CommandBars("workbook tabs").ShowPopup
End Sub

Ustteki kodumuzu calisma kitabina yahut bir modul ekleyerek kopyalayabiliriz.. Daha sonra bunu hizli calistirmak adina bir kisayola baglamanizi oneririm. bunun icin Developer / Macros menusunden asagida gordugunuz pencereden;

Secenekler butonunu tiklayareak yine asagidaki resimdeki gibi bir kisa yol tanimlayarak yapabilirsiniz..

Ornek dosyayi inceleyebilirsiniz, iyi calismalar..

Sayfalari Popup Goster

Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

“Sayfalari Daha Kolay Goruntuleme” için 2 yorum

  1. Merhaba Omer Bey,

    Bu tarz uygulamalar sonucta exceliniz veriminden calmaktadir uygulamayi sadece kullanicaginiz dosyalara uygulamalisiniz,

    Her zamna dosya otomatik acilsin isterseniz, program files icerisinde microsoft klasorunun icerisinde office.1* gibi bir klasorunuz olmali bu kalsorun icerisindeki xlstart klasorunun icerisine bu dosyasi xlsm kaydederek koyarsaniz her zaman acilmasini saglayabilirsiniz.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


1 + 6 =