Macro to concatenate with previous bold cell
 

Can anyone help me with this? I am using pivot tables and I would like a Macro that would concatenate with the most recent, above cell, to create a unique value.

example

[BOLD]Pigs[/BOLD]
201201
201202
201203
[BOLD]Cows[/BOLD]
201201
201202
201203
[BOLD]Sheep[/BOLD]
201201
201202
201203

Which would result in

Pigs201201
Pigs201202
Pigs201203
Cows201201
Cows201202
Cows201203
....



This problem comes up for us a lot here, so a solution would be greatly appreciated. Thanks!