Error 13 type mismatch on Excel

Fermé

kevin - Modifié le 14 mars 2022 à 16:43
jordane45 Messages postés 38178 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 16 mai 2024 - 14 mars 2022 à 16:48

Bonjour,

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

A voir également:

Error 13 type mismatch on Excel
Liste déroulante excel - Guide
Formule excel - Guide
Si et excel - Guide
Aller à la ligne excel - Guide
Mise en forme conditionnelle excel - Guide

1 réponse

Réponse 1 / 1

jordane45 Messages postés 38178 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 16 mai 2024 4 667
14 mars 2022 à 16:46

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 dit

If 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

jordane45 Messages postés 38178 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 16 mai 2024 4 667
14 mars 2022 à 16:48

Attention.. tu ne peux pas cibler non plus des colonnes entières ....
Il va sûrement falloir que tu fasses une boucle sur chaque ligne de ton tableau

Discussions similaires

Ordi lenovo fan error

problème carte mère CMOS checksum error...

Discussions similaires

Newsletters