VBA Transpose Macro Ignoring Items That Start With 0

I have adapted some code and it works almost perfectly in that it transposes data for each item in column A and details in subsequent columns on the same row and puts that in column format with the item number repeated, however, it does not work when the item starts with a 0 for example:

Column A Column B Column C Column D
12345 a-100 Blue a-233

will result in:

Column A Column B
12345 a-100
12345 Blue
12345 a-233

But if the item is 02345 or 03445 the code below won't pick it up....it ignores it and moves to the next item in the list. Also if in the example above, column B is blank but columns C, D, E, F etc are not, the code will also ignore the item and move to transpose the next items.

How would the code below need to be modified in order to address those two issues?

VB:
Sub test()
Dim a, b(), i As Long, ii As Long, iii As Long, n As Long
With Sheets("Sheet5")
With .Range("a1").CurrentRegion.Resize(.Cells.SpecialCells(11).Row)

[Code] .....