Programmation de macro

Résolu
seguiner -  
via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

J'essaie de programmer un formulaire de soumission pour mes clients. Dans la cellule A1 se trouve une liste déroulante (Dossier archivé, Nouveau dossier, Dossier à numériser). Si l'utilisateur choisit "Dossier archivé", une formule si(a1="Dossier archivé";"No. dossier:";"") se trouve dans la cellule B1 indiquant au client d'inscrire le numéro de dossier dans la cellule C1. Tout va bien à ce niveau. Cependant je voudrais que la contenu de la cellule C1 s'efface si le client revient sur son choix et choisit un des deux autres choix dans la cellule A1.

Merci de votre aide

1 réponse

  1. via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonsoir

    macro à mettre dans le worksheet de la feuille concernée :
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1")) Is Nothing Then
    Range("C1") = ""
    End If
    End Sub


    Cdlmnt

    0