Bonjour.
Je cherche une solution pour créer le code VBA de création d'une nouvelle base Access, au départ d'une base Access existante.
Les tables et les relations. Pas nécessairement les données.
Il s'agit du code VBA qui doit permettre de recréer la même base Access.
Pour quoi faire ça ?
Au bureau, les ports USB sont bloqués et les pièces attachées aux emails sont surveillées. Je ne peux pas m'envoyer ma base Access en pièce attachée.
Mais si je disposais du code VBA de création de ma base Access:
1. je le mettrais dans un email (dans le message, pas en pièce attachée)
2. que je m'enverrais au bureau,
3. je récupèrerais le (texte du) code VBA,
4. je le collerais dans Access, dans un Sub
5. que j'exécuterais.
Résultat: j'aurais ma base Access au bureau.
Le top serait de passer les données de la même manière, mais la base Access vide m'aiderait déjà beaucoup.
Le code VBA serait du genre (pour l'exemple):
Merci d'avance pour vos idées, suggestions et solutions.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Sub Main() Set con = CurrentProject.Connection cat.ActiveConnection = con Set dbs = CurrentDb() On Error GoTo ErrorHandler Call CreateTables Call CreatePrimaryKeys Call CreateIndexes Call CreateAlterKeys Call CreateRelations Call CreateRelationsDAO Call CreateQueries ...
Partager