Workspace.Active

Property Active As Boolean

Member of Workspace

The Active property returns whether a workspace is currently active in CorelDRAW.

The Active property returns a read-only value.

The following VBA example displays a list of all workspaces and determines which one is active.

Sub Test()

Dim Ws As Workspace

For Each Ws In Workspaces

s = s & Ws.Name & " - Active: " & Ws.Active & vbCr

Next Ws

MsgBox "Workspaces: " & vbCr & s

End Sub