VBA Unit Testing

I have been writing so OO VBA code, it really helps me to write frequent unit test.

My approach to writing these tests would involve writing a Sub names 'test_CLASSNAME' in there I woudl instantiate my object, set parameters, and concludee with Debug.Assert.

Problem is my classes are getting bit more complicated now and I would like to run unit tests that involve Private methods & properties of the class. Using my apprach that is ofcourse not possible because I am using an external Sub to call relevant methods.

So my question is what other approaches exist to Unit testing in VBA, preferablyu ones that manage to access private methods of a class?

I came across follwing post but solutions involved installing add-ons my work policy forbids from doing that. So I was specualting that if I could create a test subclass of the class I want to be tested I could access all internal stuff( This is for example how Ruby solves this using Module Test::Unit).

For Argument Sake here is a dummy Class that I want to test

Class Dummy
  Private Priv1 as Integer
  Private Class_Init()
     Priv1 = 1
  End Sub
  Private Sub sub1()
     Priv1 = 2
  End Sub
End 

And Here is How I would normally test this(Provided my method, and property was not private,thus in this case this is invalid):

Sub test_Dummy()
  Dim tested as New Dummy

  Debug.Assert tested.Priv1 = 1
  tested.sub1
  Debug.Assert tested.Priv1 = 2

  Debug.Print "Dummy passed all tests"
End