Copy non continuous data to a continuous range -VBA

[kelly mort]

I want to set the value for G36:G54 to data from cells

A22
A25
A28
A31
A34
A37
A40
A43
A46
A49

I cannot seem to get the coolest way to get it done.

Can someone pull it out for me?

 

[My Aswer Is This]

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.

The codes for both @Steve and @My Answer Is This

Worked fine.

I appreciate that.
@Jaafar Tribak
Yours didn't do the job