Astuces Excel
  1. Astuces Excel
  3. Tri d'un object Range dans VSTO
Intereting Posts
Ecrire à row using openpyxl? Le code VBA ne fonctionne pas universellement Augmentez la valeur Y en excel chaque fois que je remplis un formulaire avec vba Wrap Text pour une colonne entière à l'aide de pandas (Python) VBA Copie le text des tables dans Word Doc pour excel? Excel VBA – Obtenir une erreur d'exécution 1004 – Impossible d'accéder au file Comment searchr une string avec une colonne de text? Comment lire le file excel dans angularjs? Comment save l'événement delete dans excel C # port of Apache POI corrompt les objects OLE embeddeds dans .xlsx Supprimer le mot de passe d'excel Associer une cellule à l'extérieur d'un tableau pivot avec un en son sein – excel Utilisation d'une variable pour la rangée (ligne, colonne) pour une plage dans VBA Excel met automatiquement à jour un champ d'un autre et vice versa Comment puis-je utiliser VBA dans Excel pour envoyer des requests de réunion au nom d'un autre calendar?

Tri d'un object Range dans VSTO

Dans VSTO 2010 dans Excel, la méthode Range.Sort ne semble pas fonctionner pour moi. Voici mon exemple de code. Il place les nombres de 1 à 20 dans l'ordre inverse dans la colonne A, puis essaye en vain de les sortinger. 

 Worksheet sheet = Globals.ThisAddIn.Application.ActiveSheet; Enumerable.Range(1, 20).ToList().ForEach(i => sheet.Cells[21 - i, 1] = i); sheet.Columns[1].Sort();

Selon la documentation , le Sort avec aucun argument sortinger dans l'ordre croissant. Dans le cas où j'ai essayé de spécifier Order1: XlSortOrder.xlAscending .

J'ai également essayé

sheet.Columns[1].Select().Sort();

pour sélectionner la colonne en premier, mais cela ne fonctionnait pas non plus.

Comment puis-je sortinger une Range de cellules?

J'ai essayé votre approche dans VBA et j'ai reçu l'erreur "méthode de sorting de la class de plage échoué".

J'ai résolu cela en passant la gamme comme l'argument "Key1" de la méthode. Cela semble redondant, mais ça marche. Voici votre exemple de code avec le même correctif appliqué: 

 Worksheet sheet = Globals.ThisAddIn.Application.ActiveSheet; Enumerable.Range(1, 20).ToList().ForEach(i => sheet.Cells[21 - i, 1] = i); sheet.Columns[1].Sort(sheet.Columns[1]);