Appending Array Tables in Access with VBA

[ekryez]

I have to append 120 tables into master table
I get runtime error. Please Help

Private Sub Append_Click()
Dim aryTables As Variant
aryTables = Array("project brd", "project udr")
For K = LBound(aryTables) To UBound(aryTables)
db.Execute "INSERT INTO master " _
& "SELECT ID, Region, Country, ProjectName, " _
& "ProjectNumber, Coordinates, BusinessDeveloper " _
& "FROM [" & aryTables(K) & "]", dbFailOnError
MsgBox db.RecordsAffected & " from table " & aryTables(K) & " were added to the master table."
Next K
End Sub

Run-Time error '424'
Object Required

[jonh]

What's db set to?