Bouton trier ne fonctionne pas

Bonsoir tout le monde,

L'an passé, gràce à vous nous avons géré le tournoi de pelote.

En reprenant cette année le programme, nous constatons que certaines fonctions ne s'executent plus correctement.

J'ai donc besoin de votre aide

Dans la "liste des joueurs", le bouton trier ne fonctionne plus.

Dans planning la remise à zéro ne marche pas

Par contre, nous devons créer 2 feuilles supplémentaires en 4éme SERIE

Par contre, mon fichier pése 5.09 MO. Comment puis-je vous le transmettre ?

Merci de votre aide car sans vous je ne pourrais pas m'en sortir.

Bonsoir,

Un fichier de 5 Mo , il faut se poser des questions !

Sans doute mal ficelé ou ménage à faire.

Peut-tu joindre simplement la feuille avec la liste à trier et la macro pour trier

Fait une copie sur un nouveau classeur

le problème est venue en passant de 2003 2007 ?

Amicalement

Claude.

Re-bonsoir

Je joins donc la feuille "liste des joueurs"

En effet, après contrôle des versions, un ordinateur est équipé 2000 et l'autre 2003.

Sub TRIER()

'

' TRIER Macro

' Macro enregistrée le 11/10/2008 par

'

'

Columns("A:A").ColumnWidth = 15.29

Range("A3").Select

Selection.AutoFill Destination:=Range("A3:A400"), Type:=xlFillDefault

Range("A3:A400").Select

ActiveWindow.LargeScroll Down:=-17

Columns("A:A").Select

Selection.EntireColumn.Hidden = True

Range("B3").Select

Range("A1:AX523").Sort Key1:=Range("B2"), Order1:=xlAscending, Key2:= _

Range("C2"), Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, _

MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, _

DataOption2:=xlSortNormal

Range("B9").Select

End Sub

Je joins donc le fichier

https://www.excel-pratique.com/~files/doc2/PELOTE_2010testexcelpratique.zip

Merci d'avance

re,

bien que ta macro fonctionne chez moi,

essaye la partie tri suivante

    Range("A1:AX523").Sort Key1:=Range("B1"), Order1:=xlAscending, Key2:= _
    Range("C1"), Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, _
    MatchCase:=False, Orientation:=xlTopToBottom

Claude.

Salut le forum

Explication du pourquoi de l'incompatibilité

Le problème est du à l'option

DataOption1:=xlSortNormal et DataOption2:=xlSortNormal

Qui n'est apparu que sous Excel 2003.

Mytå

Bonjour

Je viens de tester la formule sur le 1er ordi (2000) et ça fonctionne.

Maintenant j'attends l'autre mais je ne pourrai tester que vendredi.

Merci à tous les deux pour votre aide.

Concernant le poids de ce programme, je suis tout à fait d'acord avec toi DUBOIS mais jj'ai fais avec les cnnaissances mais par contre j'aimerai refaire un programme allégé;

Cette année, je vais faire avec celui-ci mais je pense demander de l'aide au forum pour voir une versrion allégée.

Ce tournoi comporte 190 équipes et cela augmente un peu tous les ans.

Merci pour tout

bonjour,

regarde ce lien (Coucours Pétanque"), le fichier ne fait pas 400 Ko

https://www.excel-pratique.com/forum/viewtopic.php?t=13142

Déjà, fais le ménage dans tes macros (25 modules !!)

Amicalement

Claude.