"Case Statement does not explicitly handle all enum values" issue is active when all enum elements are present in select statement

See title

Steps to Reproduce:

-------------------------------------------------------------

Module Module1

    Enum Options

        Option1

        Option2

        Option3

        Option4

    End Enum

    Sub Main()

        Dim MyEnumInstance As Options

        Select Case MyEnumInstance

            Case Options.Option1

            Case Options.Option2

            Case Options.Option3, Options.Option4

            Case Else

        End Select

    End Sub

End Module

-------------------------------------------------------------

Yields an error despite all enums being handled