Exécution d'une macro pour une valeur de cellule

Résolu/Fermé

Adri - 15 sept. 2015 à 14:02
Adri - 15 sept. 2015 à 14:25

Bonjour,

J'ai dans excel 2010 indiqué les instructions suivantes, pour exécuter deux macros en fonction des valeurs indiquées dans la colonne A

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 1 Then

Select Case Target.Value

Case Is = 1

Macro1

Case Is = 2

Macro2

End Select

End If

End Sub

Ceci fonctionne parfaitement à un détail prêt : lorsque je supprime ou que j'insère une ligne j'ai l'erreur d'exécution 13 qui apparaît ! (Incompatibilité de type),

Pourriez-vous me renseigner?

Merci

A voir également:

Exécution d'une macro pour une valeur de cellule
Aller à la ligne dans une cellule excel - Guide
Macro word - Guide
Bloquer une cellule excel - Guide
Macro logiciel - Télécharger - Organisation
Excel renvoyer la valeur d'une cellule en fonction d'une autre ✓ - Forum Excel

1 réponse

Réponse 1 / 1

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
15 sept. 2015 à 14:11

Bonjour,

Essaie avec

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Column = 1 Then
        Select Case Target.Value
        Case Is = 1
            Macro1
        Case Is = 2
            Macro2
        End Select
    End If
End Sub

A+

Adri
15 sept. 2015 à 14:25

Merci ! Fonctionne parfaitement

Discussions similaires

Problème de restrictions

Excel:récupérer le contenu d'une cellule en fonction d'une autre

Excel VBA : Récupérer la valeur d'une cellule

formule de calcule

Excel : colorer une cellule sous condition d'une autre ?

Discussions similaires

Newsletters