| Name | Type | Description |
|---|---|---|
| LayerName |
String
|
Sub Test()
Dim lr As Layer
Set lr = ActivePage.CreateLayer("MyLayer")
lr.CreateRectangle 0, 0, 2, 2
End Sub