Outline w/ no Fill Color Crashing CorelDraw | For Each Shape Selected Convert Outline to Object

If there is an independent Outline with no "Fill" color assigned. The code below crashes CorelDraw.

It works as long as a "Fill" color is assigned.

Seems as if it needs the Fill to consider it a shape?

What am I missing?

Sub outlineObjectTest()

Dim s As Shape
Dim sr As ShapeRange

Set sr = ActiveSelectionRange

For Each s In sr.Shapes
Next s

End Sub