OVH Cloud OVH Cloud

UserForm création

6 réponses
Avatar
Michel41
Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par l'éditeur VBA
(création dynamique) ?
Merci
@+
M41

6 réponses

Avatar
Clément Marcotte
Bonjour,

Pas vérifié, mais j'ai comme la vague impression que c'est userforms.add


"Michel41" a écrit dans le message de news:
444a5ad6$0$6661$
Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par l'éditeur
VBA (création dynamique) ?
Merci
@+
M41



Avatar
Michel41
Bonjour
J'ai tout essayé avant mon 1er message mais ça ne marche pas

Dim MonUserForm As UserForm
Debug.Print UserForms.Count
Set MonUserForm = VBA.UserForms.Add(W)
Debug.Print UserForms.Count

qqsoit le contenu W

Autres idées ? Merci @+
M41



"Clément Marcotte" a écrit dans le message
de news:
Bonjour,

Pas vérifié, mais j'ai comme la vague impression que c'est userforms.add


"Michel41" a écrit dans le message de news:
444a5ad6$0$6661$
Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par l'éditeur
VBA (création dynamique) ?
Merci
@+
M41







Avatar
Frederic
Bonjour,
j'ai posté à ce sujet le 11/03/2006 sous création dynamique de form.
Je pense que cela peut t'aider.
L'aide de Michdenis m'a permis de résoudre mon probleme.
Salutations.


Bonjour
J'ai tout essayé avant mon 1er message mais ça ne marche pas

Dim MonUserForm As UserForm
Debug.Print UserForms.Count
Set MonUserForm = VBA.UserForms.Add(W)
Debug.Print UserForms.Count

qqsoit le contenu W

Autres idées ? Merci @+
M41



"Clément Marcotte" a écrit dans le message
de news:
Bonjour,

Pas vérifié, mais j'ai comme la vague impression que c'est userforms.add


"Michel41" a écrit dans le message de news:
444a5ad6$0$6661$
Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par l'éditeur
VBA (création dynamique) ?
Merci
@+
M41












Avatar
Michel41
Merci

Le problème est que le 11/3/06 n'est plus affiché sur mon système ?
Ou puis-je obtenir une copie
Merci

@+
M41



"Frederic" a écrit dans le message de
news:
Bonjour,
j'ai posté à ce sujet le 11/03/2006 sous création dynamique de form.
Je pense que cela peut t'aider.
L'aide de Michdenis m'a permis de résoudre mon probleme.
Salutations.


Bonjour
J'ai tout essayé avant mon 1er message mais ça ne marche pas

Dim MonUserForm As UserForm
Debug.Print UserForms.Count
Set MonUserForm = VBA.UserForms.Add(W)
Debug.Print UserForms.Count

qqsoit le contenu W

Autres idées ? Merci @+
M41



"Clément Marcotte" a écrit dans le
message
de news:
Bonjour,

Pas vérifié, mais j'ai comme la vague impression que c'est
userforms.add


"Michel41" a écrit dans le message de
news:
444a5ad6$0$6661$
Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par
l'éditeur
VBA (création dynamique) ?
Merci
@+
M41














Avatar
Ange Ounis
L'instruction à utiliser est de cette forme :

Set Usf = ThisWorkbook.VBProject.VBComponents.Add(3)

Un exemple de création de userform par vba :

http://frederic.sigonneau.free.fr/code/Objets/CreeUserFormAvecBouton.txt

----------
Ange Ounis
----------

Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par l'éditeur VBA
(création dynamique) ?
Merci
@+
M41




Avatar
Clément Marcotte
Bonjour,

Tu peux aller fouiller dans les archives à partir de Google

http://groops.google.com/advanced_search


"Michel41" a écrit dans le message de news:
444b3574$0$21305$
Merci

Le problème est que le 11/3/06 n'est plus affiché sur mon système ?
Ou puis-je obtenir une copie
Merci

@+
M41



"Frederic" a écrit dans le message de
news:
Bonjour,
j'ai posté à ce sujet le 11/03/2006 sous création dynamique de form.
Je pense que cela peut t'aider.
L'aide de Michdenis m'a permis de résoudre mon probleme.
Salutations.


Bonjour
J'ai tout essayé avant mon 1er message mais ça ne marche pas

Dim MonUserForm As UserForm
Debug.Print UserForms.Count
Set MonUserForm = VBA.UserForms.Add(W)
Debug.Print UserForms.Count

qqsoit le contenu W

Autres idées ? Merci @+
M41



"Clément Marcotte" a écrit dans le
message
de news:
Bonjour,

Pas vérifié, mais j'ai comme la vague impression que c'est
userforms.add


"Michel41" a écrit dans le message de
news:
444a5ad6$0$6661$
Bonjour
Comment ajouter un élément UserForm à la collection
UserForms (incrémentant .count) en passant par VBA et pas par
l'éditeur
VBA (création dynamique) ?
Merci
@+
M41