[已解决]这个Id是什么？

sdada

With .Controls.Add(Type:=msoControlButton, Id:=2950)  
Id:=2950是什么？

最佳答案

月排行榜 / 总排行榜

那么的帅

2013-6-27 12:17

sdada 发表于 2013-6-27 12:13
Id和faceid有什么区别？

ID属性  是  内置控件序号
FaceID属性是CommandBarControl对象的图标属性

跳转到最佳答案楼层

那么的帅

Id     Variant 类型，可选。指定内置控件的序号，

其中 2950   将在命令栏中添加一个  指定宏 对话框 的系统内置控件。

sdada

那么的帅 发表于 2013-6-27 12:11
Id     Variant 类型，可选。指定内置控件的序号，

其中 2950   将在命令栏中添加一个  指定宏 对话框 的 ...

Id和faceid有什么区别？

那么的帅

sdada 发表于 2013-6-27 12:13
Id和faceid有什么区别？

ID属性  是  内置控件序号
FaceID属性是CommandBarControl对象的图标属性

sdada

那么的帅 发表于 2013-6-27 12:17
ID属性  是  内置控件序号
FaceID属性是CommandBarControl对象的图标属性

With .Controls.Add(Type:=msoControlButton, Id:=1)  
Id:=1是什么？

那么的帅

sdada 发表于 2013-6-27 12:19
With .Controls.Add(Type:=msoControlButton, Id:=1)  
Id:=1是什么？

每个ID对应的不用的控件，可以修改ID的值，具体查看

1. Sub 添加指定内置控件到工具栏()    Dim customBar As CommandBar
   
2.     Dim newButton As CommandBarButton
   
3.     On Error Resume Next
   
4.     CommandBars("Custom").Delete
   
5.     Set customBar = CommandBars.Add("Custom")
   
6.     With customBar
   
7.         With .Controls.Add(Type:=msoControlButton, ID:=2950) '修改序号，可以看到具体调出的内置控件
   
8.         End With
   
9.         .Visible = True
   
10.     End With
    
11. End Sub
    
12. 
    
13. Sub 删除指定工具栏()
    
14.     On Error Resume Next
    
15.     CommandBars("Custom").Delete
    
16. End Sub
    

复制代码