Tālāk sniegtajos piemēros kā piemērs tiek izmantota poga Jauna rīkjoslā.
Jūs varat aizstāt "Standarta" ar citas komandjoslas nosaukumu vai numuru un rediģējamā vadīklas numuru. Izmantojiet šo makro, lai mainītu rīka padoma tekstu:
Sub ChangeToolTipsText () Application.CommandBars ("Standard"). Vadīklas (1) .TooltipText = "Test" End Sub Izmantojiet šo makro, lai atiestatītu rīka padomu tekstu: Sub ResetToolTipsText () Application.CommandBars ("Standard"). Controls (1). ) .TooltipText = "" End Sub Izmantojiet šo makro, ja vēlaties atiestatīt visus pielāgotos iestatījumus Control :: Sub ResetAllControlSettings () Application.CommandBars ("Standard"). Controls (1). Reset End Sub Sub