Bonjour à tous,
J'ai une erreur dans mon code Vba que je ne comprends pas : lorsque je veux cacher mon bouton 2 dans ma feuille (je choisis alors dans un menu déroulant "Récupéré" ) le bouton disparait mais lorsque je fais pareil pour la case suivante (donc pour le bouton à coté) ca ne fonctionne pas et on m affiche : erreur d'éxécution 2147024809 l'élément portant ce nom est introuvable.
Merci a tous pour vos futures réponses.
Ps : j'ai bien sur vérifier le nom correspond bien avec celui que j'ai mis dans le code
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$E$9" Then
If Target = "Attendu" Then
ActiveSheet.Shapes("Bouton 2").Visible = True
ElseIf Target = "Récupéré" Then
ActiveSheet.Shapes("Bouton 2").Visible = False
End If
End If
If Target.Address = "$F$9" Then
If Target = "Attendu" Then
ActiveSheet.Shapes("Bouton 3").Visible = True
ElseIf Target = "Récupéré" Then
ActiveSheet.Shapes("Bouton 3").Visible = False
End If
End If
End Sub