当前位置：首页 > 文档资料 > Microsoft Office 对象参考 >

Height 属性

优质

小牛编辑

126浏览

2023-12-01

全部显示

返回或设置命令栏控件或命令栏的高度。Long 类型，可读写。

expression.Height

expression 必需。该表达式返回上面对象之一。

示例

本示例在名为 Custom 的命令栏上添加一个自定义控件。本示例设置该自定义控件的高度为命令栏高度的两倍，并设置宽度为 50 像素。请注意命令栏如何自动调整自身以符合控件。

Set myBar = CommandBars("Custom")
barHeight = myBar.Height
Set myControl = myBar.Controls _
 .Add(Type:=msoControlButton, _
 Id:= CommandBars("Standard").Controls("Save").Id, _
 Temporary:=True)
With myControl
 .Height = barHeight * 2
 .Width = 50
End With
myBar.Visible = True

免责声明：以上内容版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。感谢每一位辛勤著写的作者，感谢每一位的分享。