Take elements from database table to array using VBA

[alex009988]

I wanted to create some custom function and it dosent work when I set strings.
For Example,
This works

Set rst = CurrentDb.CreateQueryDef("Selected_Elements2", " SELECT * FROM  Population ")

But this dosent

Dim zzz  As String
zzz = "Population"
Set rst = CurrentDb.CreateQueryDef("Selected_Elements2", " SELECT * FROM  " & zzz & ")

What's wrong with the second one?
EDIT 2// Solved the second problem