vba to generate cells values by number on the other cells

[elevenkun]

How can i do this with VBA

data
Sheet 1
A1 = ABC
B1 = 2
A2 = CDE
B2 = 3

Expected result
Sheet 2
A1 = ABC
A2 = ABC
A3 = CDE
A4 = CDE
A5 = CDE

Please help ..
Thank you

 

[elevenkun]

Here is the detailed sample image

 

[elevenkun]

and i need the vba run with button click

thank you