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

erreur d'execution13 incompatibilité de type

vinceg

XLDnaute Nouveau
il s'agit d'un code vba qui doit trouver dans une colonne toutes les cellules qui ont un résultat de formule égal à onze pour pouvoir recopier les informations d un client dans un autre onglet et à chaque fois excel me marque erreur d'execution 13 incompatibilité de type alors que lorsque je tape 11 il applique le morceau de macro.
Est ce parce que le chiffre 11 découle d'une formule?

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range('Ai:Ai')) Is Nothing Then
If Target = '11' Then
scoring11rAjoute (Target.Row)
ElseIf Target.Text = '' Then
scoring11Supprime (Target.Row)
Target.Select
End If
End If
End Sub
là je suis perdu.
 

Ti_

Nous a quitté
Repose en paix
enlève les guillemets autour de 11, sinon la macro considère ce nombre comme du texte et n'en veut pas (à moins que tu écrives la ligne comme ceci : If Cstr(Target) = '11' Then)
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…