Comment trier les colonnes en VBA

Rédaction d'une macro VBA

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

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

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

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

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

6. Copiez et collez le code suivant sous l'en-tête de la fonction auto-générée "Sous sortFruitPrices." Noter que "_" représente même ligne 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 sorte que la pomme précède Apple).

   Cells.Sort _

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

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

   
   
   
   

   Rubrique: = xlYes, OrderCustom: = 1, matchcase: = True, Orientation: = xlSortColumns

7. Appuyez "F5" pour exécuter la macro.

8. Sélectionner "Fichier | Enregistrer" et enregistrer la macro dans "C: Book1.xls."

Installation d'une macro VBA

1. Appuyez "ALT + TAB" de passer de l'éditeur VBA pour le tableur Excel.

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

3. 
   
   
   
   

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

4. droit; cliquer sur "Outils | Menu client Item" et modifier l'entrée Nom pour "Trier&FruitPrices," puis appuyez sur "Entrez."

5. droit; cliquer sur "Outils | sortFruitPrices" et sélectionnez "Affecter une macro ...". Sélectionnez dans la liste sortFruitPrices macro et cliquez "D'ACCORD." Fermez la boîte de dialogue Personnaliser.

6. Sauvegarder "C: Book1.xls".

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

Ajout automatique de tri

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

2. Cliquez sur la liste de l'objet au-dessus du volet de code source où il affiche "(Général)" et sélectionnez "Feuille de calcul."

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

4. 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 alors

   SortFruitPrices appel

   Fin si

5. Appuyez "ALT + TAB" de passer de l'éditeur VBA pour le tableur Excel.

6. Sauvegarder "C: Book1.xls."

7. Changement "pomme "le dessert de pomme" et appuyez sur "Entrez." Notez que la feuille de calcul se trie automatiquement.