Error 13 type mismatch on Excel

Fermé

kevin - Modifié le 14 mars 2022 à 16:43
jordane45 Messages postés 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025 - 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
Word et excel gratuit - Guide
Déplacer colonne excel - Guide
Si et excel - Guide
Fifa 13 - Télécharger - Jeux vidéo

1 réponse

Réponse 1 / 1

jordane45 Messages postés 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025 4 742
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 38471 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 2 mai 2025 4 742
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

Voxbone ? qui est-ce ?

Bonjour,

J'ai reçu plusieurs appels aujourd'hui d'un n° de téléphone qui m'était inconnu (des numéros commençant par 09 48 ou 01 62 en général), après avoir recherché sur le net j'ai su qu'il s'agissait de VoxBone à Brussels. Je ne comprend pas comment ils peuvent me téléphoner alors que je suis à France télécom et orange et que je paie pour le stop secret, donc la personne devait se présenter.

Je me demande qui ils sont car, je n'ai rien compris. Y a T-il quelqu'un qui connait ? car j'étais absente et comment ils arrivent à passer outre "stop secret"

Merci pour l'explication

A vous lire Configuration: Windows 7 / Internet Explorer 9.0

Iptv smarters pro Network error occured! Please try again

Bonjour,

J’ai ce message sur ma tv qled samsung lorsque je lance iptv smarters pro avec mon code utilisateur qui fonctionnait avant mais j’ai fait l’erreur de faire déconnexion et depuis je ne peux relancer mon compte.