Je cherche =E0 supprimer un formulaire par le code.
Mais la question serait trop simple si ce n'=E9tait la=20
suppression d'un formulaire d'une base =E0 partir du code=20
d'une autre base.
Pour ce qui est des Tables et requ=EAtes c'est OK avec=20
l'instruction dbs.QueryDefs.Delete ("toto") ou
dbs.TableDefs.Delete ("toto") mais pour les forms ??
Sachant que "docmd.DeleteObject acForm, "toto" " ne=20
fonctionne que dans la base en cour.
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
Bruno MAZÉPA
Bonjour Fred87 Pourquoi vouloir supprimer un formulaire d'une autre base !? -- Cordialement.
"Fred87" a écrit dans le message de news:090b01c3d694$85c5ea30$ Bonjour à tous,
Je cherche à supprimer un formulaire par le code. Mais la question serait trop simple si ce n'était la suppression d'un formulaire d'une base à partir du code d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec l'instruction dbs.QueryDefs.Delete ("toto") ou dbs.TableDefs.Delete ("toto") mais pour les forms ?? Sachant que "docmd.DeleteObject acForm, "toto" " ne fonctionne que dans la base en cour.
Merci de de votre aide.
Fred
Bonjour Fred87
Pourquoi vouloir supprimer un formulaire d'une autre base !?
--
Cordialement.
"Fred87" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:090b01c3d694$85c5ea30$a401280a@phx.gbl...
Bonjour à tous,
Je cherche à supprimer un formulaire par le code.
Mais la question serait trop simple si ce n'était la
suppression d'un formulaire d'une base à partir du code
d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec
l'instruction dbs.QueryDefs.Delete ("toto") ou
dbs.TableDefs.Delete ("toto") mais pour les forms ??
Sachant que "docmd.DeleteObject acForm, "toto" " ne
fonctionne que dans la base en cour.
Bonjour Fred87 Pourquoi vouloir supprimer un formulaire d'une autre base !? -- Cordialement.
"Fred87" a écrit dans le message de news:090b01c3d694$85c5ea30$ Bonjour à tous,
Je cherche à supprimer un formulaire par le code. Mais la question serait trop simple si ce n'était la suppression d'un formulaire d'une base à partir du code d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec l'instruction dbs.QueryDefs.Delete ("toto") ou dbs.TableDefs.Delete ("toto") mais pour les forms ?? Sachant que "docmd.DeleteObject acForm, "toto" " ne fonctionne que dans la base en cour.
Merci de de votre aide.
Fred
Raymond [mvp]
Bonjour.
Essaie comme ceci:
Dim App As Access.Application Set App = New Access.Application App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
tu rajoutes un test ou deux pour les erreurs éventuelles. ça devrait marcher pour tous les objets.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Fred87" a écrit dans le message de news:090b01c3d694$85c5ea30$ Bonjour à tous,
Je cherche à supprimer un formulaire par le code. Mais la question serait trop simple si ce n'était la suppression d'un formulaire d'une base à partir du code d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec l'instruction dbs.QueryDefs.Delete ("toto") ou dbs.TableDefs.Delete ("toto") mais pour les forms ?? Sachant que "docmd.DeleteObject acForm, "toto" " ne fonctionne que dans la base en cour.
Merci de de votre aide.
Fred
Bonjour.
Essaie comme ceci:
Dim App As Access.Application
Set App = New Access.Application
App.OpenCurrentDatabase ("essais1.mdb")
App.DoCmd.DeleteObject acForm, "formulaire1"
App.CloseCurrentDatabase
Set App = Nothing
tu rajoutes un test ou deux pour les erreurs éventuelles.
ça devrait marcher pour tous les objets.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Fred87" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:090b01c3d694$85c5ea30$a401280a@phx.gbl...
Bonjour à tous,
Je cherche à supprimer un formulaire par le code.
Mais la question serait trop simple si ce n'était la
suppression d'un formulaire d'une base à partir du code
d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec
l'instruction dbs.QueryDefs.Delete ("toto") ou
dbs.TableDefs.Delete ("toto") mais pour les forms ??
Sachant que "docmd.DeleteObject acForm, "toto" " ne
fonctionne que dans la base en cour.
Dim App As Access.Application Set App = New Access.Application App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
tu rajoutes un test ou deux pour les erreurs éventuelles. ça devrait marcher pour tous les objets.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Fred87" a écrit dans le message de news:090b01c3d694$85c5ea30$ Bonjour à tous,
Je cherche à supprimer un formulaire par le code. Mais la question serait trop simple si ce n'était la suppression d'un formulaire d'une base à partir du code d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec l'instruction dbs.QueryDefs.Delete ("toto") ou dbs.TableDefs.Delete ("toto") mais pour les forms ?? Sachant que "docmd.DeleteObject acForm, "toto" " ne fonctionne que dans la base en cour.
Merci de de votre aide.
Fred
FRED87
Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là . Point de vue esthétique est - il possible de ne pas rendre visible l'ouverture de la base dans laquelle je supprime les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour d'une base (qui à une taille trop importante pour être diffusée par messagerie). J'envoi une base qui fait les modifs et le tour est jouer.
A plus
-----Message d'origine----- Bonjour.
Essaie comme ceci:
Dim App As Access.Application Set App = New Access.Application App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
tu rajoutes un test ou deux pour les erreurs éventuelles. ça devrait marcher pour tous les objets.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Fred87" a écrit dans le message de
news:090b01c3d694$85c5ea30$ Bonjour à tous,
Je cherche à supprimer un formulaire par le code. Mais la question serait trop simple si ce n'était la suppression d'un formulaire d'une base à partir du code d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec l'instruction dbs.QueryDefs.Delete ("toto") ou dbs.TableDefs.Delete ("toto") mais pour les forms ?? Sachant que "docmd.DeleteObject acForm, "toto" " ne fonctionne que dans la base en cour.
Merci de de votre aide.
Fred
.
Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là .
Point de vue esthétique est - il possible de ne pas rendre
visible l'ouverture de la base dans laquelle je supprime
les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour
d'une base (qui à une taille trop importante pour être
diffusée par messagerie). J'envoi une base qui fait les
modifs et le tour est jouer.
A plus
-----Message d'origine-----
Bonjour.
Essaie comme ceci:
Dim App As Access.Application
Set App = New Access.Application
App.OpenCurrentDatabase ("essais1.mdb")
App.DoCmd.DeleteObject acForm, "formulaire1"
App.CloseCurrentDatabase
Set App = Nothing
tu rajoutes un test ou deux pour les erreurs éventuelles.
ça devrait marcher pour tous les objets.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Fred87" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:090b01c3d694$85c5ea30$a401280a@phx.gbl...
Bonjour à tous,
Je cherche à supprimer un formulaire par le code.
Mais la question serait trop simple si ce n'était la
suppression d'un formulaire d'une base à partir du code
d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec
l'instruction dbs.QueryDefs.Delete ("toto") ou
dbs.TableDefs.Delete ("toto") mais pour les forms ??
Sachant que "docmd.DeleteObject acForm, "toto" " ne
fonctionne que dans la base en cour.
Je n'y avais pas pensé par ce biais là . Point de vue esthétique est - il possible de ne pas rendre visible l'ouverture de la base dans laquelle je supprime les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour d'une base (qui à une taille trop importante pour être diffusée par messagerie). J'envoi une base qui fait les modifs et le tour est jouer.
A plus
-----Message d'origine----- Bonjour.
Essaie comme ceci:
Dim App As Access.Application Set App = New Access.Application App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
tu rajoutes un test ou deux pour les erreurs éventuelles. ça devrait marcher pour tous les objets.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Fred87" a écrit dans le message de
news:090b01c3d694$85c5ea30$ Bonjour à tous,
Je cherche à supprimer un formulaire par le code. Mais la question serait trop simple si ce n'était la suppression d'un formulaire d'une base à partir du code d'une autre base.
Pour ce qui est des Tables et requêtes c'est OK avec l'instruction dbs.QueryDefs.Delete ("toto") ou dbs.TableDefs.Delete ("toto") mais pour les forms ?? Sachant que "docmd.DeleteObject acForm, "toto" " ne fonctionne que dans la base en cour.
Merci de de votre aide.
Fred
.
Raymond [mvp]
je n'ai pas testé mais par défaut c'est invisible, je crois. sinon tu rajoutes: Dim App As Access.Application Set App = New Access.Application App.Visible = False '******************** App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FRED87" a écrit dans le message de news:032301c3d69b$94cf14a0$ Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là . Point de vue esthétique est - il possible de ne pas rendre visible l'ouverture de la base dans laquelle je supprime les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour d'une base (qui à une taille trop importante pour être diffusée par messagerie). J'envoi une base qui fait les modifs et le tour est jouer.
A plus
je n'ai pas testé mais par défaut c'est invisible, je crois. sinon tu
rajoutes:
Dim App As Access.Application
Set App = New Access.Application
App.Visible = False '********************
App.OpenCurrentDatabase ("essais1.mdb")
App.DoCmd.DeleteObject acForm, "formulaire1"
App.CloseCurrentDatabase
Set App = Nothing
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"FRED87" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:032301c3d69b$94cf14a0$a001280a@phx.gbl...
Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là .
Point de vue esthétique est - il possible de ne pas rendre
visible l'ouverture de la base dans laquelle je supprime
les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour
d'une base (qui à une taille trop importante pour être
diffusée par messagerie). J'envoi une base qui fait les
modifs et le tour est jouer.
je n'ai pas testé mais par défaut c'est invisible, je crois. sinon tu rajoutes: Dim App As Access.Application Set App = New Access.Application App.Visible = False '******************** App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FRED87" a écrit dans le message de news:032301c3d69b$94cf14a0$ Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là . Point de vue esthétique est - il possible de ne pas rendre visible l'ouverture de la base dans laquelle je supprime les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour d'une base (qui à une taille trop importante pour être diffusée par messagerie). J'envoi une base qui fait les modifs et le tour est jouer.
A plus
Ok super...
Merci Raymond.
-----Message d'origine----- je n'ai pas testé mais par défaut c'est invisible, je crois. sinon tu
rajoutes: Dim App As Access.Application Set App = New Access.Application App.Visible = False '******************** App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FRED87" a écrit dans le message de
news:032301c3d69b$94cf14a0$ Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là . Point de vue esthétique est - il possible de ne pas rendre visible l'ouverture de la base dans laquelle je supprime les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour d'une base (qui à une taille trop importante pour être diffusée par messagerie). J'envoi une base qui fait les modifs et le tour est jouer.
A plus
.
Ok super...
Merci Raymond.
-----Message d'origine-----
je n'ai pas testé mais par défaut c'est invisible, je
crois. sinon tu
rajoutes:
Dim App As Access.Application
Set App = New Access.Application
App.Visible = False '********************
App.OpenCurrentDatabase ("essais1.mdb")
App.DoCmd.DeleteObject acForm, "formulaire1"
App.CloseCurrentDatabase
Set App = Nothing
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"FRED87" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:032301c3d69b$94cf14a0$a001280a@phx.gbl...
Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là .
Point de vue esthétique est - il possible de ne pas rendre
visible l'ouverture de la base dans laquelle je supprime
les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour
d'une base (qui à une taille trop importante pour être
diffusée par messagerie). J'envoi une base qui fait les
modifs et le tour est jouer.
-----Message d'origine----- je n'ai pas testé mais par défaut c'est invisible, je crois. sinon tu
rajoutes: Dim App As Access.Application Set App = New Access.Application App.Visible = False '******************** App.OpenCurrentDatabase ("essais1.mdb") App.DoCmd.DeleteObject acForm, "formulaire1" App.CloseCurrentDatabase Set App = Nothing
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FRED87" a écrit dans le message de
news:032301c3d69b$94cf14a0$ Merci Raymond pour ton aide
Je n'y avais pas pensé par ce biais là . Point de vue esthétique est - il possible de ne pas rendre visible l'ouverture de la base dans laquelle je supprime les éléments ?
En tous cas re-merci.
Pour les currieux cela me sert à faire la mise à jour d'une base (qui à une taille trop importante pour être diffusée par messagerie). J'envoi une base qui fait les modifs et le tour est jouer.
