Propiedad AdaptiveMenus
True si los menús adaptables están habilitados. Boolean de Lectura/Escritura.
Ejemplo
Este ejemplo establece tres opciones para todas las barras de comandos en Microsoft Office, incluyendo las barras de comandos personalizadas y los controles de esas barras.
With CommandBars
.LargeButtons = True
.DisplayFonts = True
.AdaptiveMenus = True
End With