Pbm en vba

soumia -  
 soumia -
Bonjour,j' un problém concernant la création d'une fonction en vba voila le code:
Function soumia(aff As Integer)
Dim i As Integer
Dim t() As Variant
t(1) = 0
For i = 1 To aff
t(i + 1) = t(i) + aff
Nexti
soumia(aff) = t(aff + 1)
End Function

achaque fois je reçoi un msg d'erreur :sub ou function non définie, jé presk tt essayé mé ça marche pa,s'il ya qcq ki peum'aider et merci infiniment

4 réponses

soumia
 
cad? jé pa compris?
0
soumia
 
oui, cé deja fé, l' erreur sur la premiere ligne.
0
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

As-tu essayer de passer le code pas à pas ?

Function soumia(aff As Integer) As Variant
Dim i As Integer 
Dim t() As Variant 

   t(1) = 0 
   For i = 1 To aff 
      t(i + 1) = t(i) + aff 
   Next i 

soumia = t(aff + 1) 

End Function 


;o)
-1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
As-tu testé ton code avec le débeugeur ? en mettant un point d'arrêt dans ton code (sur le cadre à gauche d'une ligne code, faire click gauche).

Sur quelle ligne le message d'erreur apparait-il ?
-1