UserForm héritage ?

[Pepitoww]

Bonjour,
Je possède 2 UserForms et j'aurai voulu savoir si on ne pouvait pas faire hériter L'userform 2 d'au moins une variable spécifique au premier Userform ?

Ex: j'ai un formulaire sur l'userform1 (label + textbox)
j'ai un formulaire identique sur l'userform 2 (label + label)

Or pour initialisé l'userform1, j'utilise un certain code et j'aurai voulu récupérer le contenu juste d'une variable du premier UserForm et l'affecter au second pour ne pas ré-écrire tout le code...

Merci

 

[camarchepas]

Re : UserForm héritage ?

Bonjour,

Cela doit être faisable, il faut mettre ton code commun dans un module standart avec un éventuel passage de paramètres ( si nécessaire ). ce serait plus facile de te faire voir si tu donnais un fichier exemple.

 

[Pepitoww]

Re : UserForm héritage ?

D'accord, je poserais le code ce soir.
Mais ne peut-on pas passer par des variables de type Public où les deux Userforms pourraient accéder ? (dans un module)

 

[camarchepas]

Re : UserForm héritage ?

PEpitoww,

Oui , tu parlais de code commun, ou j'ai mal compris peut être,

Pour les variables oui, en les déclarant public dans un module standart , ça fonctionne aussi

 

[Pepitoww]

Re : UserForm héritage ?

Enfaite je me suis mal exprimé (peut être trop vite aussi...), dans mon cas, le code commun serait parfait.
Pour les variables en Public, n'y-a-t-il pas quelques choses d'autres à déclarer ? J'avais entendu parler de "Option Explicit", sa n'a peut-être rien à voir...

 

[Pierrot93]

Re : UserForm héritage ?

Bonjour Pepito, camarchepas

pour déclarer une variable "public", en premières lignes d'un module standard :

Option Explicit
Public mavariable As String

pour initialiser ta variable, dans le module de l'usf1 :

mavariable = Label1.Caption

pour utiliser ta variable, dans le module de l'usf2 :

label2.Caption = mavariable

A noter "Option Explicit" oblige la déclaration de toutes les variables dans le module où il est placé...

bonne soirée
@+

 

[Habitude]

Re : UserForm héritage ?

Déclare toi une fonction qui retourne ta variable dans ton userform1

Function GetVariable() as string
GetVariable= maVariable
End function


Dans ton userform2 tu écris

variable= userform1.GetVariable


Sinon tu peux déclarer un nouvel objet de ta USF que tu peux affecter public.
Tres utile pour afficher 2 fois la même usf. Sans jamais prendre ton original.
New est en fait un construteur de copie

Voir exemple fichier joint

 

[Pierrot93]

Re : UserForm héritage ?

Re,
bravo Habitude, bien vu pour la déclaration de nouveaux objets, à retenir....