4 réponses
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
4 sept. 2008 à 08:47
4 sept. 2008 à 08:47
Bonjour,
As-tu essayer de passer le code pas à pas ?
;o)
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)
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
4 sept. 2008 à 15:22
4 sept. 2008 à 15:22
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 ?
Sur quelle ligne le message d'erreur apparait-il ?