erreur d'éxécution de type '13'

[yaka]

Bonjour et bonne année cher forum,

J'ai construit un fichier qui comporte un onglet 'tarifs'.

Quand on quitte cette onglet la macro suivante s'éxécute :



Private Sub Worksheet_Deactivate()


Application.EnableEvents = False


For i = 13 To Range("s65000").End(xlUp).Row
Range("O" & i).Value = Range("l" & i).Value * (1 + Range("N" & i).Value)
Range("S" & i).Value = Range("L" & i).Value * Range("Q" & i).Value
Range("T" & i).Value = Range("L" & i).Value * (1 + Range("M" & i).Value) * Range("Q" & i).Value
Range("U" & i).Value = Range("O" & i).Value * Range("Q" & i).Value
Next i

Application.EnableEvents = True

End Sub




J'ai dupliqué ce fichier, qui fonctionnait parfaitement sur mon post, pour x utilisateurs.

Maintenant ces utilisateur me retournent chacun leur fichier.

Et, oh surprise sur leur fichier, lorsque cette macro s'éxécute à présent le message d'erreur suivant apparait
Erreur d'éxécution '13'
Incomptatibilité de type

et la macro s'arrête

Pouvez-vous m'éclairer sur mon erreur?

Merci

 

[Bebere]

Re : erreur d'éxécution de type '13'

bonsoir yaka

je me pose une question
tu prends Range("S65000") et c'est une colonne résultat,prend une autre colonne

Private Sub Worksheet_Deactivate()

With Application
.ScreenUpdating = False
.Calculation = xlCalculationManual
End With


For i = 13 To Range("L65000").End(xlUp).Row
Range("O" & i).Value = Range("L" & i).Value * (1 + Range("N" & i).Value)
Range("S" & i).Value = Range("L" & i).Value * Range("Q" & i).Value
Range("T" & i).Value = Range("L" & i).Value * (1 + Range("M" & i).Value) * Range("Q" & i).Value
Range("U" & i).Value = Range("O" & i).Value * Range("Q" & i).Value
Next i

With Application
.ScreenUpdating = True
.Calculation = xlCalculationAutomatic
End With

End Sub

 

[Hervé]

Re : erreur d'éxécution de type '13'

bonsoir

normalement les erreurs 13 sont dus à des erreurs de typage de variable.

une variable déclaré en integer et recevant de l'alpha génère une erreur 13.

vérifie si dans ton projet la variable i est bien déclaré en byte, integer ou long.

salut