Bonjour le forum,

J'ai bien l'impression d'être fatigué, mais rien y fait, je suis en train de perdre mon temps pour une erreur qui sautera à vos yeux experts.
J'essaye de nommer une plage dynamique après la création d'une feuille avec une formule de type DECALER. Apparemment, ça ne plait pas trop à excel qui me dit que ma formule contient une erreur, J'ai beau chercher, je ne trouve pas, un idée?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim Prgm As String
Dim Wb As Workbook
Dim D As Integer
 
 
 
Set Wb = ActiveWorkbook
 
 
 
Prgm = InputBox("Quel programme souhaitez-vous créer?")
 
 
    Sheets.Add After:=Sheets(Sheets.Count)
    ActiveSheet.Name = Prgm
    ActiveCell.FormulaR1C1 = "Liste des activités liées à " & Prgm
 
   Wb.Names.Add Name:=Prgm, RefersTo:= _
        "=DECALER('" & Prgm & "'!$A$1;1;0;NBVAL('" & Prgm & "'!$A:$A)-1)"