Tool > Add-in > Workspace Save and Restore Table Size and Position

Logic

Save

• Loop though tables and determine the state.
• If a table is open, make it active and set a form object variable to Screen.ActiveDatasheet (this code also keeps track of state so if it was in design view, that can be restored too)
• Save the WindowLeft, WindowTop, WindowWidth, and WindowHeight properties for the form object

Restore

• Loop though recordset with your saved information.
• DoCmd.OpenTable and set a form object variable to Screen.ActiveDatasheet
• Then use the form Move method to specify WindowLeft, WindowTop, WindowWidth, and WindowHeight

Data Table

To avoid bloat in the current database, an external database is created to store the table position information.

• DBEngine.CreateDatabase to create an external database
• Use DAO.TableDef.CreateTableDef to make a new table in that external database, then CreateField, set Attributes if it is an autonumber, and DefaultValue if desired for other fields.
• When needed, Append Fields and TableDefs. Make Primary Key index.
• Descriptions: It used to be that you could create descriptions when a field is defined. Now it seems that field descriptions can only be created once a table definition is saved. Therefore, the code to set field descriptions is later.
• Once the table is made in the external database, DAO.TableDef.CreateTableDef is used to link to it to the current database so it can be used to store and retrieve data.

Steps to install an add-in

1. Run Access As Administrator
   • Right-click on the MSACCESS.EXE file or a shortcut to it
   • Choose "Run as administrator"
2. Open any database.
3. On the DATABASE TOOLS ribbon tab, drop down the list under the Add-ins icon.
4. Choose the Add-in Manager.
5. Add New...
6. Browse to the ACCDA file and click Open.
7. Close the Add-in Manager.

Workspace is now on the Add-ins menu.

Download

Download

AddIn_Workspace_SaveRestore_s4p.zip (10 kb, unzips to an Access ACCDA database file)  

License

This add-in is a regular ACCDB file that has been renamed to have an ACCDA extension. It may be used freely, but you may not sell it in whole or in part. You may include it in applications you develop for others provided you pass on the download link and share the source code and designs with your modifications.

Goto Top  

Screen shot

Five tables are open. If Save is chosen from the menu, their size and position will be saved. Tables that are no longer open, but whose position information is also stored, will have their state set to 0 (zero). To restore, choose Restore (currently open tables that were not previously open when last saved won't be affected).

Video Tutorial

How to Make and Install an Access Add-In

Watch on YouTube

Watch on Experts-Exchange

Back Story

As a developer, it is useful to open several tables to enter sample data. Therefore I created this add-in to do that. The trick is to treat each table as a form using ActiveDatasheet. Then the window properties can be saved and restored.

Share with others

here's the link to copy:

https://msaccessgurus.com/tool/Addin_Workspace.htm

Do you have something to say or share?

It is interesting to hear from you. Was something not clear? Did you find a bug? Is an explanation wrong or not sufficient? Do you want this do more? (there is always more)

Some of you write to say thanks and share what you're doing with Access ... nice to hear from you! It is my hope that you build great applications with Access, design your database structure well, link to and share with data in other formats, and use other Office applications such as Excel, Word, and PowerPoint, ... take advantage of built-in abilities, use strengths of each product, and manage your information wisely.

Are you a developer? Do you want to share? Email to ask about getting your pages added to the code or tools index.

When we communicate, collaborate, and appreciate, we all get better. Thank you.

Are you looking for one-on-one help?

Let's connect and team-develop while we build your application together. As needed, I'll pull in code and features from my vast libraries, cutting out lots of development time.

Email me at info@msAccessGurus.com
~ crystal

Goto Top