Propiedad Position
Devuelve o establece la posición de la barra de comandos personalizada. MsoBarPosition de Lectura/Escritura.
MsoBarPosition puede ser una de estas constantes de MsoBarPosition. |
msoBarBottom |
msoBarFloating |
msoBarLeft |
msoBarMenuBar |
msoBarPopup |
msoBarRight |
msoBarTop |
Ejemplo
Este ejemplo recorre la colección de barras de comandos, acoplando las barras de comandos personalizadas en la parte inferior de la ventana de aplicación y acoplando las barras de comandos integradas en la parte superior de la ventana.
For Each bar In CommandBars
If bar.Visible = True Then
If bar.BuiltIn Then
bar.Position = msoBarTop
Else
bar.Position = msoBarBottom
End If
End If
Next