Re : macro excel loi de Student et Fischer
Il faut installer l’utilitaire d’analyse (c’est peut-être déjà fait)
Puis le cocher dans macro complémentaire excel
mais aussi, il faut l’installer dans vba : Outils/Références/parcourir => puis suivre le chemin
C:\Program Files\Microsoft Office\Office\Macrolib\Analyse
Puis choisir dans Fichiers de type (.xls,.xla), choisir ATPVBAEN.XLA, ouvrir/OK
=> la référence à ATPVBAEN.XLA doit apparaître dans la fenêtre de gauche « projet-vbaproject »
pour lancer la macro, il faut effacer les résultats actuels :
Columns("G:I").Select
Selection.Clear
Range("A1").Select
Ce qui donne le code suivant :
Sub statistiques()
'--préparation--
Columns("G:I").Select
Selection.Clear
'-------Test_Student
'utilitaire d'analyse/test d'égalité des espérances, observations pairées
'dans l'exemple, variable 1 = A, variable 2 = B
'remarque les deux échantillons doivent être de même longueur => je prends 6 lignes
Application.Run "ATPVBAEN.XLA!Pttestm", ActiveSheet.Range("$A$2:$A$6"), _
ActiveSheet.Range("$D$2:$D$6"), ActiveSheet.Range("$G$2"), False, 0.05
'----- Test_Fischer
'utilitaire d'analyse/test d'égalité des variances
Application.Run "ATPVBAEN.XLA!Ftestv", ActiveSheet.Range("$A$2:$A$6"), _
ActiveSheet.Range("$D$2:$D$10"), ActiveSheet.Range("$G$18"), False, 0.05
Range("A1").Select
End Sub
Il ne faut pas oublier, non plus, que les plages sélectionnées sont fixes => il faut les adapter aux séries étudiées
Test_Student : Range("$A$2:$A$6")
Test_Fischer : Range("$D$2:$D$10")
🙂
albert