Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
533 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Macro VB sous Excel] Prb de tri de colonne

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Macro VB sous Excel] Prb de tri de colonne

n°1435051
Millenius
Posté le 01-09-2006 à 12:30:27  profilanswer
 

A la fin d'une macro, j'ai çà :

Code :
  1. Sheets(3).Range("A:I" ).Sort Key1:=Range("D1" ), Order1:=xlAscending, Key2:=Range("F1" ) _
  2.         , Order2:=xlAscending, Key3:=Range("G1" ), Order3:=xlAscending, Header:= _
  3.         xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
  4.         DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
  5.         xlSortNormal


 
et ca m'affiche :  

Code :
  1. Référence de tri non valide. Vérifiez qu'elle se trouve bien parmi les données à trier et que la zone Trier par n'est pas identique ou vide.


 
alors que ca marche en macro simple (créé automatiquement en Nouvelle macro...)
 
Merci de votre aide, je sêche !

mood
Publicité
Posté le 01-09-2006 à 12:30:27  profilanswer
 

n°1435174
seniorpapo​u
Posté le 01-09-2006 à 15:17:28  profilanswer
 

Bonsoir,
Il existe ton sheets(3)?
si oui rajoutes devant sheets(3).select
cordialement


Message édité par seniorpapou le 01-09-2006 à 15:35:52
n°1435192
Millenius
Posté le 01-09-2006 à 15:42:48  profilanswer
 

bien sur qu'il existe
et j'ai essayé en decoupant la macro
en faisant Sheets(3).select
ou Sheets(3).Range("A1:H500" ).select
Selection.sort ..
 
ca marche tjrs pas, meme erreur

n°1435200
seniorpapo​u
Posté le 01-09-2006 à 15:48:36  profilanswer
 

Re,
et si le select te gène , écris ton tri ainsi
Sheets(3).Range("A:I" ).Sort Key1:=Sheets(3).Range("D1" ), Order1:=xlAscending, Key2:=Sheets(3).Range("F1" ) _
        , Order2:=xlAscending, Key3:=Sheets(3).Range("G1" ), Order3:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
        xlSortNormal

n°1435291
Millenius
Posté le 01-09-2006 à 17:21:53  profilanswer
 

c'est EXACTEMENT ce que j'ai marqué dans le post #1 non ?
et ca marche pas...

n°1435302
galopin01
Posté le 01-09-2006 à 17:47:00  profilanswer
 

bonsoir,
Sheets(3) doit être active.
A+

n°1435314
seniorpapo​u
Posté le 01-09-2006 à 18:02:00  profilanswer
 

Millenius a écrit :

c'est EXACTEMENT ce que j'ai marqué dans le post #1 non ?
et ca marche pas...


tu n'as pas bien regardé:
 
Sheets(3).Range("A:I" ).Sort Key1:=Sheets(3).Range("D1" ), Order1:=xlAscending, Key2:=Sheets(3).Range("F1" ) _  
        , Order2:=xlAscending, Key3:=Sheets(3).Range("G1" ), Order3:=xlAscending, Header:= _  
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _  
        DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _  
        xlSortNormal
 
ainsi, la feuille n'a pas besoin d'être active
Cordialement


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Macro VB sous Excel] Prb de tri de colonne

 

Sujets relatifs
[Résolu] Macro supprimer une colonne[resolu][C# => Excel] : tableau à partir d'une appli windows en C#
[RESOLU] Excel --> powerpointFaire clignoter une cellule sur Excel avec VBA et lien hypertexte
Tri sous Excel avec répartition des données dans des feuillesLancement Macro avec/sans VB editor
[Excel - VBA] Déclencher un son quand un seuil est atteint[asp.net 2.0] éditer colonne d'une gridview
Vider le presse-papier avec vba sous excel 2003 
Plus de sujets relatifs à : [Macro VB sous Excel] Prb de tri de colonne


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR