Precision time tracking - slightly elaborated

With the module below and just three statements (mPtt.BegOf, mPtt.EndOf, and mPtt.Display) the displayed result will look as follows:

Please Login or Register  to view this content.

The three statements used are demonstrated in the following two test procedures. In fact the mPtt.Display may also be entered in the "" Window of the VBA editor. It ends any time tracking session by clearing the dictionary of collected begin/end items.

Please Login or Register  to view this content.

When the following is copied to a new module named mPtt digging into performance problems should be quick and easy:

Please Login or Register  to view this content.

What is your question, please?

EDIT: Moved to the Tips & Tutorials section as your threads are not queries.

If you give me a bit more information about how this "doesn't work" is shown I might be able to help you. Maybe you've overlooked the note: Requires a Reference to "Microsoft Scripting Runtime".