Summary count lines of VBA code (1 Viewer)

Does exists some software that returns summary count lines of VBA code in entire Access project/application?

Look inside the object cataloge for the Module property - especially for CountOf Lines. Then read out all objects in the AllForms, AllModules and AllReports collections of the AccessObject. Open each of them in a loop (look for HasModule property inside the form or report) and add all CountOfLines and close the object.

This should not work in the runtime environment and also not with a database in mde format.