i saw these codes, how and where to write these codes in excel vba, I mean how you apply to activex button? i was also looking for tooltip method, but i dont know how to apply these codes<SPAN style="color:#00007F">Sub</SPAN> Create_Tooltip()
<SPAN style="color:#00007F">Dim</SPAN> CBB <SPAN style="color:#00007F">As</SPAN> CommandBarButton
<SPAN style="color:#00007F">Set</SPAN> CBB = Application.CommandBars("Custom 1").Controls("Custom Button")
CBB.TooltipText = "VOILA!"
<SPAN style="color:#00007F">Set</SPAN> CBB = <SPAN style="color:#00007F">Nothing</SPAN>
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN>
<SPAN style="color:#00007F">Sub</SPAN> Delete_Tooltop()
<SPAN style="color:#00007F">Dim</SPAN> CBB <SPAN style="color:#00007F">As</SPAN> CommandBarButton
<SPAN style="color:#00007F">Set</SPAN> CBB = Application.CommandBars("Custom 1").Controls("Custom Button")
CBB.TooltipText = ""
<SPAN style="color:#00007F">Set</SPAN> CBB = <SPAN style="color:#00007F">Nothing</SPAN>
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>
Sub Create_Tooltip()
Dim CBB As CommandBarButton
Set CBB = Application.CommandBars("Custom 1").Controls("Custom Button")
CBB.TooltipText = "VOILA!"
Set CBB = Nothing
End Sub
Sub Delete_Tooltop()
Dim CBB As CommandBarButton
Set CBB = Application.CommandBars("Custom 1").Controls("Custom Button")
CBB.TooltipText = ""
Set CBB = Nothing
End Sub