Activate Method

Activates a window or OLE object.

expression   Required. An expression that returns one of the objects in the Applies To list.

Remarks

Because Microsoft Publisher runs in a single window, using the Activate method with a Window object makes Microsoft Publisher the active application.

Example

The following example makes Publisher the active application.

Application.ActiveWindow.Activate

The following example adds a Microsoft Excel spreadsheet to the first page of the active publication and activates the spreadsheet for editing.

Dim shpSheet As Shape

Set shpSheet = ActiveDocument.Pages(1).Shapes.AddOLEObject _
    (Left:=72, Top:=72, ClassName:="Excel.Sheet")

shpSheet.OLEFormat.Activate