Simplification d'un code VBA

Bonjour,

Dans le fichier joint, je réalise un tirage aléatoire de valeurs contenues dans des matrices (janvier, février, etc.). Je voudrais savoir s'il est possible de simplifier le code VBA car je répète 12 fois la même formule pour les 12 mois de l'année.
Est-il possible de faire un code qui dirait : de janvier à décembre, effectuer tel calcul?

J'ai également une 2ème question. A la fin du tirage, je lui dit d'enregistrer les données dans la feuille Enregistrement. Le problème est que si je lance d'autres tirages en appuyant sur le bouton, les nouveaux tirages remplacent les anciens. Or, je voudrais qu'ils se mettent à la suite.

J'espère avoir été assez claire.

En vous remerciant par avance.

Bonjour,
Je n'ai pas regardé l'ensemble de ton code, mais voici un code qui lit toutes les plages nommées, Janvier à Décembre. Bien sûr s'il y a d'autres plages nommées que celles que tu dois traiter dans ton tirage cela ne fonctionneras pas.
Philippe Tulliez

Code:

---

1 2 3 4

Dim n As Name For Each n In ThisWorkbook.Names num = Application.WorksheetFunction.Index(Range(n), 2) Next

---

Bonjour à tous

Regarde si la proposition en pièce jointe pourrait te convenir

Bonjour,

Tout d'abord bonne année!

Merci pour les réponses, c'est exactement ce qu'il me fallait!