Macro pour nommer des plages

Bonjour bonjour,

Je viens pour quelque chose de très très simple, qui tient d'une syntaxe.

J'ai créé une macro qui me permet de nommer les plages d'un tableau. Jusque là tout va bien, c'est simple dans le principe.

Sauf que mes plages ne sont pas toutes de même taille (donc exit les i + x).

Par exemple :

Plage 1 : 
Prev. Act. Canal'!$D$86:$D$86;'Prev. Act. Canal'!$D$88:$D$92;'Prev. Act. Canal'!$D$94:$D$98;'Prev. Act. Canal'!$D$100:$D$104;'Prev. Act. Canal'!$D$106:$D$110
Plage 2 : 
Prev. Act. Canal'!$D$113:$D$117;'Prev. Act. Canal'!$D$119:$D$123;'Prev. Act. Canal'!$D$125:$D$129;'Prev. Act. Canal'!$D$131:$D$135
Plage 3 : 
Prev. Act. Canal'!$E$86:$E$86;'Prev. Act. Canal'!$E$88:$E$92;'Prev. Act. Canal'!$E$94:$E$98;'Prev. Act. Canal'!$E$100:$E$104;'Prev. Act. Canal'!$E$106:$E$110
Plage 4 : 
Prev. Act. Canal'!$E$113:$E$117;'Prev. Act. Canal'!$E$119:$E$123;'Prev. Act. Canal'!$E$125:$E$129;'Prev. Act. Canal'!$E$131:$E$135

En tout, la feuille comprend 25*12 plages. L'utilité de nommer chaque plage vient du fait qu'une autre macro génère des tableaux de bord sous forme de graphique, et ce automatiquement en se basant sur...les noms.

J'avais commencé à les nommer "à la main", mais c'est vraiment long et il y a de grandes chances que mes 3 autres feuilles, qui ont la même structure que l'incriminée, doivent aussi être nommées. Donc 25*12*3 noms.

Voici donc ma Macro, certes toute moche et rudimentaire mais qui fait l'affaire pour l'instant :

Sub creation_noms()

Dim TBOO(15) As Variant, Cellule1(12) As Variant, Cellule2(12) As Variant, Cellule3(12) As Variant, Cellule4(12) As Variant, Cellule5(12) As Variant, Cellule6(12) As Variant, Cellule7(12) As Variant, Cellule8(12) As Variant, Cellule9(12) As Variant, Cellule10(12) As Variant
Dim i As Integer, n As Integer

TBOO(0) = "1014"

TBOO(1) = "1114"
TBOO(2) = "1214"
TBOO(3) = "0115"
TBOO(4) = "0215"
TBOO(5) = "0315"
TBOO(6) = "0415"
TBOO(7) = "0515"
TBOO(8) = "0615"
TBOO(9) = "0715"
TBOO(10) = "0815"
TBOO(11) = "0915"
TBOO(12) = "1015"
TBOO(13) = "1115"
TBOO(14) = "1215"

Cellule1(0) = "86"
Cellule1(1) = "113"
Cellule1(2) = "138"
Cellule1(3) = "165"
Cellule1(4) = "192"
Cellule1(5) = "214"
Cellule1(6) = "241"
Cellule1(7) = "269"
Cellule1(8) = "295"
Cellule1(9) = "322"
Cellule1(10) = "350"
Cellule1(11) = "354"

Cellule2(0) = "86"
Cellule2(1) = "117"
Cellule2(2) = "142"
Cellule2(3) = "167"
Cellule2(4) = "195"
Cellule2(5) = "218"
Cellule2(6) = "243"
Cellule2(7) = "273"
Cellule2(8) = "298"
Cellule2(9) = "323"
Cellule2(10) = "354"
Cellule2(11) = "378"

Cellule3(0) = "88"
Cellule3(1) = "119"
Cellule3(2) = "144"
Cellule3(3) = "169"
Cellule3(4) = "197"
Cellule3(5) = "220"
Cellule3(6) = "245"
Cellule3(7) = "275"
Cellule3(8) = "300"
Cellule3(9) = "325"
Cellule3(10) = "356"
Cellule3(11) = "380"

Cellule4(0) = "92"
Cellule4(1) = "123"
Cellule4(2) = "148"
Cellule4(3) = "172"
Cellule4(4) = "200"
Cellule4(5) = "224"
Cellule4(6) = "249"
Cellule4(7) = "279"
Cellule4(8) = "304"
Cellule4(9) = "329"
Cellule4(10) = "359"
Cellule4(11) = "384"

Cellule5(0) = "94"
Cellule5(1) = "125"
Cellule5(2) = "150"
Cellule5(3) = "174"
Cellule5(4) = "202"
Cellule5(5) = "226"
Cellule5(6) = "251"
Cellule5(7) = "281"
Cellule5(8) = "306"
Cellule5(9) = "331"
Cellule5(10) = "361"
Cellule5(11) = "386"

Cellule6(0) = "98"
Cellule6(1) = "125"
Cellule6(2) = "150"
Cellule6(3) = "174"
Cellule6(4) = "206"
Cellule6(5) = "230"
Cellule6(6) = "254"
Cellule6(7) = "285"
Cellule6(8) = "310"
Cellule6(9) = "335"
Cellule6(10) = "365"
Cellule6(11) = "390"

Cellule7(0) = "100"
Cellule7(1) = "131"
Cellule7(2) = "156"
Cellule7(3) = "180"
Cellule7(4) = "208"
Cellule7(5) = "232"
Cellule7(6) = "256"
Cellule7(7) = "287"
Cellule7(8) = "312"
Cellule7(9) = "337"
Cellule7(10) = "367"
Cellule7(11) = "392"

Cellule8(0) = "104"
Cellule8(1) = "135"
Cellule8(2) = "160"
Cellule8(3) = "184"
Cellule8(4) = "211"
Cellule8(5) = "236"
Cellule8(6) = "260"
Cellule8(7) = "291"
Cellule8(8) = "316"
Cellule8(9) = "341"
Cellule8(10) = "371"
Cellule8(11) = "395"

Cellule9(0) = "106"
Cellule9(1) = "0"
Cellule9(2) = "162"
Cellule9(3) = "186"
Cellule9(4) = "0"
Cellule9(5) = "238"
Cellule9(6) = "262"
Cellule9(7) = "293"
Cellule9(8) = "318"
Cellule9(9) = "343"
Cellule9(10) = "373"
Cellule9(11) = "397"

Cellule10(0) = "110"
Cellule10(1) = "0"
Cellule10(2) = "163"
Cellule10(3) = "189"
Cellule10(4) = "0"
Cellule10(5) = "239"
Cellule10(6) = "266"
Cellule10(7) = "0"
Cellule10(8) = "320"
Cellule10(9) = "347"
Cellule10(10) = "0"
Cellule10(11) = "0"

For i = 0 To 14
For n = 0 To 11

'Names.Add Name:="DATE" & TBOO(i)", RefersTo:="'Prev. Act. Canal'!$c$" & Cellule1(n) & ":$c$" & Cellule2(n) & ";'Prev. Act. Canal'!$c$" & Cellule3(n) & ":$c$" & Cellule4(n) & ";'Prev. Act. Canal'!$c$" & Cellule5(n) & ":$c$" & Cellule6(n) & ";'Prev. Act. Canal'!$c$" & Cellule7(n) & ":$c$" & Cellule8(n) & ";'Prev. Act. Canal'!$c$" & Cellule9(n) & ":$c$" & Cellule10(n)"
Names.Add Name:="GRPREV" & TBOO(i), RefersTo:="='Prev. Act. Canal'!$D$" & Cellule1(n) & ":$D$" & Cellule2(n) & ";'Prev. Act. Canal'!$D$" & Cellule3(n) & ":$D$" & Cellule4(n) & ";'Prev. Act. Canal'!$D$" & Cellule5(n) & ":$D$" & Cellule6(n) & ";'Prev. Act. Canal'!$D$" & Cellule7(n) & ":$D$" & Cellule8(n) & ";'Prev. Act. Canal'!$D$" & Cellule9(n) & ":$D$" & Cellule10(n)

Names.Add Name:="GRPREVCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$e$" & Cellule1(n) & ":$e$" & Cellule2(n) & ";'Prev. Act. Canal'!$e$" & Cellule3(n) & ":$e$" & Cellule4(n) & ";'Prev. Act. Canal'!$e$" & Cellule5(n) & ":$e$" & Cellule6(n) & ";'Prev. Act. Canal'!$e$" & Cellule7(n) & ":$e$" & Cellule8(n) & ";'Prev. Act. Canal'!$e$" & Cellule9(n) & ":$e$" & Cellule10(n)

Names.Add Name:="HPPREV" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$f$" & Cellule1(n) & ":$f$" & Cellule2(n) & ";'Prev. Act. Canal'!$f$" & Cellule3(n) & ":$f$" & Cellule4(n) & ";'Prev. Act. Canal'!$f$" & Cellule5(n) & ":$f$" & Cellule6(n) & ";'Prev. Act. Canal'!$f$" & Cellule7(n) & ":$f$" & Cellule8(n) & ";'Prev. Act. Canal'!$f$" & Cellule9(n) & ":$f$" & Cellule10(n)

Names.Add Name:="HPPREVCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$g$" & Cellule1(n) & ":$g$" & Cellule2(n) & ";'Prev. Act. Canal'!$g$" & Cellule3(n) & ":$g$" & Cellule4(n) & ";'Prev. Act. Canal'!$g$" & Cellule5(n) & ":$g$" & Cellule6(n) & ";'Prev. Act. Canal'!$g$" & Cellule7(n) & ":$g$" & Cellule8(n) & ";'Prev. Act. Canal'!$g$" & Cellule9(n) & ":$g$" & Cellule10(n)

Names.Add Name:="PHPREV" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$h$" & Cellule1(n) & ":$h$" & Cellule2(n) & ";'Prev. Act. Canal'!$h$" & Cellule3(n) & ":$h$" & Cellule4(n) & ";'Prev. Act. Canal'!$h$" & Cellule5(n) & ":$h$" & Cellule6(n) & ";'Prev. Act. Canal'!$h$" & Cellule7(n) & ":$h$" & Cellule8(n) & ";'Prev. Act. Canal'!$h$" & Cellule9(n) & ":$h$" & Cellule10(n)

Names.Add Name:="PHPREVCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$i$" & Cellule1(n) & ":$i$" & Cellule2(n) & ";'Prev. Act. Canal'!$i$" & Cellule3(n) & ":$i$" & Cellule4(n) & ";'Prev. Act. Canal'!$i$" & Cellule5(n) & ":$i$" & Cellule6(n) & ";'Prev. Act. Canal'!$i$" & Cellule7(n) & ":$i$" & Cellule8(n) & ";'Prev. Act. Canal'!$i$" & Cellule9(n) & ":$i$" & Cellule10(n)

Names.Add Name:="DTPREV" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$j$" & Cellule1(n) & ":$j$" & Cellule2(n) & ";'Prev. Act. Canal'!$j$" & Cellule3(n) & ":$j$" & Cellule4(n) & ";'Prev. Act. Canal'!$j$" & Cellule5(n) & ":$j$" & Cellule6(n) & ";'Prev. Act. Canal'!$j$" & Cellule7(n) & ":$j$" & Cellule8(n) & ";'Prev. Act. Canal'!$j$" & Cellule9(n) & ":$j$" & Cellule10(n)

Names.Add Name:="DTPREVCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$k$" & Cellule1(n) & ":$k$" & Cellule2(n) & ";'Prev. Act. Canal'!$k$" & Cellule3(n) & ":$k$" & Cellule4(n) & ";'Prev. Act. Canal'!$k$" & Cellule5(n) & ":$k$" & Cellule6(n) & ";'Prev. Act. Canal'!$k$" & Cellule7(n) & ":$k$" & Cellule8(n) & ";'Prev. Act. Canal'!$k$" & Cellule9(n) & ":$k$" & Cellule10(n)

Names.Add Name:="GRPLAN" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$l$" & Cellule1(n) & ":$l$" & Cellule2(n) & ";'Prev. Act. Canal'!$l$" & Cellule3(n) & ":$l$" & Cellule4(n) & ";'Prev. Act. Canal'!$l$" & Cellule5(n) & ":$l$" & Cellule6(n) & ";'Prev. Act. Canal'!$l$" & Cellule7(n) & ":$l$" & Cellule8(n) & ";'Prev. Act. Canal'!$l$" & Cellule9(n) & ":$l$" & Cellule10(n)

Names.Add Name:="GRPLANCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$m$" & Cellule1(n) & ":$m$" & Cellule2(n) & ";'Prev. Act. Canal'!$m$" & Cellule3(n) & ":$m$" & Cellule4(n) & ";'Prev. Act. Canal'!$m$" & Cellule5(n) & ":$m$" & Cellule6(n) & ";'Prev. Act. Canal'!$m$" & Cellule7(n) & ":$m$" & Cellule8(n) & ";'Prev. Act. Canal'!$m$" & Cellule9(n) & ":$m$" & Cellule10(n)

Names.Add Name:="HPPLAN" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$n$" & Cellule1(n) & ":$n$" & Cellule2(n) & ";'Prev. Act. Canal'!$n$" & Cellule3(n) & ":$n$" & Cellule4(n) & ";'Prev. Act. Canal'!$n$" & Cellule5(n) & ":$n$" & Cellule6(n) & ";'Prev. Act. Canal'!$n$" & Cellule7(n) & ":$n$" & Cellule8(n) & ";'Prev. Act. Canal'!$n$" & Cellule9(n) & ":$n$" & Cellule10(n)

Names.Add Name:="HPPLANCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$o$" & Cellule1(n) & ":$o$" & Cellule2(n) & ";'Prev. Act. Canal'!$o$" & Cellule3(n) & ":$o$" & Cellule4(n) & ";'Prev. Act. Canal'!$o$" & Cellule5(n) & ":$o$" & Cellule6(n) & ";'Prev. Act. Canal'!$o$" & Cellule7(n) & ":$o$" & Cellule8(n) & ";'Prev. Act. Canal'!$o$" & Cellule9(n) & ":$o$" & Cellule10(n)

Names.Add Name:="PHPLAN" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$p$" & Cellule1(n) & ":$p$" & Cellule2(n) & ";'Prev. Act. Canal'!$p$" & Cellule3(n) & ":$p$" & Cellule4(n) & ";'Prev. Act. Canal'!$p$" & Cellule5(n) & ":$p$" & Cellule6(n) & ";'Prev. Act. Canal'!$p$" & Cellule7(n) & ":$p$" & Cellule8(n) & ";'Prev. Act. Canal'!$p$" & Cellule9(n) & ":$p$" & Cellule10(n)

Names.Add Name:="PHPLANCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$q$" & Cellule1(n) & ":$q$" & Cellule2(n) & ";'Prev. Act. Canal'!$q$" & Cellule3(n) & ":$q$" & Cellule4(n) & ";'Prev. Act. Canal'!$q$" & Cellule5(n) & ":$q$" & Cellule6(n) & ";'Prev. Act. Canal'!$q$" & Cellule7(n) & ":$q$" & Cellule8(n) & ";'Prev. Act. Canal'!$q$" & Cellule9(n) & ":$q$" & Cellule10(n)

Names.Add Name:="DTPLAN" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$r$" & Cellule1(n) & ":$r$" & Cellule2(n) & ";'Prev. Act. Canal'!$r$" & Cellule3(n) & ":$r$" & Cellule4(n) & ";'Prev. Act. Canal'!$r$" & Cellule5(n) & ":$r$" & Cellule6(n) & ";'Prev. Act. Canal'!$r$" & Cellule7(n) & ":$r$" & Cellule8(n) & ";'Prev. Act. Canal'!$r$" & Cellule9(n) & ":$r$" & Cellule10(n)

Names.Add Name:="DTPLANCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$s$" & Cellule1(n) & ":$s$" & Cellule2(n) & ";'Prev. Act. Canal'!$s$" & Cellule3(n) & ":$s$" & Cellule4(n) & ";'Prev. Act. Canal'!$s$" & Cellule5(n) & ":$s$" & Cellule6(n) & ";'Prev. Act. Canal'!$s$" & Cellule7(n) & ":$s$" & Cellule8(n) & ";'Prev. Act. Canal'!$s$" & Cellule9(n) & ":$s$" & Cellule10(n)

Names.Add Name:="GRREEL" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$t$" & Cellule1(n) & ":$t$" & Cellule2(n) & ";'Prev. Act. Canal'!$t$" & Cellule3(n) & ":$t$" & Cellule4(n) & ";'Prev. Act. Canal'!$t$" & Cellule5(n) & ":$t$" & Cellule6(n) & ";'Prev. Act. Canal'!$t$" & Cellule7(n) & ":$t$" & Cellule8(n) & ";'Prev. Act. Canal'!$t$" & Cellule9(n) & ":$t$" & Cellule10(n)

Names.Add Name:="GRREELCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$u$" & Cellule1(n) & ":$u$" & Cellule2(n) & ";'Prev. Act. Canal'!$u$" & Cellule3(n) & ":$u$" & Cellule4(n) & ";'Prev. Act. Canal'!$u$" & Cellule5(n) & ":$u$" & Cellule6(n) & ";'Prev. Act. Canal'!$u$" & Cellule7(n) & ":$u$" & Cellule8(n) & ";'Prev. Act. Canal'!$u$" & Cellule9(n) & ":$u$" & Cellule10(n)

Names.Add Name:="HPREEL" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$v$" & Cellule1(n) & ":$v$" & Cellule2(n) & ";'Prev. Act. Canal'!$v$" & Cellule3(n) & ":$v$" & Cellule4(n) & ";'Prev. Act. Canal'!$v$" & Cellule5(n) & ":$v$" & Cellule6(n) & ";'Prev. Act. Canal'!$v$" & Cellule7(n) & ":$v$" & Cellule8(n) & ";'Prev. Act. Canal'!$v$" & Cellule9(n) & ":$v$" & Cellule10(n)

Names.Add Name:="HPREELCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$w$" & Cellule1(n) & ":$w$" & Cellule2(n) & ";'Prev. Act. Canal'!$w$" & Cellule3(n) & ":$w$" & Cellule4(n) & ";'Prev. Act. Canal'!$w$" & Cellule5(n) & ":$w$" & Cellule6(n) & ";'Prev. Act. Canal'!$w$" & Cellule7(n) & ":$w$" & Cellule8(n) & ";'Prev. Act. Canal'!$w$" & Cellule9(n) & ":$w$" & Cellule10(n)

Names.Add Name:="PHREEL" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$x$" & Cellule1(n) & ":$x$" & Cellule2(n) & ";'Prev. Act. Canal'!$x$" & Cellule3(n) & ":$x$" & Cellule4(n) & ";'Prev. Act. Canal'!$x$" & Cellule5(n) & ":$x$" & Cellule6(n) & ";'Prev. Act. Canal'!$x$" & Cellule7(n) & ":$x$" & Cellule8(n) & ";'Prev. Act. Canal'!$x$" & Cellule9(n) & ":$x$" & Cellule10(n)

Names.Add Name:="PHREELCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$y$" & Cellule1(n) & ":$y$" & Cellule2(n) & ";'Prev. Act. Canal'!$y$" & Cellule3(n) & ":$y$" & Cellule4(n) & ";'Prev. Act. Canal'!$y$" & Cellule5(n) & ":$y$" & Cellule6(n) & ";'Prev. Act. Canal'!$y$" & Cellule7(n) & ":$y$" & Cellule8(n) & ";'Prev. Act. Canal'!$y$" & Cellule9(n) & ":$y$" & Cellule10(n)

Names.Add Name:="DTREEL" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$z$" & Cellule1(n) & ":$z$" & Cellule2(n) & ";'Prev. Act. Canal'!$z$" & Cellule3(n) & ":$z$" & Cellule4(n) & ";'Prev. Act. Canal'!$z$" & Cellule5(n) & ":$z$" & Cellule6(n) & ";'Prev. Act. Canal'!$z$" & Cellule7(n) & ":$z$" & Cellule8(n) & ";'Prev. Act. Canal'!$z$" & Cellule9(n) & ":$z$" & Cellule10(n)

Names.Add Name:="DTREELCUM" & TBOO(i), RefersTo:="""='Prev. Act. Canal'!$aa$" & Cellule1(n) & ":$aa$" & Cellule2(n) & ";'Prev. Act. Canal'!$aa$" & Cellule3(n) & ":$aa$" & Cellule4(n) & ";'Prev. Act. Canal'!$aa$" & Cellule5(n) & ":$aa$" & Cellule6(n) & ";'Prev. Act. Canal'!$aa$" & Cellule7(n) & ":$aa$" & Cellule8(n) & ";'Prev. Act. Canal'!$aa$" & Cellule9(n) & ":$aa$" & Cellule10(n)

Next n
Next i

End Sub

Le problème vient de ma syntaxe du Names.Add. Si je la formule comme "GRPREV", alors j'ai une erreur de syntaxe.

Si je la formule comme "GRPREVCUM", alors ça fonctionne mais je me retrouve avec des guillemets devant mon signe "=".

Si je la formule sans le égal, ben ça marche pas.

Y'aurait-il une gentille âme pour me venir en aide ?

Et, j'en profite, si cette gentille âme aurait un moyen de remplacer les N° de colonnes dans mes RefersTo par une variable, ça serait géant. Une boucle à l'intérieur d'une boucle, ça ferait l'affaire ?

Merci d'avance !

Poutous

EDIT : J'avais oublié de joindre le fichier anonymisé. En fait, le fichier est malheureusement trop gros... Il fait 700+ ko

Bonjour,

essayer en mettant à la fin :

& Cellule10(n) &""""

pour vos ligne de désignation de plage...

Sait-on jamais

@ bientôt

LouReeD

Malheureusement non, ça bug encore Il refuse la syntaxe

un guillemet de trop peut-être....

J'ai joint le fichier, si jamais ça peut aider.

Edit : Avec deux guillemets à la fin, il me balance une "fin d'instruction attendue"

19fichiertest.xlsm (223.78 Ko)

Bonjour,

Essaie de remplacer les points-virgules par des virgules.

Exemple :

Names.Add Name:="GRPREV" & TBOO(i), RefersTo:="='Prev. Act. Canal'!$D$" & Cellule1(n) & ":$D$" & Cellule2(n) & ",'Prev. Act. Canal'!$D$" & Cellule3(n) & ":$D$" & Cellule4(n) & ",'Prev. Act. Canal'!$D$" & Cellule5(n) & ":$D$" & Cellule6(n) & ",'Prev. Act. Canal'!$D$" & Cellule7(n) & ":$D$" & Cellule8(n) & ",'Prev. Act. Canal'!$D$" & Cellule9(n) & ":$D$" & Cellule10(n)

A+

Malheureusement...ça ne marche pas plus :/

C'est frustrant de bloquer sur une erreur de syntaxe

Pourtant, chez moi ça marche

22exemple.xlsm (15.83 Ko)

A+

Ben... ! Effectivement, sur ton fichier, ça marche nickel. Sur le mien par contre, toujours le même bins :/

Certaines de tes variables tableau ont pour valeur 0.

Cellule9(1) = "0"

Cellule9(4) = "0"

Cellule10(1) = "0"

Cellule10(4) = "0"

Cellule10(7) = "0"

Cellule10(10) = "0"

Cellule10(11) = "0"

Difficile dans ces conditions de définir une plage avec ces valeurs (Exemple : $D$0 :$D$0)

A+

Suis-je con... J'ai mis certaines à zero car certaines plages sont à 10 cellules et d'autres à 8, donc les deux dernières je les ai "neutralisées" comme ça. Sauf qu'effectivement, avec un "D1" ça devrait mieux marcher.

Je te dis ça

Naïce ! ça marche effectivement. Mais pourquoi ce con me parle-t-il de problème de syntaxe alors que ça venait des données !

Quoi qu'il en soit, ça marche, merci Par contre ma "neutralisation" des termes manquants dans certaines plages m'a foutu en l'air tous les noms, il va falloir que je trouve un autre moyen.

Toto

Avant de clore le sujet, je me permets de revenir sur un point :

Mes "For i/n" imbriqués ne marchent pas. Les valeurs de "n" sont bien incrémentées, mais celles de "i" non : seule la dernière est appliquée.

Du coup, je me retrouve avec 25*12 plages de mois d'octobre.

Je me doute que je dois avoir mal imbriqué mes boucles, mais j'avoue ne pas vraiment savoir comment rectifier ça.

Merci d'avance

Je me permets de ré-up avant que ça passe en page 2

Alors, pour info, j'ai réussi à me dépatouiller, mais pas à régler mon problème.

J'ai simplement supprimé un des deux integer (n je crois) et ça fait le job.

Rechercher des sujets similaires à "macro nommer plages"