OLEUsage Property
Applies To
CommandBarButton object, CommandBarComboBox object, CommandBarControl object, CommandBarPopup object.
Description
Returns or sets the OLE client and OLE server roles in which a command bar control will be used when two Microsoft Office applications are merged. Can be one of the following MsoControlOLEUsage constants: msoControlOLEUsageNeither, msoControlOLEUsageServer, msoControlOLEUsageClient, or msoControlOLEUsageBoth. Read/write Long.
Remarks
This property is intended to allow you to specify how individual add-in applications' command bar controls will be represented in one Office application when it is merged with another Office application. If both the client and server implement command bars, the command bar controls are embedded in the client control by control. Custom controls marked as client-only (or neither client nor server) are dropped from the server, and controls marked as server-only (or neither server nor client) are dropped from the client. The remaining controls are merged.
If one of the merging applications isn't an Office application, normal OLE menu merging is used, which is controlled by the OLEMenuGroup property.
Example
This example adds a new button to the command bar named Tools, and sets its OLEUsage property.
Set myControl = CommandBars("Tools").Controls _
.Add(Type:=msoControlButton,Temporary:=True)
myControl.OLEUsage = msoControlOLEUsageNeither