【VBA】配列の要素数を取得するElmクラス

Option Explicit
' -----------------------------------------------------------------------
' クラス名      : Elm
' 機能          : 二次元配列の一次元目・二次元目の各要素数を格納する
' 目的          : 毎回のlbound/uboundの記述を回避する
' -----------------------------------------------------------------------
Public yFirst As Long
Public yLast As Long
Public xFirst As Long
Public xLast As Long
Public Sub Add(ByRef ary As Variant)
    yFirst = LBound(ary)
    yLast = UBound(ary)
    xFirst = LBound(ary, 2)
    xLast = UBound(ary, 2)
End Sub