Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

VBA Tirer une Plage Nommee en fonction de la premiere colonne

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion patapock
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
P

patapock

Guest
Bonsoir.

Soit le tableau B3,D8 comportant les colonnes "NOM", "RENOM", "DATE DE NAISSANCE".
La plage contenant les données saisies (B4,D8) a été nommée "SM"

Quel serait la fonction qui permettrait de trier les lignes de la plage "SM" par ordre croissant de la colonne "NOM" ?

Je pensais a quelque chose comme:


Range("SM").Sort key1:=Range("???"), order1:=xlAscending​


Je ne sais pas quoi mettre a la place des ??? pour que le code fonctionne ?!

Merci de votre aide

Cordialement
 

Pièces jointes

Trier par date Trier par votes
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

Bonjour patapock, le forum,
Une solution avec le fichier joint.
Cordialement,
Bernard
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

Bonjour bbb38, et merci de répondre si vite.

C'est vrai que ta solution trie bien la première colonne ("B", en l'occurrence), mais ce n'est pas ce que je souhaite.

Je reformule le problème différemment, en mettant moins de données a disposition:


  • soit un tableau comprenant un certain nombre de lignes et de colonnes, que l'on a nommé "SM".

    Avec un bouton, comment trier les ligne de "SM" en ordre croissant en fonction de sa première colonne?

    On ne sait pas ou se trouve "SM" sur la feuille! 🙄


Je sais, c'est fourbe, mais, au lire de plusieurs posts sur la toile, dans une quête désespérée, il me semble que la solution ravirait nombre d'entre nous.
 
Vote positif 0 Vote négatif
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

Bonjour

En mettant ton tableau sous forme de vrai tableau excel
Ce lien n'existe plus

Code: 
Sub trie()
With Worksheets("feuil1").ListObjects("tableau1")
.Sort.SortFields.Clear
.Sort.SortFields.Add Key:=Range("tableau1[[#Headers],[#Data],[nom]]"), _
 SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With .Sort
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End With
End Sub

ce code reste valable quel que soit le nombre de lignes, de colonnes (c'est dynamique, pas besoin de plage nommée avec decaler ou autre).Tu peux bien sur renommer SM ce tableau 1 (en supprimant le nom que tu as déjà mis sinon conflit).
 

Pièces jointes

Vote positif 0 Vote négatif
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

Misange, merci pour ce modèle de code que je trouve très réussi.
La encore, tu contourne le problème, non?

Mon entêtement a vouloir traiter une "Plage Nommée", indépendamment de sa position, vient du fait que dans plusieurs de mes projets, j'utilise (ou vais utiliser) différents formulaires pour alimenter des tableaux "nommes". Par la suite, je souhaiterai reproduire des fragments de ces tableaux dans d'autres feuilles avec une mise en page qui m'est imposée (mêmes données, mais agencées différemment).

L’idée me parait séduisante, d'un bout de code facilement transposable en ne changeant qu'un nom (la plage nommée), insère une nouvelle ligne (enregistrement par formulaire) dans la bonne plage nommée, puis la classe alphabétiquement au bon endroit.

Pourquoi pas, non plus, alimenter différentes plages nommées dans différentes feuilles, en ne pressant qu'une fois sur un bouton "valider" de formulaire.

Mais peut être fais-je fausse route?
 
Vote positif 0 Vote négatif
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

Là où tu fais fausse route c'est en n’utilisant pas les tableaux alors que tu as excel 2010 🙂
Tu n'as plus besoin de plages nommées avec les tableaux. Ou plus exactement un tableau EST une plage nommée mais avec des tas d'autres avantages. Je t'incite à lire la page dont je t'ai donné le lien pour voir les nombreux avantages.
Un tableau peux très bien s'alimenter avec un formulaire par VBA (tu trouveras un exemple de code sur excelabo).
 
Vote positif 0 Vote négatif
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

salut

j'approuve pleinement le conseil donné par Misange 😀 de passer par un tableau et le tri peut être fait avec un code très simple :
VB: 
Sub trie()
  [Tableau1].Sort [Tableau1[NOM]], 1, Header:=1
End Sub

le tableau nommé ainsi est trié en fonction de la colonne dont le titre suit, en ordre décroissant (2 pour l'autre) etsans toucher à la ligne des titres.

Remarque le code est indépendant de la position du tableau sur la feuille !
 
Vote positif 0 Vote négatif
Re : VBA Tirer une Plage Nommee en fonction de la premiere colonne

Si...

Je teste ta méthode sans succès. Je pense avoir un problème de syntaxe.
Aurais-tu la gentillesse de joindre un fichier exemple?

Tri s'effectuant en cliquant sur un bouton qui valide un formulaire (dans mon cas, ajoutant un nouvel enregistrement dans "Tableau1".

-Plage de cellules concernées: appelée "Tableau1"
-Tri croissant en fonction de la colonne "Colone1"
-Pas d’entêtes de colonnes

Cordialement
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

S
  • Résolu(e)
XL 2016 Coller nom classeur sur plage cellules
Réponses
9
Affichages
606
safranien
S
  • Question Question
Microsoft 365 Trouver et attribuer une plage de cellule en fonction de la cellule active
Réponses
6
Affichages
610
Jojo973
L
  • Question Question
XL 2010 Filtrer et mise en couleur de cellules sur une colonne
Réponses
8
Affichages
838
sylvanu
M
  • Résolu(e)
Microsoft 365 Prendre les 10 1ère valeur d'une plage en fonction de 2 critères
2 3
Réponses
43
Affichages
3 K
merinos-BernardEtang
S
  • Résolu(e)
Microsoft 365 Automatiser une RechercheV en fonction de la valeur d'une colonne
Réponses
13
Affichages
1 K
Phil69970
P
  • Question Question
XL 2019 VBA Erreur d'exécution "9" dans une plage de tableau
Réponses
2
Affichages
606
piskely
P
S
  • Résolu(e)
Microsoft 365 VBA pour copier/coller une plage de cellule dans un autre onglet en fonction de la date
Réponses
8
Affichages
1 K
Sylvain. B
S
Q
  • Question Question
XL 2019 copier une ligne en fonction de la valeur d'une cellule
Réponses
10
Affichages
1 K
quetzal974
Q
M
  • Résolu(e)
XL 2019 insérer dans une cellule une formule avec pour variable une plage de donnée (VBA)
Réponses
5
Affichages
866
mikado08
M
M
  • Résolu(e)
XL 2016 VBA - Condition plage cellule feuille 1 par rapport a une colonne en feuille 2
Réponses
2
Affichages
608
Maxime26
M
  • Question Question
XL 2016 conservation du format de la date
Réponses
3
Affichages
693
Dranreb
R
  • Question Question
Microsoft 365 VBA - rechercher une ligne en fonction de 2 critères sur 2 colonnes différentes
Réponses
9
Affichages
2 K
sylvanu
E
  • Question Question
XL 2016 VBA : Fonction de remplissage tableau avec condition
Réponses
4
Affichages
775
Ethlios
E
J
  • Question Question
XL 2013 Trouver nom plage de la cellule active et trier la plage de cellule
Réponses
12
Affichages
2 K
fanch55
G
  • Question Question
XL 2016 modifier virgule en point
Réponses
1
Affichages
772
Grouchet
G
L
  • Question Question
XL 2019 Trier une liste de noms latins en couleur sans doublons depuis une combobox d'un userform
2
Réponses
29
Affichages
3 K
lusert
L
  • Question Question
XL 2013 listbox avec + de 11 colonnes (colonne A à colonne L)
Réponses
11
Affichages
3 K
patricktoulon
  • Résolu(e)
XL 2016 Dupliquer une feuille contenant un tableau anonyme trié par vba
Réponses
4
Affichages
952
zayab
C
  • Résolu(e)
Microsoft 365 SI remplissage cellule (MFC) ALORS transposer la réponse dans une colonne
Réponses
3
Affichages
2 K
Chaine
C
K
  • Question Question
XL 2016 VBA - Extraire une feuille pour l'enregistrer en .csv (avec séparateur point virgule) puis l'enregistrer en .txt
Réponses
3
Affichages
2 K
Karim48
K
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…