Buton üstüne gelince açıklama (mouseover)

[cheleby]

Selam Arkadaşlar,
Benim bir sorum olacak. Bir makronun atandığı butonun üzerine gelindiğinde html'de olduğu gibi bir açıklama görülmesi mümkün mü?
Mümkünse nasıl yapılır?
Þimdiden teşekkürler

 

[iggydarsa]

VBE bolumunde dugmenin ustune tiklayinca, solda properties (Ozellikler) penceresi vardir, orda "ControlTipText"e yazdiginiz sey, program calisinca buton'un uzerine gelince gozukecektir

 

[cheleby]

Yanıtınız için teşekkürşer ama vbe'de butonu görebileceğim yeri bulamadım. Dosyam biraz karışık sanıyorum.

 

[cheleby]

Tekrar merhaba.
Sanıyorum eksik açıklamalarım nedeniyle yanlış anlaşıldım:
Bu bir userform değil. Normal sheet üstüne eklenen butonlardan söz ediyorum.
Onların özelliklerine de vbe'den ulaşamıyorum.
Saygılar

 

[ynstcrt]

İyi akşamlar. Şu an aynı sıkıntıyı ben de yaşıyorum. Sorununuzu çözebildiniz mi acaba?

 

[Tevfik_Kursun]

Merhaba Arkadaşım,
Aradığınız özellikle ilgili bilgileri sanırım bu adreste bulacaksınız.

https://www.excelgurusu.com/?s=mouse+over

İyi çalışmalar

 

[ynstcrt]

Çok teşekkür ederim Tevfik bey vakit ayırdığınız için. Gönderdiğiniz Link'e baktım ama ordaki başlıklardan anladığım kadarı ile Mouse ile hücre üzerine gelindiğinde açıklamalar görünüyor. Benim araştırdığım Button üzerine gelindiğinde açıklama penceresi görünmesi.
Şöyle bir çözüm buldum. Belki başkalarına da faydası olur.

' Mouse'u Button üzerine getirince açıklama penceresi görünüyor
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

' Fakat Mouse'u Button üzerinden çekince açıklama ekranda kalıyordu.
' Aşağıdaki şekilde Mouse'u Açıklama penceresinin üzerine getirince pencere ekrandan kayboluyor.
Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Label1.Visible = False
End Sub

 

[Tevfik_Kursun]

Rica ederim.
İyi çalışmalar

 

[ynstcrt]

Sağ olun size de iyi çalışmalar.

 

[YUSUF44]

Çok teşekkür ederim Tevfik bey vakit ayırdığınız için. Gönderdiğiniz Link'e baktım ama ordaki başlıklardan anladığım kadarı ile Mouse ile hücre üzerine gelindiğinde açıklamalar görünüyor. Benim araştırdığım Button üzerine gelindiğinde açıklama penceresi görünmesi.
Şöyle bir çözüm buldum. Belki başkalarına da faydası olur.

' Mouse'u Button üzerine getirince açıklama penceresi görünüyor
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

' Fakat Mouse'u Button üzerinden çekince açıklama ekranda kalıyordu.
' Aşağıdaki şekilde Mouse'u Açıklama penceresinin üzerine getirince pencere ekrandan kayboluyor.
Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Label1.Visible = False
End Sub

Sorununuz çözülmüş ancak koddan gördüğüm kadarıyla sayfadaki düğmeniz de CommandButton. Bu durumda onun da özelliklerini düzenleyebilirsiniz. Tasarım moduna geçip düğmeye sağ tıkladığınızda özellikler menüsü görünecektir.

 

[Haluk]

Sayfa üzerindeki CommandButton gibi ActiveX nesnelerinde ControlTip özelliği yoktur. Bu nedenle çözüm; VBA ile anlık olarak bir Label nesnesini gösterip, 1-2 saniye sonra visible özelliğini kullanarak gizlemek ya da, CommandButton nesnesinin altına daha büyük Label nesneleri yerleştirip, bunların MouseOver olaylarından faydalanmaktır.

Birinci çözüm, her ne kadar kodda DoEvents komutuyla kontrolu Excel'e bıraksak da yine de iyi performans vermez. Bu nedenle en sağlıklı çözüm, soruyu soran kişinin de belirttiği ve ekli dosyada yer aldığı gibi ikinci alternatif olur.


.

 

[ynstcrt]

Sayın Yusuf44 , Haluk beyin de dediği gibi CommandButton özelliklerinde maalesef ControlTip gibi düzenleme seçenekleri mevcut değil o yüzden böyle bir sıkıntı yaşamıştım. Ama yine de ilgilendiğiniz için teşekkür ederim.

Haluk bey size de ayrıca teşekkür ederim. Hem sayenizde yeni bir şey daha öğrenmiş oldum hem de sıkıntım daha pratik bir yöntemle çözülmüş oldu. Değerli vaktiniz ayırdığınız için çok teşekkür ederim.

Her ikinize de iyi çalışmalar, sağlıklı günler dilerim.

 

[Levent Menteşoğlu]

Bu konu aşağıdaki linkte de işlenmişti.

Komut butona not ekleme

Merhabalar Command butona; üzerine fare ile gelindiğinde hemen görünecek şekilde bir not veya bir msgbox oluşturabilir miyiz? Tabi fare imleci uzaklaştığında hemen not kaybolmalı. Not: Dosyalarımda birçok command buton var, bunlarda kullanmayı amaçlıyorum. Diğer kullanıcılar için butonların...

www.excel.web.tr

Ayrıca o soruya alternatif cevap araştırırken Api ile çözüm üretilen aşağıdaki linkede denk gelmiştim. Ben denedim çalışıyor.

ControlTipText: Why can't I get at it or set it? Help.

Hi, just a quick question: Is there a way that i can add a ControlTipText feature (the little message that comes up when you hover your mouse over something.) to a commandButton that is NOT in a userform; one that is directly drawn on the excel sheet? If I view the properties of a...

www.mrexcel.com

 

[1mak1mak]

Api olanı örnekledim ekte

 

[Haluk]

API'siz olanı varken, gerisi beyhude...

Komut butona not ekleme

Merhabalar Command butona; üzerine fare ile gelindiğinde hemen görünecek şekilde bir not veya bir msgbox oluşturabilir miyiz? Tabi fare imleci uzaklaştığında hemen not kaybolmalı. Not: Dosyalarımda birçok command buton var, bunlarda kullanmayı amaçlıyorum. Diğer kullanıcılar için butonların...

www.excel.web.tr

Komut butona not ekleme

Merhabalar Command butona; üzerine fare ile gelindiğinde hemen görünecek şekilde bir not veya bir msgbox oluşturabilir miyiz? Tabi fare imleci uzaklaştığında hemen not kaybolmalı. Not: Dosyalarımda birçok command buton var, bunlarda kullanmayı amaçlıyorum. Diğer kullanıcılar için butonların...

www.excel.web.tr

.

 

[Zeki Gürsoy]

API konu olunca Windows balonu olabileceğini tahmin etmiştim ama yapılan iş Haluk üstadın çözümünün benzeri...

.