What is the purpose of renaming the tables? Do you want the tables to be displayed with a different name (in that case, apply the new names in labels on forms, or in field names on queries)? Do you want to export the data with different "table" names?

Thank-you for responding to my concern. Actually, I don't have good knowledge on MSAccess. So, that's the reason I was contacted your team. As Martin said we have an option "DoCmd.Rename "Health", acTable, "People". to change a table name.where as I want to create the table with the name of which we selected from drop-down list while executing VBA coding. Anyway, thank you for both of you.

Let's say that you have the new name, from the drop-down list, in a string variable (let's call it newName). Then you can rename the table using a statement like:

DoCmd.Rename "Health", actable, newName

If, for some reason, you want to save the contents of an existing table in a table with a different name, and then begin using the existing table anew - that is, with no contents - there are two approaches:

? Rename the existing table, and then create an entirely new table, defining all the fields, their data types, etc.

? Copy the existing table to a table with the new name (one SELECT?INTO statement), then delete the contents of the old table (one DELETE statement).

Personally, I find the second approach far more efficient and reliable.