Skip to content

Commit f090201

Browse files
committed
Update export-all-data.md
1 parent bc91682 commit f090201

1 file changed

Lines changed: 3 additions & 5 deletions

File tree

docs/access/desktop-database-reference/export-all-data.md

Lines changed: 3 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -23,18 +23,17 @@ Since this process uses OLE automation, the code could also be written using Pow
2323
1. Create a new database.
2424
1. Create a new module.
2525
1. Copy and paste the following export database code into the module.
26-
1. For each database that you wish to export, enter the following command in the immediate window:<br>ExportAccessDatabase "_Full path to database_", "_Folder to contain exported objects_".
26+
1. For each database that you wish to export, enter the following command in the immediate window:<br><br>`ExportAccessDatabase "_Full path to database_", "_Folder to contain exported objects_"`<br>
2727
1. Note that a new folder will be created in the target folder with the name of the exported database. This is to allow exporting multiple databases to the same target folder while keeping the contents of each exported database in a separate folder.
2828
1. If the database to be exported contains a startup form, or an AutoExec macro, startup actions may interfere with the export process, so you should reset the Startup Form property for the database, and remove or rename the AutoExec macro before attempting to call ExportAccessDatabase.
29-
1. If you wish to further automate this process, you could write a function that, given the path to a folder, enumerates all the databases in the folder, and calls teh ExportAccessDatabase function to export each Microsoft Access database to a target folder.
29+
1. If you wish to further automate this process, you could write a function that, given the path to a folder, enumerates all the databases in the folder, and calls the ExportAccessDatabase function to export each Microsoft Access database to a target folder.
3030

3131
## Export database code (VBA)
3232

3333
```vba
34-
3534
Option Compare Database
3635
Option Explicit
37-
\
36+
3837
' Pass in the location of the database to export, and the folder to export to
3938
Sub ExportAccessDatabase(strDBPath As String, exportFolder As String)
4039
Dim objAccess As Object
@@ -113,5 +112,4 @@ Err_ExportDatabase:
113112
114113
Exit_Sub:
115114
End Sub
116-
117115
```

0 commit comments

Comments
 (0)