Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond
Bonsoir.
Tu peux le faire par automatisation:
Dim App As Access.Application Set App = GetObject("c:bd1.mdb", "Access.Application") With App .Visible = False .DoCmd.DeleteObject acForm, "formulaire1" .Quit End With Set App = Nothing
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Pascal PAUGOY" a écrit dans le message de news:3f81ba01$0$24669$
Comment supprimer des etat/formulaires se trouvant dans une autre application Access (en vba) D'avance Merci
Bonsoir.
Tu peux le faire par automatisation:
Dim App As Access.Application
Set App = GetObject("c:bd1.mdb", "Access.Application")
With App
.Visible = False
.DoCmd.DeleteObject acForm, "formulaire1"
.Quit
End With
Set App = Nothing
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Pascal PAUGOY" <p_paugoy@club-internet.fr> a écrit dans le message de
news:3f81ba01$0$24669$7a628cd7@news.club-internet.fr...
Comment supprimer des etat/formulaires se trouvant dans une autre
application Access (en vba)
D'avance Merci
Dim App As Access.Application Set App = GetObject("c:bd1.mdb", "Access.Application") With App .Visible = False .DoCmd.DeleteObject acForm, "formulaire1" .Quit End With Set App = Nothing
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Pascal PAUGOY" a écrit dans le message de news:3f81ba01$0$24669$
Comment supprimer des etat/formulaires se trouvant dans une autre application Access (en vba) D'avance Merci