VBA: Инициализировать объект значениями?

Я хочу иметь возможность инициализировать

CArticle, имеющую следующие свойства:

Private pNumber As String
Private pQuantity As Double

с пустыми, предопределенными или текущими значениями. Как я могу этого добиться? Я думаю что-то вроде:

Новый пустой CArticle

pNumber
pQuantity

Новый фиктивный CArticle

pNumber
pQuantity = 99999

New init CArticle(число, количество)

pNumber = number
pQuantity = quantity