VBA to return an array from sql select

I am Very new to programming with any language so please help.

I am trying to return an array from an SQL Select but so far only get the same line of data repeated. I think I may need to loop through the data but cant work out how.
All suggestions gratefully received.
Ideally what I would like is to be able to get the data and display this in a list box for the user to select from
The data fist needs to be filtered down hence the select LIKE statement

My Code so far is as follows:

Please Login or Register  to view this content.

When posting, please follow forum rules and enclose code in code tags. Please edit your above post accordingly.

That being said, the following code

Please Login or Register  to view this content.

is returning a single value and plugging it into the entire range. You need a loop that returns the results one at a time (until EOF) into the individual cells of the range.