Probleme de code VBA

bonjour

j'ai réalisé une macro avec excel 2003, la derniere colonne de mon TABLEAU sur excel coef saisonnier ne fonctionne pas lorsque je clique sur mon bouton calculer et m'indique un bug voir message d’erreur sur la ligne suivante :

Cells(i, 6).Value = Cells(i, 2).Value / Cells(i, 5).Value

merci pour votre aide

Bien cordialement

BROSON

Bonjour,

Logique puisqu'à ce moment là cell(i,5) est nulle et diviser par 0 est impossible

Dans ce cas il te faut faire une gestion d'erreur pour qu'en cas de valeur 0, le code fasse quelque chose

Exemple :

If Err <> 0 Then
Cells(i, 6).Value = Cells(i, 2).Value / Cells(i, 5).Value
End If

C'est juste un exemple qui dans ton code évitera l'erreur et passera à l'instruction suivante

le tout est de voir ce que tu veux si une telle erreur se présente

Amicalement

Bonjour

Bonjour Dan

A la place de la gestion des erreurs on peut tester la valeur

If Cells(i, 5).Value <> 0 Then
  Cells(i, 6).Value = Cells(i, 2).Value / Cells(i, 5).Value
Else
  MsgBox "La valeur de " & Cells(i, 5).Address & " est égale à 0"
End If