Releases the user interface focus from all command bars.

Note
The use of CommandBars in some Microsoft Office applications has been superseded by the new Ribbon user interface. For more information, search help for the keyword "Ribbon."

Syntax

expression.ReleaseFocus

expression A variable that represents a CommandBars object.

Example
This example adds three blank buttons to the command bar named Custom and sets the focus to the center button. The example then waits five seconds before releasing the user interface focus from all command bars.

Visual Basic for Applications
Set myBar = CommandBars _ .Add(Name:="Custom", Position:=msoBarTop, _ Temporary:=True) With myBar .Controls.Add Type:=msoControlButton .Controls.Add Type:=msoControlButton .Controls.Add Type:=msoControlButton .Visible = True End With Set myControl = CommandBars("Custom").Controls(2) With myControl .SetFocus End With PauseTime = 5 ' Set duration. Start = Timer ' Set start time. Do While Timer Start + PauseTime DoEvents ' Yield to other processes. Loop Finish = Timer CommandBars.ReleaseFocus
clear the user interface focus of all command bars delete command bar focus ofv release release focus Release Focus Method release the focus from all command bars ReleaseFocus releasefocus method

See also: