[AccessD] List the columns in a given Access table

Dim i As Integer
For i = 1 To CurrentDb.TableDefs("mytablename").Fields.Count - 1
    Debug.Print CurrentDb.TableDefs("mytablename").Fields(i).Name
Next i



On Sat, Nov 21, 2009 at 8:26 AM, Arthur Fuller <fuller.artful at gmail.com> wrote:
> I used to have a procedure to do this, but cannot locate it. Does anyone
> have something handy? ADO or DAO, I don't really care. I just want to dump
> all the column names to the debug window so I can paste them into a
> document.
>
> TIA,
> Arthur
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>