Excel 2007 :: Using VBA To Assign Row Of Data - Code Based On Data In That Row

I have a workbook (excel07) that I use to import data onto our purpose built database. I have some macros to sort the data and send it to the correct columns however the one stage I still have to do manually is assign each row its own unique sorting Code (in a bespoke column "B2:B999").

These are objectives and the code should contain three seperate parts (part 1a and b do not need to be seperated);

1a. The characters "PO" should be the first in the code (for sorting purposes)

1b. The persons initials (first letter of the first name and last name) found in column J2:J999. [They are sorted by name so It would also be good to add a number after the initials seperated by a space incase of multiple objectives however I could defintly live with typing these in manually]

e.g. "Joe Blogs" second objective = JB02

2. The numerical part of the stategic objective they have selected found in column H2:H999. [incase you need this these range from 1.1-1.4, 2.1-2.5,3.1-3.6 and 4.1-4.5 all with a short text strings after which shouldnt be included in the code]

e.g. "1.1 We are Committed to being nice" = 1.1

3. The year they are applicable for which will all be "12/13" however I will need to change this next March.

Therefore the final code should appear as "POJB02 3.1 12/13"

There is a 16 Character limit on these codes but all of that information is needed for sorting, filtering and report generation, the spaces could be replaced by "_" if that makes things easier.