How to access the object itself in With … End With

Question

Some code to illustrate my question:

With Test.AnObject

    .Something = 1337
    .AnotherThing = \"Hello\"

    \'\'// why can\'t I do this to pass the obj         


        

Answer 1

I suspect you'll have to repeat yourself. If the expression (to get the object) is expensive, then perhaps drop it into a variable first, and either use that variable in the With, or drop the With completely:

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