j'essaie d'etablir un classement de 16 equipes en fonction de 3
criteres,(points, match gagne et difference de but)
la commande ci dessous fonctionne parfaitement mais est limitée a 3 criteres
Private Sub CommandButton1_Click()
'Trier par points
Range("c9: aa25 ").Select
Selection.Sort key1:=Range("k10"), order1:=xlDescending, key2:=Range("e10")
_
, order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending, _
header:=xlGuess, ordercustom:=1, MatchCase:=False,
Orientation:=xlTopToBottom
Range("a1").Select
End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere ce
code : key4:=range("h10")order4:=xlDescending _)
quand je l'execute j'ai un message me disans :
erreur d'execution '1004'
erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Tu n'as droit qu'à 3 critères. Pour résoudre le problème, fais un premier tri sur le quatrième critère, puis un second tri sur les 3 premiers. Cordialement. Daniel "Andrée et Romuald" a écrit dans le message de news:
Bonsoir tout le monde,
j'essaie d'etablir un classement de 16 equipes en fonction de 3 criteres,(points, match gagne et difference de but) la commande ci dessous fonctionne parfaitement mais est limitée a 3 criteres
Private Sub CommandButton1_Click() 'Trier par points Range("c9: aa25 ").Select Selection.Sort key1:=Range("k10"), order1:=xlDescending, key2:=Range("e10") _ , order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending, _ header:=xlGuess, ordercustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom Range("a1").Select End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere ce code : key4:=range("h10")order4:=xlDescending _) quand je l'execute j'ai un message me disans : erreur d'execution '1004' erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??
Merci d'avance Andrée et Romuald
Bonjour.
Tu n'as droit qu'à 3 critères.
Pour résoudre le problème, fais un premier tri sur le quatrième critère,
puis un second tri sur les 3 premiers.
Cordialement.
Daniel
"Andrée et Romuald" <fa289649@skynet.be> a écrit dans le message de news:
ejEY6DhwGHA.3996@TK2MSFTNGP03.phx.gbl...
Bonsoir tout le monde,
j'essaie d'etablir un classement de 16 equipes en fonction de 3
criteres,(points, match gagne et difference de but)
la commande ci dessous fonctionne parfaitement mais est limitée a 3
criteres
Private Sub CommandButton1_Click()
'Trier par points
Range("c9: aa25 ").Select
Selection.Sort key1:=Range("k10"), order1:=xlDescending,
key2:=Range("e10") _
, order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending, _
header:=xlGuess, ordercustom:=1, MatchCase:úlse,
Orientation:=xlTopToBottom
Range("a1").Select
End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere
ce code : key4:=range("h10")order4:=xlDescending _)
quand je l'execute j'ai un message me disans :
erreur d'execution '1004'
erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??
Bonjour. Tu n'as droit qu'à 3 critères. Pour résoudre le problème, fais un premier tri sur le quatrième critère, puis un second tri sur les 3 premiers. Cordialement. Daniel "Andrée et Romuald" a écrit dans le message de news:
Bonsoir tout le monde,
j'essaie d'etablir un classement de 16 equipes en fonction de 3 criteres,(points, match gagne et difference de but) la commande ci dessous fonctionne parfaitement mais est limitée a 3 criteres
Private Sub CommandButton1_Click() 'Trier par points Range("c9: aa25 ").Select Selection.Sort key1:=Range("k10"), order1:=xlDescending, key2:=Range("e10") _ , order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending, _ header:=xlGuess, ordercustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom Range("a1").Select End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere ce code : key4:=range("h10")order4:=xlDescending _) quand je l'execute j'ai un message me disans : erreur d'execution '1004' erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??
Merci d'avance Andrée et Romuald
Andrée et Romuald
bonsoir, ok, je comprends bien l'astuce et je vais appliquer ton conseil merci pour l'aide
"Daniel" a écrit dans le message de news:
Bonjour. Tu n'as droit qu'à 3 critères. Pour résoudre le problème, fais un premier tri sur le quatrième critère, puis un second tri sur les 3 premiers. Cordialement. Daniel "Andrée et Romuald" a écrit dans le message de news:
Bonsoir tout le monde,
j'essaie d'etablir un classement de 16 equipes en fonction de 3 criteres,(points, match gagne et difference de but) la commande ci dessous fonctionne parfaitement mais est limitée a 3 criteres
Private Sub CommandButton1_Click() 'Trier par points Range("c9: aa25 ").Select Selection.Sort key1:=Range("k10"), order1:=xlDescending, key2:=Range("e10") _ , order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending, _ header:=xlGuess, ordercustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom Range("a1").Select End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere ce code : key4:=range("h10")order4:=xlDescending _) quand je l'execute j'ai un message me disans : erreur d'execution '1004' erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??
Merci d'avance Andrée et Romuald
bonsoir,
ok, je comprends bien l'astuce
et je vais appliquer ton conseil
merci pour l'aide
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
u2V86ahwGHA.976@TK2MSFTNGP05.phx.gbl...
Bonjour.
Tu n'as droit qu'à 3 critères.
Pour résoudre le problème, fais un premier tri sur le quatrième critère,
puis un second tri sur les 3 premiers.
Cordialement.
Daniel
"Andrée et Romuald" <fa289649@skynet.be> a écrit dans le message de news:
ejEY6DhwGHA.3996@TK2MSFTNGP03.phx.gbl...
Bonsoir tout le monde,
j'essaie d'etablir un classement de 16 equipes en fonction de 3
criteres,(points, match gagne et difference de but)
la commande ci dessous fonctionne parfaitement mais est limitée a 3
criteres
Private Sub CommandButton1_Click()
'Trier par points
Range("c9: aa25 ").Select
Selection.Sort key1:=Range("k10"), order1:=xlDescending,
key2:=Range("e10") _
, order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending,
_
header:=xlGuess, ordercustom:=1, MatchCase:úlse,
Orientation:=xlTopToBottom
Range("a1").Select
End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere
ce code : key4:=range("h10")order4:=xlDescending _)
quand je l'execute j'ai un message me disans :
erreur d'execution '1004'
erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??
bonsoir, ok, je comprends bien l'astuce et je vais appliquer ton conseil merci pour l'aide
"Daniel" a écrit dans le message de news:
Bonjour. Tu n'as droit qu'à 3 critères. Pour résoudre le problème, fais un premier tri sur le quatrième critère, puis un second tri sur les 3 premiers. Cordialement. Daniel "Andrée et Romuald" a écrit dans le message de news:
Bonsoir tout le monde,
j'essaie d'etablir un classement de 16 equipes en fonction de 3 criteres,(points, match gagne et difference de but) la commande ci dessous fonctionne parfaitement mais est limitée a 3 criteres
Private Sub CommandButton1_Click() 'Trier par points Range("c9: aa25 ").Select Selection.Sort key1:=Range("k10"), order1:=xlDescending, key2:=Range("e10") _ , order2:=xlDescending, key3:=Range("j10"), order3:=xlDescending, _ header:=xlGuess, ordercustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom Range("a1").Select End Sub
je voudrais bien en appliquer un quatrieme criteres(but inscrit)(j'insere ce code : key4:=range("h10")order4:=xlDescending _) quand je l'execute j'ai un message me disans : erreur d'execution '1004' erreur definie par l'application ou par l'objet'
Pourriez vous m'expliquer pourquoi et comment resoudre cette "astuce"??