Commandbuttona açıklama ekleme

[magnesia]

Arkadaşlar merhaba.
Hücreye açıklama ekler gibi commandbutton üzerine gelindiğinde açıklama penceresi eklenebilir mi?

 

[cems]

Tuşu vba da tek tıklayın
Properties'ini açın
Controltyptext satırını bulun
sağına istediğinizi yazın
Save edin ve mouse ile tuşun üstüne gelerek
Deneyin

 

[magnesia]

Tam da istediğim gibi..
Teşekkür ederim.

Ufak bir ek soru sormak istiyorum :

Sirden fazla ismi aynı açıklama kutusunda alt alta göstermek mümkün mü?

 

[cems]

Sirden fazla ismi aynı açıklama kutusunda alt alta göstermek mümkün mü?

Dediğiniz eğer controltyptex ile ilgili ise , denemedim ama yapısalını düşününce sanmıyorum. Düz satır olur. Kasdettiğiniz bu ise , o satırda cursoru yazının sonuna getirip ctrl basılı ilen entera basarak " deneyin ", bu şekilde olursa olur . Bu , diğer yerlerde kullanılan bir tarz özellikle textbox ya da labellerde , bakarsınız burada da olur, emin değilim

 

[magnesia]

Denedim olmuyor..
Olsun.. Bu da işimi gördü..
Tekrar teşekkürler..

 

[Saban Sertkaya]

Bilmem işinize yarar mı ? Şöyle bir mantık kurabilirsiniz.

İlgili butonun üstüne 1 label ekleyin. Label nesnelerininin içine Ctrl+Enter tuşu ile istediğiniz kadar satır ekleyebilirsiniz.

Userformunuzun mousemove olayına label'ii gizle deyin.

Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Label1.Visible = False
End Sub

Ve butonun mousemove olayına da label'i göster deyin.

Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Label1.Visible = True
End Sub

Böylece fare ile buton üzerinden geçilirken, label nesnesi (açıklamanız) görünecektir.

1 tane de örnek ekleyeyim.

http://dosya.co/7h3ec4o5ll6h/Label.xlsm.html

 

[Ömer BARAN]

Merhabalar.

Ben de alternatif bir şey söyleyeyim.

Userform üzerindeki nesnenin özelliklerindeki ControlTipText kısmına yazılacak metin de,
fare nesnenin üzerine geldiğinde görüntülenmekte ve fare nesnenin üzerinden ayrıldığında gizlenmektedir.

Bu yöntem de kullanılabilir sanırım.
.

 

[Saban Sertkaya]

Merhabalar Ömer Bey,
Sayın cems 2 nolu mesajda bu özelliği belirtmişler. Bilginize...

 

[magnesia]

saban20152015 ve Ömer Baran Bey..
Öncelikle ilginize ve emeğinize teşekkür ediyorum.
Şaban bey.
Dediğinizi uyguladım.
Butonun üzerine gelince 4 kişilik listeyi çok güzel görüntülüyor fakat mouse butonun üzerinden ayrılınca label görünmeye devam ediyor.. Başka butonlara bassam bile bu label ekranda kalıyor..
Ayrıca;
Benim bu uygulamam organizasyon şeması..
Yani onlarca ismi sizin belirttiğiniz şekilde label ile etiketlemeye kalkarsam her butona ve labela bu işlemi uygulamam gerekir ki bu da boşa emek kaybı olur diye düşünüyorum.. Bu yüzden cems ve Ömer baran arkadaşların önerileri daha uygun geldi bana..
Tekrar tekrar teşekkür ederim.

 

[Saban Sertkaya]

Örnek dosya eklenmiştim ama nasıl kolayiniza gelirse öyle yapın tabiki.

 

[magnesia]

Sayın saban20152015.
Verdiğiniz linki siz kendiniz açtınız mı?
İndir linkine tıklayınca önce bir bahis şirketinin sitesi açılıyor.
Ondan sonra indirmek için ayrı bir buton çıkıyor.. Bu butona tıklayınca benden bir sürü izin istiyor..
O yüzden bunu açmaya cesaret edemedim..
Yine de ilginize teşekkür ederim...

 

[Ömer BARAN]

Merhaba.

Bu tür dosya yükleme sitelerinde genellikle benzer sorunla (aslında sorun değil, bu tür sitelerin kazanç sağlaması için bir anlamda zorunluluk) karşılaşılıyor.

-- Açılan sayfadaki resimin üstündeki İNDİR düğmesine tıklamayın,
-- Önce resimin altındaki İNDİR düğmesinin aktif hale gelmesi için sayacın sıfırlanmasını bekleyin,
-- Düğme aktif hale geldiğinde, düğmeye tıklayın (kendiliğinden yeni bir sayfa açılırsa, açılan sayfayı kapatın)
-- İndirme işlemi otomatik olarak başlamamışsa, resimin altındaki düğmeye tekrar tıklayın.
.

 

[magnesia]

Ömer Bey merhaba..
Açıklamalarınız için teşekkür ederim.. İşe yaradı.

saban20152015 arkadaşım.

Ancak dediğim gibi; ben bunu organizasyon şemasına uygulayacağım.. Şemada 40'a yakın görevlinin ismi için label eklemek gerekecek.. Zaten diğer arkadaşların önerileri de aynı işi gördü.. Ama sizin öneriniz de yönetim kurulu üyeleri için uyguladım.. Çünkü diğer bölümlerin sorumlusu bir tane ama yönetim kurulu birden fazla olduğu için sizin önerinizi uyguladım.
İlgine ve emeğine tekrar tekrar teşekkür ederim...

 

[Saban Sertkaya]

Rica ederim. Bizimkisi zaten alternatif fikirdi.