Bonjour à tous.
Je fais actuellement de la maintenance applicative et je suis troublé par ce que je découvre :
Des méthodes publiques Property Get, Let et Set sont définit en dehors des modules de classe.
Exemples :ou
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Public Property Set MyNames(ByRef name As String, ByVal cells As Range) On Error Resume Next Call MyName(name).Delete Call ThisWorkbook.Names.Add(name, cells) End Propertyou
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Public Property Get MyName(ByRef name As String) As name Set MyName = Nothing On Error Resume Next Set MyName = ThisWorkbook.Names(name) End Property
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Public Property Let MaVersion(ByRef value As String) MyValues("_MaVersion") = value End Property
- Est-ce du "code Sale" ou est-ce que cela a un rôle particulier ?
- Ne peut-on pas tout simplement remplacer ces propriétés par de fonction ou des procédures ?
Merci de votre attention.
Partager