Sort en Excel via Powerpoint

Bonjour,

Voilà, je souhaite faire un graphique en powerpoint avec des données d'un fichier Excel. Pour un des graphique je dois trier les chiffres en ordre descendant. Quand je tourne la macro, une fois ça marche, une fois ça marche pas. Les erreurs sont ou "Remote..." ou "Invalid reference" etc...

Voici le code utilisé:

Code:

---

1 2 3

Set xlWks = xlWkb.Worksheets("Sheet5") xlWks.Range("B20:C27").Sort key1:=Range("C20"), order1:=xlDescending, Header:=xlGuess, _ ordercustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal

---

Je vous remercie d'avance si vous pouvez m'aidez a trouver une solution...

Kevin ;)

Bonjour

A mon avis, il manque la référence à la feuille pour le Key1. Si c'est la feuille active, tout ira bien, mais si une autre feuille est active => plantage...

Ceci devrait résoudre ton problème

Code:

---

1 2 3

Set xlWks = xlWkb.Worksheets("Sheet5") xlWks.Range("B20:C27").Sort key1:=xlWks.Range("C20"), order1:=xlDescending, Header:=xlGuess, _ ordercustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal

---

Merci, ca fonctionne plusieurs fois de suite maintenant :)

Et merci pour la rapidité, super... :ccool::ccool::ccool: