Funny Stadium : forum partenaire de Defifoot Manager -

Bonne nouvelle, ça marche, tant pour le calendrier que pour les joueurs.

Petites questions d'ordre pratique:
Quand on va dans classement, c'est pas dans l'ordre, comment l'ordonner ?
Pour les joueurs, faut mettre à jour leurs caractéristique régulièrement, on procède de la même manière ? Les données restent enregistrées pour voir les évolutions ?

Bon je vais mettre à jour le lien en première page

Alors pour mettre dans l'ordre les équipes il suffit de cliquer sur "Mise à jour" à côté du tableau, quand tu rempliras le calendrier des score des matchs tu n'auras qu'à cliquer dessus pour prendre ne compte les nouveaux scores.

Pour les statistiques des joueurs cela dépend de toi, mais il est vrai que cela ne sert à rien de le faire tout les jours, toutes les 1 à 2 semaines est un bon laps de temps entre deux relevés. Et oui les données sont sauvergardées pour pouvoir les voir dans la page "Evolution"

Je vais préparer une version avec des aides. Il est vrai que cela peut être parfois un peu compliquer à comprendre.

En tout cas un énorme merci pour avoir crée cet outil et le partager

Prêt pour la version f ?

L'outil mise à jour ne fonctionne pas chez moi... Il cherche indéfiniment et puis au final je suis obligé de fermer

Alors là je ne sais pas. Cela risque de prendre un peu de temps avant de trouver d'où viens le problème car il y a beaucoup de chose à regarder.

moi pareil quand je fais mise à jour du classement pour le remettre dans le bon ordre ça bug

Sub tri()
'
' tri Macro
' Tri des différentes journées, en fonction du nombre de points, de la différence de buts
' puis du nombre de buts marqués

Dim N As Integer
Range("P1:X11").Select ' zone de classement général
Selection.Sort Key1:=Range("R1"), Order1:=xlDescending, Key2:=Range("X1") _
, Order2:=xlDescending, Key3:=Range("V1"), Order3:=xlDescending, Header _
:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

For I = 1 To 18 ' pour chaque journée de championnat
Range("Z14:AG24").Offset(N, 0).Select
Selection.Sort Key1:=Range("AA14"), Order1:=xlDescending, Key2:=Range( _
"AG14"), Order2:=xlDescending, Key3:=Range("AE14"), Order3:=xlDescending _
, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _
xlTopToBottom
N = N + 11
Next I

End Sub

Sub copie()
'
' copie Macro
'

'
Range("P14:W247").Select
Selection.Copy
Range("Z14").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub


c le I qui cette fois est souligné

Merci

Bon j'ai rectifié ce défaut.

Euh


En créant la nouvelle saison
Remarque, le côté positif c'est qu'on n'a plus le problème du classement qui ne peut se trier vu qu'on n'arrive pas au classement

Bon la version V 2.06.f marche bien, le problème de rom venait d'un mauvais choix dans l'enregistrement de la nouvelle saison, la possibilité qu'il utilisait pour mettre le système en défaut va être supprimé dans la prochaine version.