I don't think you're going to find too many people here who are going to be able to (or even want) to go through your VB code.

Better: can you give us examples of the data (not the code) input and output you're looking for? And please keep it simple, short, and sweet.

Thanks!