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
Configuration: Windows XP
Firefox 1.5.0.6

4 réponses

  1. soumia
     
    oui, cé deja fé, l' erreur sur la premiere ligne.
    0
  2. Polux31 Messages postés 7219 Statut Membre 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
  3. Polux31 Messages postés 7219 Statut Membre 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