Comment trier les colonnes en vba

Sélectionner "Fichier | Nouveau" dans Excel pour créer un nouveau classeur.

Entrez les valeurs "fruits," "Pomme," "pomme," "banane," et "Orange" dans les cellules A1, A2, A3, A4, et A5.

Entrez les valeurs "prix," "1,5," "1.4," "2," "1.5" dans les cellules B1, B2, B3, B4 et B5.

Sélectionner "Outils | Macro gt; Macros ..."

Entrez le nom de la macro "sortFruitPrices" dans la boîte de dialogue Macro et sélectionnez "Créer."

Copiez et collez le code suivant sous l`en-tête de la fonction auto-générée "Sous sortFruitPrices." Notez que "_" représente même ligne la poursuite, "Entête" est réglé sur "xlYes" de sorte que la ligne de titre ne sont pas inclus dans le genre et "Cas de correspondance" est réglé sur "Vrai," de telle sorte que la pomme précède Apple).

Cells.Sort _

Touche1: = Range ("A1"), Order1: = xlAscending, _

Touche2: = Range ("B1"), ORDER2: = xlAscending, _

En-tête: = xlYes, OrderCustom: = 1, matchcase: = True, Orientation: = xlSortColumns

presse "F5" pour exécuter la macro.

Sélectionner "Fichier | Enregistrer" et enregistrez la macro en "C: Book1.xls."

presse "Alt + TAB" pour passer de l`éditeur VBA pour la feuille de calcul Excel.

Sélectionner "Outils | Personnaliser ..." et cliquez sur le "Commandes" onglet dans la boîte de dialogue.

Sélectionner "Macros" du "Catégories" liste. Cliquer sur "Menu personnalisé" du "Commandes" liste, faites-le glisser sur "Outils" option sur le menu principal pour que le menu ouvre automatiquement, puis déposez-le sous le dernier élément.

droite, cliquez sur "Outils | Menu client Item" et modifier l`entrée Nom pour "Trier&FruitPrices," puis appuyez "Entrer."

droite, cliquez sur "Outils | sortFruitPrices" et sélectionnez "Affecter une macro ...". Sélectionnez sortFruitPrices dans la liste macro et cliquez "D`ACCORD." Fermez la boîte de dialogue Personnaliser.

sauvegarder "C: Book1.xls".

Modifiez la valeur "pomme" à "ananas" puis sélectionnez "Outils | sortFruitPrices."

Clique sur le "Sheet1" onglet au bas de la feuille de calcul et sélectionnez "Voir le Code."

Cliquez sur la liste des objets au-dessus du volet de code source où il affiche "(Général)" et sélectionnez "Feuille de travail."

Sélectionner "Changement" du "Événements" liste à côté de la "Objets" liste.

Copiez et collez le code suivant sous l`en-tête de la fonction auto-générée "Privé Worksheet_Change Sub:"

Si Target.Column = 1 Ensuite,

sortFruitPrices appel

Fin si

presse "Alt + TAB" pour passer de l`éditeur VBA pour la feuille de calcul Excel.

sauvegarder "C: Book1.xls."

Changement "pomme "dessert, pomme" et appuyez sur "Entrer." Notez que la feuille de calcul se trie automatiquement.