Discussion :

[faayy]

bonjour je suis débutant et j'ai un problème surement très bete.
voila je souhaite créer une macro pr éxecuter à chaque ouverture de ma base une fonction CopyFile, mais le souci c'est que je ne vois pas comment créer cette macro dans le menu action il y a plein de chose mais moi ce que je veux c'est lancer ma fonction que j'ai appellé save qui est codé dans un module.
comment puis je faire????

[say]

Tu veux une macro qui s'execute à chaque ouverture de la base?

si c'est le cas, tu crée une macro classique et tu l'appelles AutoExec

A+

[faayy]

ui d'accord mais justement je ne sais pas comment la créer, j'ai vu dans le menu action quand on choisi "nouvelle macro" il ya plein d'actions lakel choisir???

[say]

oups, j'avais lu trop vite...
dans le menu action, t'as

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ExécuterCode

ça devrait coller

[faayy]

ui j'ai bien ca mais après il faut que je saisisse kel fonction kan je choisi ma fonction save() qui est dans mon module1 ca me dit "comporte le nom d'une fonction introuvable"

[say]

ah..étrange...tu la définies comment ta fonction?

Qd tu choisis exécutercode, t'as la liste de tes fonctions.
tu dois faire une erreur somewhere

[faayy]

voila ma fonciton qui est dans module1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Function Save()
FileCopy "O:\Transit\feriel\Essais.mdb", "O:\Transit\feriel\Sauvegardes\CopieBD.mdb"
Exit Function
End Function

quand je choisi save dans les fonction pour la macro il trouve pa

[say]

voila ma fonciton qui est dans module1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Function Save()
FileCopy "O:\Transit\feriel\Essais.mdb", "O:\Transit\feriel\Sauvegardes\CopieBD.mdb"
Exit Function
End Function

quand je choisi save dans les fonction pour la macro il trouve pa

alors essaie ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 PUblic Function Save()
FileCopy "O:\Transit\feriel\Essais.mdb", "O:\Transit\feriel\Sauvegardes\CopieBD.mdb"
Exit Function
End Function

par ailleurs, en faut tu fais une sauvegarde de ta base?
me semble qu'il y a une action tte prête pour ça

[faayy]

idem il ne trouve pas
je ne comprend pas pourtant le code tout seul marche très hbien, il faut juste que j'arrive à le faire éxecuter!

[say]

tu mets quo exactement ds code à exécuter?

Essayes en mettant un paramêtre à ta fonction même si tu ne l'utilises pas...

[faayy]

bah quand je vais en bas dans nom de fonction après avoir selectionner xecuterCode, j'ai le générateur d'expression qui s'ouvre, la je click sur fonction-Save-Module1, j'ai save() qui s'affiche en haut dans l'ecran du haut du générateur ensuite je fais ok et j'enregistre, quand je click sur ma macro g l'erreur.

[say]

t'as save() ou Save()?

et le msg d'erreur c'est "comporte le nom d'une fonction introuvable"???
t'as forcèment un problème de nom....

[faayy]

bah en fait j'ai changer le nom de ma fonciton j'ai mis Sauver et la ca marche!
je e comprends pas!!! en tout cas je te remercieee.
dernière petite chose peut on via du code ou je ne sais comment demander la fermeture de la base juste après cette éxecution.
en fait je veux lancer ma base par tache planifié, dc dès kelle s'ouvre Sauver() est effectué et je souhaite fermer le tout juste après.