在Excel 2007功能区按钮上添加更大的图标

在Excel 2007功能区按钮上添加更大的图标,excel,excel-2007,vba,Excel,Excel 2007,Vba,我有一个Excel2007VBA脚本,它在功能区中添加了一个按钮,但不幸的是图标很小。我尝试了几种不同的FaceId,但它们似乎都添加了小图标按钮。有没有办法加载一些较新的2007尺寸图标 以下是我在该工作簿中加载的代码片段: Set NewButton = NewToolbar.Controls.Add(Type:=msoControlButton) With NewButton .FaceId = 752 .TooltipText = "Convert XLS Files

我有一个Excel2007VBA脚本,它在功能区中添加了一个按钮,但不幸的是图标很小。我尝试了几种不同的FaceId,但它们似乎都添加了小图标按钮。有没有办法加载一些较新的2007尺寸图标

以下是我在该工作簿中加载的代码片段:

Set NewButton = NewToolbar.Controls.Add(Type:=msoControlButton)
With NewButton
     .FaceId = 752
    .TooltipText = "Convert XLS Files to CSVs"
    .OnAction = "XLSTOCSV"

感谢您提供有关增加图标大小的详细信息。

使用NewButton.Height和NewButton.Width设置按钮的大小。可以找到其他属性

希望这有帮助

编辑:

试试这个:

Set NewButton= .Controls.Add(Type:=msoControlButton, Id:=YourFaceID)
我不确定,但这可能会帮你自动调整尺寸

编辑2:

如果有帮助的话,如果你使用按钮,试着做一个核糖。如果您了解基本的XML,那么编码就非常简单。例如:

<?xml version="1.0" encoding="utf-8" ?> 
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" > 
    <ribbon> 
        <tabs> 
            <tab id="myTab" label="New Tab"> 
                <group id="group1" label="New Buttons"> 
                    <button id="MyButton" label="My Button" imageMso="HappyFace" size="large" onAction="myButton_ClickHandler" /> 
                </group> 
            </tab> 
        </tabs> 
    </ribbon> 
</customUI>

这将创建一个如下所示的功能区:

获取此信息的简单步骤:

  • 打开新的excel工作簿
  • 将其另存为Excel加载项(*.xlam)
  • 下载此免费软件:
  • 将上面的代码粘贴到其中
  • 省省吧
  • 打开Excel
  • 转到Excel选项>加载项>并勾选您所称的加载项
  • 玩得开心:)
  • 代码中的一些注释:OnAction是Excel加载项中的子项的名称,单击该按钮时将调用该子项。其余的都是不言自明的


    欲了解更多信息,看

    糟糕…我想我希望有一种方法可以在Excel 2007中加载更大的默认图标,或者让它自动调整大小以默认填充整个可用区域…哦,好吧…如果您希望它填充整个可用区域,那么只需将高度和宽度设置为与容器的高度和宽度相同。至于定义“默认”,为什么不创建一些默认大小或默认按钮来缩小呢。给我一分钟,我想有一个“复制模板”功能