XL 2019 Formulaire pour ajouter ligne tableau

[Bens1912]

Bonjour tout le monde !

Voila plusieurs années que j'utilise Excel pour ma vidéothèque (plus de 500 films). Aujourd'hui, je souhaite aller plus loin qu'un simple tableau basique. J'ai créé un onglet "Données" avec des listes déroulantes pour mon tableau, ainsi que des mises en formes conditionnelles.

Jusqu'ici, quand j'avais un nouveau film, je rajoutais une ligne manuellement en fin de tableau, et je refaisais un tri par ordre alphabétique. J'aimerais que cette tâche soit faite via un formulaire que je pourrais remplir sur un nouvel onglet. Et je souhaiterais également que cette nouvelle ligne automatisée soit triée et qu'elle soit affectée à une clé (pour la clé en ce moment j'ai une formule (=LIGNE) qui ajoute 1 à chaque fois.

J'ai tenté plusieurs tutos mais impossible de faire fonctionner ce formulaire...

Pouvez-vous m'aider svp ?
Je vous joins mon classeur si besoin

Merci à vous

 

[sylvanu]

Bonjour Bens,
Mémoriser une clé automatique ne peut passer que par du VBA. De plus "Ligne' ne peut être la solution car après un tri chaque cellule conservera Ligne et donc ne changera pas de valeur et toutes vos clés seront fausses.

En PJ un essai avec un formulaire dans un onglet comme demandé, avec :

Sub Ajouter()
    Dim F, Ligne%
    Application.ScreenUpdating = False
    Set F = Sheets("Nouveau")
    If Application.CountA(F.[D6:D18]) <> 7 Then
        MsgBox ("Il manque des informations.")
        Exit Sub
    End If
    With Sheets("Liste des films")
        Ligne = 1 + .Range("A65500").End(xlUp).Row
        For L = 1 To 8
            .Cells(Ligne + 0, L) = F.Cells(2 * L + 2, 4).Value
        Next L
    End With
    F.[D6] = "": F.[D8] = "": F.[D10:D20].ClearContents
End Sub

Evidemment il vous faut accepter les macros.

Par contre aucun tri n'est effectué, le nouveau film se met à la fin de la liste.
Pour effectuer un tri .... il faut savoir quoi trier. ( clé/titre/année ... )

 

[ChTi160]

Bonjour Bens
Bonjour le Fil , sylvanu
c'est quoi le mot de pass de la feuille "Données" ?
Bonne journée
jean marie

 

[sylvanu]

Bonjour Chti,
Comme un mot de passe sur feuille n'a strictement rien de sécurisé, il suffit de copier coller les infos de Données sur une nouvelle feuille. Détruire la feuille Données, renommer la nouvelle feuille Données.
Et vous avez une Feuille Données sans mot de passe.

 

[ChTi160]

Re
Oui mais pas cool !
je te laisse faire Lol
Merci
jean marie

 

[sylvanu]

Alors prenez ma feuille du post #2, elle n'est plus protégée.

 

[Bens1912]

Merci, ça fonctionne bien, c'est comme ça que je souhaitait ! Pour le tri, ce serait dans l'ordre alphabétique des titres. J'ai cherché sur google des codes VBA mais impossible de les faire fonctionner

 

[sylvanu]

Tri fait en PJ.

 

[Bens1912]

Ca fonctionne parfaitement ! Merci