With Test.AnObject

    .Something = 1337
    .AnotherThing = "Hello"

    ''// why can't I do this to pass the object itself:
    Test2.Subroutine(.)
    ''// ... and is there an equivalent, other than repeating the object in With?

End With

tmp = Test.AnObject;
tmp.Something = 1337;
...
Test2.Subroutine(tmp);

Test2.Subroutine(Test.AnObject)