Error 13 type mismatch on Excel
kevin
-
jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention -
jordane45 Messages postés 30427 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
EDIT DE LA MODERATION : Ajout des balises de code et déplacement de la question dans le bon forum !
Sub Bouton1_Cliquer()
If Worksheets("Suivi de transport").Range("L:L").Value = "5T" Or "14T" Or "19T" Or "25T" And Worksheets("Suivi de transport").Range("P:P").Value <= 1 Then
Worksheets("Suivi de transport").Range("Q:Q").Value = "OK"
Else
Worksheets("Suivi de transport").Range("Q:Q").Value = "KO"
End If
If Worksheets("Suivi de transport").Range("L:L").Value = "MSG" And Worksheets("Suivi de transport").Range("P:P").Value <= 2 Then
Worksheets("Suivi de transport").Range("Q:Q").Value = "OK"
Else
Worksheets("Suivi de transport").Range("Q:Q").Value = "KO"
End If
End Sub
EDIT DE LA MODERATION : Ajout des balises de code et déplacement de la question dans le bon forum !
Configuration: Windows / Chrome 99.0.4844.51
1 réponse
-
Bonjour,
A l'avenir, merci d'utiliser les balises de code pour poster du code sur le forum.
Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
Ensuite, tu ne dis pas sur quelle ligne l'erreur apparait...
J'aurai tendance à penser que c'est ton premier if ..
Tu ne peux pas faire ...
If Worksheets("Suivi de transport").Range("L:L").Value = "5T" Or "14T" Or "19T" Or "25T"
Tu dois indiquer sur quoi portent les OR .. autrement ditIf Worksheets("Suivi de transport").Range("L:L").Value = "5T" Or Worksheets("Suivi de transport").Range("L:L").Value = "14T" Or Worksheets("Suivi de transport").Range("L:L").Value = "19T" Or Worksheets("Suivi de transport").Range("L:L").Value ="25T"
Et en plus tu ajoutes dans ton if un AND ...
Le AND .. c'est comme le multiplié en mathématiques .. il est prioritaire ..
Il te faut donc ajouter des parenthèses autour de tes OR
Par exemple :if ( condition1 OR condition2 OR condition3 ) AND condition4
