识别 CommandBar 图标的 FaceID

原文地址：
http://spreadsheetpage.com/index.php/site/tip/identifying_commandbar_images

从 Excel 97 到 Excel 2003 都在内置的菜单和工具栏中使用了大量的图标。你可以通过设置 FaceID 属性为特定的整数把这些内置的图标用在你的自定义菜单和工具栏上。但问题是如何确定每个图标对应的整数。

下面的子程序创建了一个包含前250个 FaceID 图标的自定义工具栏（见下图）。你可以通过修改 IDStart 和 IDStop 的值来看更多的图标。最后一个 FaceID 应该是3518（也包括很多的空图标）。

在创建工具栏后，将鼠标光标移动到一个按钮上可以查出图标的 FaceID 值。点击工具栏的按钮不会有任何反应因为子程序没有指定任何宏到 OnAction 属性。

显示 FaceId 的子程序

Sub ShowFaceIDs()
Dim NewToolbar As CommandBar
Dim NewButton As CommandBarButton
Dim i As Integer, IDStart As Integer, IDStop As Integer
'   Delete existing FaceIds toolbar if it exists
On Error Resume Next
Application.CommandBars("FaceIds").Delete
On Error GoTo 0
'   Add an empty toolbar
Set NewToolbar = Application.CommandBars.Add _
(Name:="FaceIds", temporary:=True)
NewToolbar.Visible = True
'   Change the following values to see different FaceIDs
IDStart = 1
IDStop = 250
For i = IDStart To IDStop
Set NewButton = NewToolbar.Controls.Add _
(Type:=msoControlButton, Id:=2950)
NewButton.FaceId = i
NewButton.Caption = "FaceID = " & i
Next i
NewToolbar.Width = 600
End Sub

译注：上述代码仅适用于 Excel ，在 Excel 2003 中测试正常。如果需要在 Word 中运行，NewToolbar.Controls.Add 方法中的 Id 参数会导致报错，只需要去掉 Add 方法中的 Id 参数即可：

Sub ShowFaceIDs()
Dim NewToolbar As CommandBar
Dim NewButton As CommandBarButton
Dim i As Integer, IDStart As Integer, IDStop As Integer
'   Delete existing FaceIds toolbar if it exists
On Error Resume Next
Application.CommandBars("FaceIds").Delete
On Error GoTo 0
'   Add an empty toolbar
Set NewToolbar = Application.CommandBars.Add _
(Name:="FaceIds", temporary:=True)
NewToolbar.Visible = True
'   Change the following values to see different FaceIDs
IDStart = 1
IDStop = 500
For i = IDStart To IDStop
Set NewButton = NewToolbar.Controls.Add _
(Type:=msoControlButton)
NewButton.FaceId = i
NewButton.Caption = "FaceID = " & i
Next i
NewToolbar.Width = 600
End Sub

识别 CommandBar 图标的 FaceID相关推荐

B站吴恩达深度学习视频笔记（1-14）——实战3：识别猫图
前言还记得在前几节课中吴恩达老师讲述如何识别一张图片,以及电脑识别图片的原理吗?这篇笔记中就会用到之前笔记1-14除了机器学习框架以外几乎所有的知识,来完成入门阶段终极实战--识别猫图. 我们即将使 ...
C#编写最小化时隐藏为任务栏图标的Window appllication
C#编写最小化时隐藏为任务栏图标的Window appllication. 1.设置WinForm窗体属性showinTask=false 2.加notifyicon控件notifyIcon1,为控件 ...
WPF 带CheckBox、图标的TreeView
WPF 带CheckBox.图标的TreeView 在WPF实际项目开发的时候,经常会用到带CheckBox的TreeView,虽然微软在WPF的TreeView中没有提供该功能,但是微软在WPF中提 ...
【Pytorch神经网络实战案例】08 识别黑白图中的服装图案(Fashion-MNIST)
1 Fashion-MNIST简介 FashionMNIST 是一个替代 MNIST 手写数字集的图像数据集. 它是由 Zalando(一家德国的时尚科技公司)旗下的研究部门提供.其涵盖了来自 10 ...
c#.net中创建带图标的ListBox
下面的代码实现了带图标的ListBoox的功能,可以直接拷贝即可运行.运行结果如下: using System; using System.Drawing; using System.Collecti ...
柱状图中xy轴怎么出现_『怎样设置excel图标的x、y轴』excel图表xy轴名称
怎么把EXCEL中已经生成的图表的X轴和Y轴互换啊---- 方法如下: 1.打开excel: 2.点中图表,右键,点击"选择数据" 3.点击"切换行列",完成 ...
计算机logo在线设计,手机上在线制作免费logo图标的APP—Logo Foundry
一个不输电脑上设计精美logo的手机APP,也是业界众多科技媒体报道的手机上在线制作免费logo图标的APP-Logo Foundry.如果你正需要一款可以在手机上轻松制作免费logo图表的软件,那么 ...
CSS/HTML 5简洁带图标的input日期选择器
CSS/HTML 5简洁带图标的input日期选择器说明 css代码 html代码演示效果图说明演示效果分辨率为1980x1080分辨率效果高度可定制修改纯css代码控制使用的input ...
Android 启动“无启动图标的 apk“
在 Android 开发以及测试中,经常遇到需要启动一个没有启动图标的apk,这个时候可以使用 pm 以及 am 命令来配合,启动相应apk. 主流程: pm 获取apk包名 pm 获取apk详细配置 ...

识别 CommandBar 图标的 FaceID

显示 FaceId 的子程序

识别 CommandBar 图标的 FaceID相关推荐

最新文章

热门文章