tri de colonne

bonjour, je cherche a trier les premiere colonnes de mon tableau mais mon code ne fonctionne pas sachant que je suis obligé des travaillé avec des objets, vus que sa ne marche pas j essaye qu avec la premiere colonne mais aucun succés

Code:

---

1 2 3

monclasseur.Sheets(1).Columns("A:A").Select selection.Sort Key1:=monclasseur.Sheets(1).cells(1, 1), Order1:=xlAscending

---

Tu es sûre que ta cellule A1 contient quelque chose ? Sinon, essaie avec Range

Code:

---

1 2	monclasseur.Sheets(1).Columns("A:A").Select Selection.Sort Key1:=monclasseur.Sheets(1).Range("A1"), Order1:=xlAscending

---

A+

il me declare une erreur " select method of range class failed " en me surlignant la ligne "monclasseur.Sheets(1).Columns("A:A").Select" et je ne vois pas pourquoi

J'ai testé... Ma colonne A avait des données sur A1... je n'ai pas d'erreur

Comment instancies-tu ton classeur ? Tu as bien mis

Code:

---

1 2 3 4 5

Set MonClasseur = ActiveWorkbook 'ou Set MonClasseur = workbooks("NomDuClasseur.xls") 'ou Set MonClasseur = workbooks.open(filename:=Chemin & "NomDuClasseur.xls")

---

Juste une question ;)

Bonjour levac, ouskel'nor ;)

Ca m'arrive souvent quand je veux aller trop vite, j'imagine qu'on ne peut pas selectionner un range avant un sheet et un sheet avant un classeur

Quand je divise mes ordres ca mache

Code:

---

monclasseur.Sheets(1).Columns("A:A").Select

---

devient :

Code:

---

1 2 3

workbook(monclasseur).select sheets(1).select range("A:A").select

---

sinon tu peux ecrire : (ca evite les select)

Code:

---

monclasseur.Sheets(1).range("A:A").Sort Key1:=monclasseur.Sheets(1).Range("A1"), Order1:=xlAscending

---

bonne journée

je lé cré comme sa

Code:

---

Set monclasseur = GetObject(Stock_var.chemin_nom.Text + "\" + l_Jonction_affaire.nomaffaire + ".xls")

---

il met toujours la meme erreur je ne comprend pas pourquoi, si c est du au reste du code de cette feuille je peux pas vraiment vous le montrer vu qu il est enorme meme en supprimant les commentaires

re:

workbooks(monclasseur.name).select


je ne sais jamais s'il faut ou pas un s

@ te lire

Une question bête, tu as bien déclaré tout ce qu'il fallait en tête de module ?
Regarde l'aide à "GetObject, fonction"

en fait c est la method sort qui ne fonctionne pas pr la "range" je ne pense pa que se soit quelque chose qui a était mal declaré ( j ai regardé sans avoir rien trouvé ) et workbook n est pas reconnu, en fait c est du visual basic 5 mais le premier créateur du programme a utilisé ces fonctions de VBA donc c est pour sa que je recherche des solutions ici aussi

Tu devrais regarder dans l'aide à GetObject, non seulement tu as une explication mais aussi un exemple. Je ne vois pas d'instanciation de l'object Application.
Mais as-tu activé la référence "Microsoft word xx.x 0bject Library" -> Editeur VB -> Référence ?
Cette référence doit être validée poour l'utilisation de GetObjet (dans VBA Excel)
A tout hasard mais l'erreur que tu as "ressemblerait" assez à ça (?)

en fait mon probleme est que mon visual basic me permet aucune macro de VBA alor que je dois faire une mise en page de mon tableau