既定メンバ(既定のプロパティ)とするには

Collection で Item が省略できるように if e.hasError then を if e then とできないか調べてみたらどうやらできるみたいだ。
VBAだから,ちょっとトリッキーだけど)


まずは普通にプロパティを定義

Public Property Get hasError() As Boolean
    hasError = Me.number <> ERR_INFO_NO_ERROR
End Function

でその後に,このクラスをエキスポート&解放し,下記のように変更してからインポートする。

Public Property Get hasError() As Boolean
Attribute hasError.VB_UserMemId = 0
    hasError = Me.number <> ERR_INFO_NO_ERROR
End Function

とりあえず,excel 2003 では動いた。今後どうなるかとか前のバージョンではどうなるかはわからない。。。