Bonjour,
Je suis débutant en VBA et j'ai un petit problème , Je tente de créer un objet en l'initialisant avec des méthodes que j'ai créées mais j'obtiens une erreur 424 et je ne sais pas quoi faire. Quand je fais le debug en manuelle je constate que l'erreur vient du Split que j'utilise, au moment où je prend les valeurs du tableau en retour et que je les mets dans une Collection et je ne vois pas pourquoi ça ne marche pas
Mon test
Sub testClsType()
Dim testClsType As clsType
Set testClsType = New clsType
testClsType.InitType Sheets("Options").Range("C7"), Sheets("Options").Range("D7")
Debug.Print (testClsType.nom)
End Sub
ma classe
Public nom As String
Public paramDetection As Collection
Sub InitType(cel1 As Range, cel2 As Range)
Me.nom = cel1.Value
Call creationParaùDetection(cel2)
End Sub
Sub creationParamDetection(cel2 As Range)
Dim param() As String
Dim i As Integer
param = Split(cel2.Value, ";")
For i = 0 To UBound(param)
Me.paramDetection.Add (param(i))
Next
End Sub
Merci beaucoup d'avance pour votre aide
PS: Si vous avez des remarques sur le code n’hésitez pas, je cherche à m’améliorer
le fichier (mais il n'y en a pas plus que dans le code présenté ):