Remettre un liste au debut

Bonjour

Je sollicite votre aide pour un clic.

Après une recherche sur les multiples listes du tableau joint je souhaiterai remettre toutes les listes au début sur un simple clic du "botton".

Liste 1 => 1

Liste 2 => 110

Liste 3 => 210

Je ne sais pas faire, si l'un d'entre vous peux me proposer une solution, SVP.

Je vous remercie pour votre aide.

Cordialement.

Super

et c'est tout simple

Merci beaucoup

Bon WE

Bonjour Ewoks, Yvouille , le forum,

Un essai avec listes nommées.....

Option Explicit

Private Sub CB1_Click()
    Range("B3") = [liste1].Cells(1, 1)
    Range("B6") = [liste2].Cells(1, 1)
    Range("B9") = [liste3].Cells(1, 1)
    Range("B12") = [liste4].Cells(1, 1)
End Sub

Cordialement,

Oups

La remise a zéro ce fait très bien.

En revanche : Si je ferme et ré-ouvre le fichier les validations n'existe plus. je dois refaire les validations.

Merci

Tu es sur quel fichier ?

Bonjour Yvouille,

Merci de ta participation.

Le deuxième fichier en "zip" que je viens de recevoir xorsankukia fonctionne à la merveille

Merci xorsankukia pour m'avoir aidé aussi rapidement.

Re,

La remise a zéro ce fait très bien.

En revanche : Si je ferme et ré-ouvre le fichier les validations n'existe plus. je dois refaire les validations.

Heu...je ne rencontre pas ce problème sur mon fichier, en revanche, sur le tien, les listes ne sont pas faites dès le départ...

Cordialement,

Bonjour,

Je reviens vers vous, j'ai fais un fichier et il ne fonctionne pas. je ne trouve pas ou est le bug.

Pouvez-vous m'indiquer ou je me trompe avec une explication succin, SVP.

Merci

Bonjour Ewoks, le forum,

Tu n'as pas de plages nommées liste1; liste2; liste3.

Dans l'exemple que je t'avais fourni, j'avais mis les 3 tableaux (qui étaient distincts) sous forme de tableaux structurés, puis j'avais renommé la plage de données de la première colonne de chaque tableau.

Ce nom servait alors à alimenter la liste déroulante et dans le code de la macro.

Cordialement,

Je pouvais chercher longtemps, j'aurais jamais trouvé. J'utilise les post(s) du forum pour faire des petits trucs.

Je te remercie pour les explications et le partage des tes connaissances.