Autres liste deroulante

mc3199 à dit:

slt a vous tous
j'ai une question pour rentrer mes compte plus rapidement et
étant un 'vulgaire' amateur sur excel j'utilise excel 2009
je voudrais faire une liste déroulante qui se remplis au fur et a mesure que je rentre des mots dans la colonne F( voir fichier)
et a chaque fois que je vais sur la ligne de la colonne F qu'il me donne le choix dans la liste déroulante ou que je puisse rajouter manuellement des nouveaux mots et que cela soit rangé alphabétiquement automatiquement.
voila si vous pouvez m'aider cela serait super
merci a vous
un amateur

Cliquez pour agrandir...

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 6 Or Target.Row < 4 Or Target.Count > 1 Then Exit Sub
    If Target = "" Then Exit Sub
    Application.EnableEvents = False
    If IsError(Application.Match(Target, [libelle], 0)) Then
        If MsgBox(Target.Value & vbLf & "Ce libellé est inexistant. Voulez-vous l'ajouter?", 292, "Information") = 6 Then    ' facutatif
            Feuil2.Cells(Feuil2.Cells(Feuil2.Rows.Count, "A").End(xlUp).Row + 1, 1) = Target
            If Application.CountA(Feuil2.[a:a]) > 2 Then [libelle].Sort Key1:=[libelle]
        End If    ' facutatif
    End If
    Application.EnableEvents = True
End Sub

mc3199 à dit:

étant un 'vulgaire' amateur sur excel j'utilise excel 2009

Cliquez pour agrandir...