Macro avec 1 formule différente liée au mois

Bonjour,

Je cherche à inclure dans une macro excel 12 formules liées aux mois pour remplir une cellule:
Exemple :

Si la cellule FI = janvier

Range("R4").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=C:\Program Files\Budget\[Budget .xls]Budget'!R4C18"

Si la cellule FI = Février
Range("R4").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=C:\Program Files\Budget\[Budget .xls]Budget'!R4C15"

Si la cellule FI = Mars
Range("R4").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=C:\Program Files\Budget\[Budget .xls]Budget'!R4C12"
Range("R4").Select
Selection.Copy
Range("R5:R2000").Select

Etc... jusqu'à décembre.

Je souhaite le faire par macro pour éviter 2000 cellules avec une formule conditionnelle à 12 variables, trop lourd.

Merci de votre aide.

1 réponse

  1. pourquoi une macro lorsque l'on peut l'éviter
    tu fait un tableau sur une feuille quelconque dans un coin ou tu n'écriras rien
    (à part le tableau cela s'entend)
    janvier C:\Program Files\Budget\[Budget .xls]Budget'!R4C18
    fevrier C:\Program Files\Budget\[Budget .xls]Budget'!R4C15
    mars

    decembre C:\Program Files\Budget\[Budget .xls]Budget'!R4C2"
    (bon j'ai pas vérifier le pas de décroissement) des colonne

    ceci fait tu sélectionne le tableau entier de janvier à C:\Program Files\Budget\[Budget .xls]Budget'!R4C2"
    et tu le nomme ( par ex Tablo)
    dans ta cellule au lieu d'une montrueuse formule tu tapes =rechercheV(F1;tablo;2;faux)