Macro pour liste déroulante

Bonjour,

Je suis totalement novice en VBA et pas super douée avec les macros. J'ai une liste déroulante créée en ActiveX dans laquelle j'ai deux entrées : "Hôtesse" et "Invitée". Je souhaite que si l'entrée "Invitée" est choisie, le contenu d'une série de 3 cellules soit effacé. Attention, je ne veux pas que ça s'efface au changement d'entrée, ça j'ai réussi à le faire. Je veux que ce soit UNIQUEMENT si l'entrée "Invitée" est choisie.

J'ai essayé avec ça, mais ça ne fonctionne pas :

Sub Macro4()

If ComboBox1.Value = "Invitée" Then

Range("U17:U22").Select

Selection.ClearContents

End If

End Sub

Merci d'avance, je suis désespérée, je cherche depuis hier sur tous les forums possibles et ne trouve pas de solution !

A+

Sandrine

Bonjour et bienvenue sur le forum

Joins ton fichier et il sera plus facile de t'aider...

A te relire.

Bonjour,

Dans la mesure où tu es amenée à changer ta Combobox dans ta Feuille... il faut insérer le code suivant dans le Module de ta Feuille (par exemple Feuil1 ) pour en faire une procédure évènementielle ... automatique ...

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Count > 1 Then Exit Sub
   If ComboBox1.Value = "Invitée" Then Range("U17:U22").ClearContents
End Sub