Hi,

The code is really understandable.

I have one more query on the conversion from Excel formula to VBA (in Array functions)

Here is the scenario.

I have consolidated the non-empty cells. (Range is A2 to A17)

I have used two set of functions (From B2 to B17)

1. =INDEX($A$2:$A$17,SMALL(IF($A$2:$A$17<>"",ROW($A$2 :$A$17)-ROW($A$2)+1),ROWS($B$2:B2))) (Ctrl +Shift + Enter)
2. =INDEX($A$2:$A$17,AGGREGATE(15,6,ROW($A$2:$A$17)-ROW($A$2)+1/($A$2:$A$17<>""),ROWS($B$2:B2)))

A col (Query)
Bridal

Body Polishing
Clinics

Comics
Lighting

Crystals

Waxing



B col (Answer)
Timer
Flip Phones
Bridal
Body Polishing
Clinics
Comics
Lighting
Crystals
Waxing
Timer
Flip Phones



I will have to convert to VBA code because its a huge dataset.

Please help me out if possible.