Share via

ShapesAdded Event [Publisher 2003 VBA Language Reference]

  • Article

Occurs when one or more new shapes are added to a publication. This event occurs whether shapes are added manually or programmatically.

Private Sub Document_ShapesAdded()

Example

This example displays a message whenever a new shape is added to the active publication. For this example to work, you must place this code into the ThisDocument module.

Private Sub PubDoc_ShapesAdded()
    MsgBox "You just added a new shape."
End Sub

Applies to | Document Object