bonjour,
j'ai repéré 2 erreurs.
la première est un problème avec tes if qui ne sont pas fermés par un nombre équivalent de end if ce qui provoque une erreur de next without for.
la deuxième est que tu as dans ta formule prix(m) une utilisation de la variable t en dehors de ta boucle t, ce qui ne me parait pas correct.
pour le reste comme je ne sais pas ce que tu cherches à faire, difficile de déterminer si ta logique est correcte.