VBA (Excel) 怎样实现类似ToolTipText 的功能

kingsang kingsang 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
工作簿中有多张工作表,每张工作表上添加了命令按钮
现在想实现VB中类似Tooltip的功能,就是说当鼠标移动到命令按钮上
会有相应的提示出现,请问除了用MouseMove事件外,有没有直接一点的方法
因为发现Excel中的命令按钮好像没有ToolTipText属性。
...全文

相关推荐

EXCEL VBA创建菜单代码

EXCEL VBA创建菜单的代码 Sub Creatxlsht() On Error Resume Next Application.CommandBars("xlsht").Delete Dim cbrCmdBar As CommandBar Dim strCBarName As String strCBarName = "xlsht" Set cbrCmdBar = Application.CommandBars.Add(Name:=strCBarName, Position:=msoBarPopup) Set SubMenu = CommandBars(strCBarName).Controls.Add(Type:=msoControlButton) With SubMenu .Caption = "数据维护中心" .TooltipText = "aa" .Style = msoButtonIconAndCaption .Tag = "bb" .FaceId = 9588 ' 9949 '2122 '1018 .Enabled = True .OnAction = "k" End With Set SubMenu = CommandBars(strCBarName).Controls.Add(Type:=msoControlButton) With SubMenu .Caption = "显示客户记录" .TooltipText = "aa" .Style = msoButtonIconAndCaption .Tag = "bb" .FaceId = 9584 ' 9949 '2122 '1018 .Enabled = True .OnAction = "xskujl" End With Set SubMenu = CommandBars(strCBarName).Controls.Add(Type:=msoControlButton) With SubMenu .Caption = "删除客户记录" .TooltipText = "aa" .Style = msoButtonIconAndCaption .Tag = "bb" .FaceId = 9585 ' 9949 '2122 '1018 .Enabled = True .OnAction = "Sckujl" End With

q5006

EXCEL VBA编程与实战

EXCEL定制化程序开发 使用于excel2010 VBA编程实战指导

mytopnumberone

Excel-VBA宏编程实例源代码-修改单元格右键快捷菜单.zip

Excel-VBA宏编程实例源代码-修改单元格右键快捷菜单.zip

芝麻粒儿

加载宏材料

加载宏文件 做EXCEL VBA中的宏加载教程使用

csj2000yz

2021-2022计算机二级等级考试试题及答案No.13639.docx

2021-2022计算机二级等级考试试题及答案No.13639.docx

爱我丶就要付出代价
评论 9
收藏 已收藏
分享
返回顶部
kingsang
VBA 2,506 成员 10,830 内容