OVH Cloud OVH Cloud

créer dynamiquement des zones de textes

17 réponses
Avatar
guillaume
Bonjour

je voudrais savoir s'il est possible, =E0 partir de=20
fonctions ou proc=E9dures VB, de rajouter des zones de=20
textes dans un formulaire? Et si oui, comment ?

Merci

10 réponses

1 2
Avatar
Jessy Sempere [MVP]
Bonjour

Regardes l'aide sur CreateControl()

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"guillaume" a écrit dans le message news:
2668e01c46282$19db4ed0$
Bonjour

je voudrais savoir s'il est possible, à partir de
fonctions ou procédures VB, de rajouter des zones de
textes dans un formulaire? Et si oui, comment ?

Merci
Avatar
guillaume
J'ai regardé, mais apparemment, on ne peut le faire qu'en
mode création (c'est ce que me dit un message d'erreur
lors de l'exécution)

-----Message d'origine-----
Bonjour

Regardes l'aide sur CreateControl()

@+
Jessy Sempere - Access MVP

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

2668e01c46282$19db4ed0$
Bonjour

je voudrais savoir s'il est possible, à partir de
fonctions ou procédures VB, de rajouter des zones de
textes dans un formulaire? Et si oui, comment ?

Merci


.



Avatar
Jessy Sempere [MVP]
Oui c'est bien ça...

Rien ne t'empêche de l'ouvrir en modification, de créer ton contrôle
puis de le ré-ouvrir en mode normal...

PS : Si tu veux que l'utilisateur ne s'en rende pas compte, tu peux
utiliser DoCmd.Echo

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"guillaume" a écrit dans le message news:
25eb801c46285$74a1a6e0$
J'ai regardé, mais apparemment, on ne peut le faire qu'en
mode création (c'est ce que me dit un message d'erreur
lors de l'exécution)

-----Message d'origine-----
Bonjour

Regardes l'aide sur CreateControl()

@+
Jessy Sempere - Access MVP

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

2668e01c46282$19db4ed0$
Bonjour

je voudrais savoir s'il est possible, à partir de
fonctions ou procédures VB, de rajouter des zones de
textes dans un formulaire? Et si oui, comment ?

Merci


.



Avatar
guillaume
humm...
ok, mais tout ça, je dois l'écrire en vb...est-ce que tu
sais par hasard quelle instruction permet de passer un
formulaire en mode création, puis de le remettre en mode
normal ?

-----Message d'origine-----
Oui c'est bien ça...

Rien ne t'empêche de l'ouvrir en modification, de créer
ton contrôle

puis de le ré-ouvrir en mode normal...

PS : Si tu veux que l'utilisateur ne s'en rende pas
compte, tu peux

utiliser DoCmd.Echo

@+
Jessy Sempere - Access MVP

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

25eb801c46285$74a1a6e0$
J'ai regardé, mais apparemment, on ne peut le faire qu'en
mode création (c'est ce que me dit un message d'erreur
lors de l'exécution)

-----Message d'origine-----
Bonjour

Regardes l'aide sur CreateControl()

@+
Jessy Sempere - Access MVP

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

2668e01c46282$19db4ed0$
Bonjour

je voudrais savoir s'il est possible, à partir de
fonctions ou procédures VB, de rajouter des zones de
textes dans un formulaire? Et si oui, comment ?

Merci


.




.




Avatar
Jessy Sempere [MVP]
Ben :

Docmd.openform "tonFormulaire", acDesign
Createcontrol ...
docmd.openform "tonformulaire", acNormal

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"guillaume" a écrit dans le message news:
266dc01c46288$df4a2870$
humm...
ok, mais tout ça, je dois l'écrire en vb...est-ce que tu
sais par hasard quelle instruction permet de passer un
formulaire en mode création, puis de le remettre en mode
normal ?

-----Message d'origine-----
Oui c'est bien ça...

Rien ne t'empêche de l'ouvrir en modification, de créer
ton contrôle

puis de le ré-ouvrir en mode normal...

PS : Si tu veux que l'utilisateur ne s'en rende pas
compte, tu peux

utiliser DoCmd.Echo

@+
Jessy Sempere - Access MVP

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

25eb801c46285$74a1a6e0$
J'ai regardé, mais apparemment, on ne peut le faire qu'en
mode création (c'est ce que me dit un message d'erreur
lors de l'exécution)

-----Message d'origine-----
Bonjour

Regardes l'aide sur CreateControl()

@+
Jessy Sempere - Access MVP

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

2668e01c46282$19db4ed0$
Bonjour

je voudrais savoir s'il est possible, à partir de
fonctions ou procédures VB, de rajouter des zones de
textes dans un formulaire? Et si oui, comment ?

Merci


.




.




Avatar
Guillaume
ok, c'est bon, j'ai trouvé dans l'aide...
docmd.openform "nom du form",acDesign

...
merci !
Avatar
Guillaume
Humm...cela ne fonctionne pas. voici le code que j'ai mis :

DoCmd.OpenForm "planning", acDesign
Dim ctlTexte As Control

Set ctlTexte = CreateControl("planning", acTextBox)

A l'exécution, il passe bien en mode création (je verrai à
masquer cela plus tard, merci pour l'astuce!), mais un
message d'erreur apparaît alors :

Erreur d'exécution '29054':
Microsoft Access ne peut pas ajouter, renommer ou
supprimer le(s) contrôle(s) sélectionné(s).

je me suis pourtant inspiré d'un exemple donnée dans
l'aide de VB (pour le set ctlTexte =...)





-----Message d'origine-----
Ben :

Docmd.openform "tonFormulaire", acDesign
Createcontrol ...
docmd.openform "tonformulaire", acNormal

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------


Avatar
Jessy Sempere [MVP]
Petite précision :

Tu ne pourras pas je crois lancer ce code depuis le formulaire où
tu souhaites ajouter le contrôle, il faut le lancer d'autre part...

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Guillaume" a écrit dans le message news:
25f3001c4628c$34fc25e0$
Humm...cela ne fonctionne pas. voici le code que j'ai mis :

DoCmd.OpenForm "planning", acDesign
Dim ctlTexte As Control

Set ctlTexte = CreateControl("planning", acTextBox)

A l'exécution, il passe bien en mode création (je verrai à
masquer cela plus tard, merci pour l'astuce!), mais un
message d'erreur apparaît alors :

Erreur d'exécution '29054':
Microsoft Access ne peut pas ajouter, renommer ou
supprimer le(s) contrôle(s) sélectionné(s).

je me suis pourtant inspiré d'un exemple donnée dans
l'aide de VB (pour le set ctlTexte =...)





-----Message d'origine-----
Ben :

Docmd.openform "tonFormulaire", acDesign
Createcontrol ...
docmd.openform "tonformulaire", acNormal

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------


Avatar
Raymond [mvp]
Bonjour.

tu peux utiliser acHidden pour le cacher
Dim ctltext As Control
DoCmd.OpenForm "planning", acDesign, , , , acHidden
Set ctltext = CreateControl("planning", acTextBox)
DoCmd.OpenForm "planning"
DoCmd.Close acForm, "planning", acSaveYes ' acSaveNo
si tu dois conserver les contrôles ou non
si le minimum ci-dessus ne fonctionne pas, il y a autre chose.
--
@+
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


"Guillaume" a écrit dans le message de
news:25f3001c4628c$34fc25e0$
Humm...cela ne fonctionne pas. voici le code que j'ai mis :

DoCmd.OpenForm "planning", acDesign
Dim ctlTexte As Control

Set ctlTexte = CreateControl("planning", acTextBox)

A l'exécution, il passe bien en mode création (je verrai à
masquer cela plus tard, merci pour l'astuce!), mais un
message d'erreur apparaît alors :

Erreur d'exécution '29054':
Microsoft Access ne peut pas ajouter, renommer ou
supprimer le(s) contrôle(s) sélectionné(s).

je me suis pourtant inspiré d'un exemple donnée dans
l'aide de VB (pour le set ctlTexte =...)
Avatar
Raymond [mvp]
S'il le lance depuis le formulaire lui-même, il ne pourra même pas ouvrir le
formulaire. dans l'événement Form_load, on peut lancer une fonction dans un
module qui fermera le formulaire et le réouvrira en design, créera les
contrôles, l'ouvrira en normal.

--
@+
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:ccbiff$v84$
Petite précision :

Tu ne pourras pas je crois lancer ce code depuis le formulaire où
tu souhaites ajouter le contrôle, il faut le lancer d'autre part...

@+
Jessy Sempere - Access MVP


1 2