It's hardly surprising that a macro I wrote for an entirely different scenario doesn't work for yours. This kind of document parsing is very particular. In this case, the macro was only ever coded to extract one set of data per document, not multiple sets. You're lucky you got anything meaningful... The problem in this case is of your own making:
i have copied more than 100 word docs in to sample file
You should NOT have done that!