VBA calcul rentabilité

Bonjour,
j'ai à calculer la rentabilité d'actifs, taux sans risque .mais mon programme ne marche pas:

Code:

---

1 2 3 4 5 6 7

Sub rentabilité()   Dim nb_titres As Integer Dim nb_dates As Integer 'insertion d'un feuille rentabilité après la feuille prix 'Sheets.Add After:=Sheets("prix") 'Sheets("Feuil4").Name = "rentatbilité"

---

Je cois que tu as un ami
http://www.developpez.net/forums/d76...cel/medaf-vba/

Tu donne un fichier il n'y a pratiquement rien pas de macro un tableau incompréhensible et la macro que tu donne (sans même utiliser les balise code regarde le premier sujet du forum aide a l'utilisation) permet tout juste d'insérer une feuille a condition d'enlever les commentaires.
Je te ferais donc la meme réponse a peu de chose près que ce que j'ai dit sur la discution dont je t'ai donné le lien. On peu t'aider mais pas le faire a ta place alors bosse