Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Erreur Incompatible Type 13

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

BENAM69

XLDnaute Occasionnel
Bonjour à tous,

J'ai plus ou moins trouvé la raison à mon problème à l'aide des différentes discussions de forum mais je n'ai pas trouver ma solution car chaque cas que j'ai trouvé semble différent du mien ^^.
Savez-vous pourquoi quand je sélectionne une plage de cellule quelconque et que je décide de supprimer les données, une pop up avec écrit Erreur d'exécution ' 13' :
Incompatibilité de type apparaît ?

Je suppose que cela vient d'une déclaration de variable, ou manque de données ?

Sinon m'a macro marche nickel, c'est juste ce souci qui m'embête

Quelqu'un aurait la solution ?

VB:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
 
 If Target.Value = "NOK" Or Target.Value = "nok" Or Target.Value = "Nok" Or Target.Value = "nOK" Then
  UserForm1.Show
 End If
End Sub

Voici le code que j'ai mis. Mon fichier en PJ ne contient aucune donnée. C'était juste pour détecter si une cellule contient NOK alors l'userform apparait.

Merci de votre aide

Benam
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
1
Affichages
384
  • Question Question
Microsoft 365 heures sans les :
Réponses
2
Affichages
773
Réponses
17
Affichages
2 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…