list folder,subdirectories and files

This macro will list the current folder and all it's files, the subdirectories and all of the files under each specific subdirectory.