ExcelVBA.Net sitesine katkıda bulunabilirsiniz

[Tarkan VURAL]

UserForm' unuzun üzerinde bir menü barı olsun isterseniz ek'teki örnek tam size göre.

ToolBox' a component olarak Microsoft ToolBar Control seçip uygulayın.

ToolBox' a eklenen bu yeni nesne modelini seçip formunuzun üzerine , üst kısma gelecek şekilde çizin.
Normal şartlarda ToolBox' a eklediğiniz ToolBar nesnesinden sonra referansı otomatik olarak işaretlenecektir. Yine de kontrol edebilirsiniz. Referans penceresinde Microsoft Common Controls seçili değilse işaretleyin.


Açık kodlama örneklerini aşağıya ekliyorum. Kodların tamamı ek' teki dosyada mevcuttur.

Kod: Tümünü seç

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
If Button.Key = "son" Then son
End Sub

Kod: Tümünü seç

Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
With ButtonMenu
    If .Key = "formac" Then formac
        If .Key = "yaz" Then yaz
            If .Key = "kapat" Then kapat
                If .Key = "deneme" Then deneme
End With
End Sub

Ekran görüntüsü şu şekilde olacak :

userform_toolbar.rar

Saygılarımızla,

[hsayar]

değişik bir örneği
viewtopic.php?f=78&t=798 başlığındaki 4. mesajdan indirebilirsiniz.

[do12uk]

Selamlar,
Öncelikle ellerinize sağlık.Gerçekten çok güzel bir paylaşım.
Benim merak ettiğim ve sormak istediğim,"ilk menü","son menü" ve "diğer menü" bölümlerini nasıl değiştirebileceğim.Excel dosyasını indirip kodları incelediğimde,ilgili bölümlere herhangi bir müdahele de bulunamadığımı gördüm.Sanki bir şekilde kodun içine gömülmüş diye düşündüm.
Konu biraz eski olmasına rağmen bu konuda bilgi verebilirseniz gerçekten çok sevinirim.
Tekrar teşekkürler,

Doruk

[Tarkan VURAL]

Merhaba Doruk bey sitemize hoş geldiniz.

UserForm üzerinde menü yapımı için bir ToolBar nesnesi mevcut. Ayrıca UserForm sayfasında da ilgili kodlamalar mevcut ve paylaşılmıştır. Şifreli değildir. Evet olaylar kodlama içerisinde olmaktadır. Bunun için VBA makro kodlarını bilmeniz gerekmektedir. Kodları incelemeye başladığınızda - bilmiyorsanız - öğrenmeye de başlamış sayılırsınız. Bir kaç değişiklik yaparak çalıştırınız, oluşan değişimleri izleyiniz.

İyi çalışmalar.

[do12uk]

Tarkan Bey cevabınız için çok teşekkürler.
Sanırım ben derdimi tam olarak anlatamadım.Makro ekleme konusunda herhangi bir sıkıntı yaşamadım, fakat "Toolbar" opsiyonunu eklediğim zaman, üzerine yazı ekleme, hover özelliği gibi eklentileri yapamadım. Bu sebeb ile, sizin hazırladığınız örneği bir kez daha inceledim fakat malesef tekrar bir sonuç alamadım.
İçine makro eklemek vb. konulardan ziyade, Toolbar hakimiyeti üzerineydi aslında sormak istediğim.
"İlk Menü".."Son Menü" isimlendirmeleri ve biçimlendirmeleri belirten kodu göremediğimden dolayı,nasıl yapıldığını mümkünse öğrenmek istiyorum.
Tekrar teşekkürler,

Doruk

[Tarkan VURAL]

ToolBar nesnesini eklediğiniz zaman , VBE penceresinden ToolBar'ın Custom özelliğinden faydalanıp menülerinizi ve makro başlıklarınızı oluşturabilirsiniz.

[do12uk]

Çok teşekkür ederim gerçekten, tekrar ellerinize sağlık..

İyi çalışmalar,

Doruk

[emre311]

Hocam toolbar örneğini tekrar yayınlarmısınız?

[Tarkan VURAL]

Hocam toolbar örneğini tekrar yayınlarmısınız?

Eskisi yoktu ama hemen benzer bir örnek hazırladım, ekliyorum.

[emre311]

Çok teşekkür ederim hocam sağolun.

[emre311]

Hocam peki ekteki yöntemlerle toolbarda yetki verilebilirmi? Nasıl verilebirlir? Yardımınız için teşekkürler şimdiden.

[emre311]

Biraz uğraştırdı ama yaptım galiba.

[Enes Recep BAĞ]

Tarkan Bey aşağıdaki hatayı aldım, sanırım referanslardan hata veriyor.
Yardımcı olabilir misiniz?

Run-time error '424':
Object required

Could not load on object because it is not available on this machine.

[Tarkan VURAL]

Could not load on object because it is not available on this machine.

ToolBar nesnesi, MSCOMCTL.OCX dosyası içinden çıkan bir nesnedir. Sisteminizde bu dosya yüklü ise benim eklediğim nesneyi silip kendi toolbox araç kutunuzdan ekleyin.

[feraz]