OVH Cloud OVH Cloud

Macro

10 réponses
Avatar
julien
Bonjour, j'aimerais savoir si il est possible d'ex=E9cuter=20
une macro =E0 partir d'une autre table.
merci d'avance

10 réponses

Avatar
Raymond [mvp]
Bonjour.

tu ne peux pas lancer une macro à partir d'une table. est-ce autre base ?
que veuxt-tu faire ?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"julien" a écrit dans le message de
news:273e701c46369$5e884000$
Bonjour, j'aimerais savoir si il est possible d'exécuter
une macro à partir d'une autre table.
merci d'avance
Avatar
dsl, je voulai dire lancer une macro a partir d'une otre
table.
-----Message d'origine-----
Bonjour.

tu ne peux pas lancer une macro à partir d'une table. est-
ce autre base ?

que veuxt-tu faire ?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"julien" a écrit
dans le message de

news:273e701c46369$5e884000$
Bonjour, j'aimerais savoir si il est possible d'exécuter
une macro à partir d'une autre table.
merci d'avance


.



Avatar
Jessy Sempere [MVP]
Bonjour

Oui c'est la même chose...

Comme te le disais Raymond, tu ne peux pas lancer une macro
d'une table.

Tu dois pour lancer une macro, soit la lancer directement, soit la
lancer depuis un menu personnalisé, soit depuis un formulaire
ou alors depuis le code VBA.

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
a écrit dans le message news:
27f7601c46402$4e261f90$
dsl, je voulai dire lancer une macro a partir d'une otre
table.
-----Message d'origine-----
Bonjour.

tu ne peux pas lancer une macro à partir d'une table. est-
ce autre base ?

que veuxt-tu faire ?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"julien" a écrit
dans le message de

news:273e701c46369$5e884000$
Bonjour, j'aimerais savoir si il est possible d'exécuter
une macro à partir d'une autre table.
merci d'avance


.



Avatar
g VRAIMENT DU MAL, lol!
je voulai dire une otre BASE, en fait je voudrai lancer
une macro qui ce trouve dans la "BASE B" à partir
d'une "BASE A".
merci d'avance
-----Message d'origine-----
Bonjour

Oui c'est la même chose...

Comme te le disais Raymond, tu ne peux pas lancer une
macro

d'une table.

Tu dois pour lancer une macro, soit la lancer
directement, soit la

lancer depuis un menu personnalisé, soit depuis un
formulaire

ou alors depuis le code VBA.

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
a écrit dans le
message news:

27f7601c46402$4e261f90$
dsl, je voulai dire lancer une macro a partir d'une otre
table.
-----Message d'origine-----
Bonjour.

tu ne peux pas lancer une macro à partir d'une table.
est-


ce autre base ?
que veuxt-tu faire ?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"julien" a écrit
dans le message de

news:273e701c46369$5e884000$
Bonjour, j'aimerais savoir si il est possible d'exécuter
une macro à partir d'une autre table.
merci d'avance


.




.




Avatar
Jessy Sempere [MVP]
Ok...

Essais en utilisant l'automation, ça pourrait donner un truc dans ce genre :

Function MacroExterne(strDb As String, strMacro As String)
Dim acApp As Access.Application
Dim db As Database
Set acApp = CreateObject("Access.Application")
With acApp
.OpenCurrentDatabase strDb
.DoCmd.RunMacro strMacro
.Quit acQuitSaveAll
End With
Set acApp = Nothing
End Function

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
a écrit dans le message news:
27e8d01c46408$c7b83270$
g VRAIMENT DU MAL, lol!
je voulai dire une otre BASE, en fait je voudrai lancer
une macro qui ce trouve dans la "BASE B" à partir
d'une "BASE A".
merci d'avance
Avatar
Raymond [mvp]
RE à tous les deux.

Notre ami Jessy est jeune, il a de la mémoire (8Go dans sa boîte qui lui
sert de porte-cheveux) mais il ne pense jamais aux versions 2000 & +
si tu es sur 2000 & +,
Dim db As DAO.Database
et bien penser de cocher la référence Microsoft DAO 3.x Object library
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:ccgias$94c$
Ok...

Essais en utilisant l'automation, ça pourrait donner un truc dans ce genre
:


Function MacroExterne(strDb As String, strMacro As String)
Dim acApp As Access.Application
Dim db As Database
Set acApp = CreateObject("Access.Application")
With acApp
.OpenCurrentDatabase strDb
.DoCmd.RunMacro strMacro
.Quit acQuitSaveAll
End With
Set acApp = Nothing
End Function

@+
Jessy Sempere - Access MVP


Avatar
Jessy Sempere [MVP]
Ah ce Raymond...

Tu remarqueras que j'ai mis dim db as database mais qu'en fait
cette ligne n'a rien à faire là, je n'utilise pas l'objet db, c'était une
erreur de ma part... ;-)

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Raymond [mvp]" a écrit dans le message news:

RE à tous les deux.

Notre ami Jessy est jeune, il a de la mémoire (8Go dans sa boîte qui lui
sert de porte-cheveux) mais il ne pense jamais aux versions 2000 & +
si tu es sur 2000 & +,
Dim db As DAO.Database
et bien penser de cocher la référence Microsoft DAO 3.x Object library
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:ccgias$94c$
Ok...

Essais en utilisant l'automation, ça pourrait donner un truc dans ce genre
:


Function MacroExterne(strDb As String, strMacro As String)
Dim acApp As Access.Application
Dim db As Database
Set acApp = CreateObject("Access.Application")
With acApp
.OpenCurrentDatabase strDb
.DoCmd.RunMacro strMacro
.Quit acQuitSaveAll
End With
Set acApp = Nothing
End Function

@+
Jessy Sempere - Access MVP






Avatar
Raymond [mvp]
Bonjour Jessy.

Double erreur, en somme ! tu me copieras 100 fois "je ne mettrais plus de
lignes inutiles qui ne servent qu'à faire du C.A. et qui peuvent provoquer
des erreurs"
Pierre est en vacances, alors je redouble la surveillance sur tes posts, il
m'a laissé les ordres.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cciqu8$aec$
Ah ce Raymond...

Tu remarqueras que j'ai mis dim db as database mais qu'en fait
cette ligne n'a rien à faire là, je n'utilise pas l'objet db, c'était une
erreur de ma part... ;-)

@+
Jessy Sempere - Access MVP


Avatar
Jessy Sempere [MVP]
T'inquiètes pas, perso je suis en vacances dans 2 semaines et pour
pour 4 semaines donc... tu n'auras pas trop à me surveiller... :o))))

--
@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Raymond [mvp]" a écrit dans le message news:

Bonjour Jessy.

Double erreur, en somme ! tu me copieras 100 fois "je ne mettrais plus de
lignes inutiles qui ne servent qu'à faire du C.A. et qui peuvent provoquer
des erreurs"
Pierre est en vacances, alors je redouble la surveillance sur tes posts, il
m'a laissé les ordres.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le message de
news:cciqu8$aec$
Ah ce Raymond...

Tu remarqueras que j'ai mis dim db as database mais qu'en fait
cette ligne n'a rien à faire là, je n'utilise pas l'objet db, c'était une
erreur de ma part... ;-)

@+
Jessy Sempere - Access MVP






Avatar
Eric
Bonjour

Mais qui va rester alors !!!

Pierre(CFI) est déjà parti, Raymond en instance, Jessy en pré-instance.
Ouf, Pierre(3 Stone) et Anor sont encore là !!!

A+
Eric

"Jessy Sempere [MVP]" écrivait
news:ccisks$bf4$:

T'inquiètes pas, perso je suis en vacances dans 2 semaines et pour
pour 4 semaines donc... tu n'auras pas trop à me surveiller... :o))))

--
@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Raymond [mvp]" a écrit dans le message
news:
Bonjour Jessy.

Double erreur, en somme ! tu me copieras 100 fois "je ne mettrais
plus de lignes inutiles qui ne servent qu'à faire du C.A. et qui
peuvent provoquer des erreurs"
Pierre est en vacances, alors je redouble la surveillance sur tes
posts, il m'a laissé les ordres.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jessy Sempere [MVP]" a écrit dans le
message de news:cciqu8$aec$
Ah ce Raymond...

Tu remarqueras que j'ai mis dim db as database mais qu'en fait
cette ligne n'a rien à faire là, je n'utilise pas l'objet db,
c'était une erreur de ma part... ;-)

@+
Jessy Sempere - Access MVP