Bonjour,
J'ai un code pour exécuter une macro lorsque je clique sur une cellule

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
If Target.Column = 1 Then
     If Target.Value <> "" And IsNumeric(Target.Value) Then
        Feuil6.Range(Target.Address).Font.ColorIndex = 3
        Feuil6.Range(Target.Address).Interior.ColorIndex = 6
        Feuil6.Range(Target.Address).Font.Bold = True
        Feuil1.Select
        Feuil1.Rows(Target.Value).Select
     End If
End If
End Sub
Le problème c'est lorsque je selectionne la ligne ou y a une valeur sur la feuille 6 , ca créer une "erreur d'execution 13 : incompatibilité de type"

Est ce que quelqu'un peut corriger le code de manière a ce que ma macro ne plante pas svp.

Je ne maitrise absolument pas ce genre de manipulation.

Merci d'avance
Cordialement
DoDo