Bonjour,
J'ai un petit souci que je comprend pas pour le moment.
J'ai une structure qui est déclarer dans un module.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Type EqStatusType NbAlarmNoneUrgent As Long NbAlarmUrgent As Long NbInformativeAlarm As Long ValideStatus As Boolean End Type
Ensuite je cherche à utiliser dans une classe de ce type:
Lors de l'excecution il me plante à la compilation sur Property Get Status() As EqStatusType.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 private m_Status as EqStatusType Property Get Status() As EqStatusType Set Status = m_Status End Property Property Let Status(ByVal valeur As EqStatusType) Set m_Status = valeur End Property
Il me dit:
Only public user defined types defined in public object modules can be use as parameters or return types for public procedures of class modules or as fields of public user defined types.
Lorsque je code il me trouve bien EqStatusType, mais si je lui demande de me trouver la définition il ne la trouve pas.
merci de votre aide
Partager