Tableau Excel 2007

Bonjour à tous,

Observation : feuille "Tarifs" > range("B3:D" & dlig) > si une cellule contient du texte ( exemple : "N/A" ) > l'erreur 13 peut survenir ...

En attendant de trouver mieux :

1 - s'assurer qu'il n'y aura pas de texte dans le range("B3:D" & dlig) > zéro ou vide > c'est bon ...

ou

2- ajouter une exception dans le code ...

exemple :

module "Paritec" > macro "Traiter" ...

'...
'...
Set cel = Feuil2.Columns(1).Find(aa(i, 1), , , xlWhole)
If Not cel Is Nothing Then li = cel.Row
bb(n, 3) = aa(i, 1): bb(n, 6) = aa(i, 2): bb(n, 8) = aa(i, 3)
 aa(i, 9) = nom: bb(n, 10) = aa(i, 9): bb(n, 12) = aa(i, 10)

 ''  début modif > ric
  If IsNumeric(Feuil2.Cells(li, 4) - aa(i, 10)) Then
     dd(n, 1) = Feuil2.Cells(li, 4) - aa(i, 10)
    End If
    ''  fin modif > ric

     n = n + 1
        GoTo 1
'...
'...

ric

merci beaucoup de ton conseil, très apprécié, mais come je ne suis pas un expert comme plusieurs d'entre vous et bien tes renseignements mon un peu perdu.

MAIS, tu m'as allumé quand même une lumière, j'ai vérifié mon tableau et j'ai trouvé ce qui ne clochait pas. J'ai par mégarde placer un nom avec une case ou il y avait N/A, c'est ça qui causais l'erreur 13.

J'ai changer le nom et je l'ai mis à la bonne place et pouf plus d'erreur 13 et tout fonctionne à merveille.

dans l'espoir que c'était vraiment juste ça qui causais l'erreur

Merci encore

Bonjour,

Tu as choisi l'option 1 > excellent ...

ric