Я должен получить все имена столбцов таблицы с помощью VBA или Доступа SQL и выполнить итерации через них для проверки, делает у любого есть решение этого, я искал Google напрасно.
Это будет работать
Set db = CurrentDb()
Set rs1 = db.OpenRecordset("Table1")
Dim fld As DAO.Field
For Each fld In rs1.Fields
MsgBox (fld.Name)
Next
Set fld = Nothing