The Visible property returns or specifies the visibility status of a layer and of all shapes on that layer. If the Visible property is set the True, the layer is visible.
Examples:
The following VBA example shows a warning message if the current layer is invisible.
Sub Test()
If Not ActiveLayer.Visible Then
MsgBox "The Current Layer is invisible!"
End If
End Sub