Hi, Everyone

I am trying to create a macro pull random data from my data sheet 10
at a time.
i.e.

1. I have two sheets - Sheets("A") and Sheets("Data")

2. Sheets("A") is blank sheet where Sheets("Data") has number&alphabet
combined code from Range("A1:AM65536")

3. How do I macro to pick 10 of any cell's value in Sheets("data") and
place in sheets("A").Range("A1:A10") ?

i.e Each time I run macro it will select 10 values from data sheet
randomly and places it in sheet A from Cell A1.

Thank you for your help in advance