Problème avex l'utilisation des types

1 pièce(s) jointe(s)

Bonjour,

J'ai un programme basé sur des types
jusqu'ici tout va bien ça tourne comme une horloge

Récemment j'ai voulu améliorer le programme en appelant un type créé comme variable d'entrée d'une sub et là j'ai un message du type

Pièce jointe 594973

en gros j'ai un type

Citation:

Public Type Blabla
machin as pouic
truc as pouicpouic
bidule as pouitch
End Type

Par ailleurs j'ai déclaré

Citation:

Public Patati as Blabla

donc j'utilise tout au long de mon programme Patati tout va bien

maintenant j'aimerais créer

Citation:

Public Patata as Blabla

et ensuite utiliser

Citation:

Call Fairequelquechose(Patata)
Call Fairequelquechose(Patati)

est ce que c'est à ce moment qu'on doit utiliser des modules de classes ?
Eventuellement je pourrai créer un métatype

Citation:

Public Type Parlote
Patati as Blabla
Patata as Blabla
End Type

est ce que cette deuxième méthode pourrait permettre d'appeler mes types dans une fonction en tant qu'argument ?

merci pour votre aide,
Gorzyne

Salut,

effectivement, tu est sur la bonne piste !

Un peu de lecture
https://fauconnier.developpez.com/ar...neral/classes/

EDIT: j'ai trouvé le problème il fallait que je définisse le type dans la fonction

Citation:

Sub Fairequelquechose(Patata as Blabla)

au lieu de

Citation:

Sub Fairequelquechose(Patata)

Après il y a sans doute des choses plus élégantes à faire