vba et boucle pour créer des zones nommée

[perdinch]

Bonjour,

EN VBA je souhaite automatiser la création des 3 zones dynamique pour chacun des 4 onglets :

IL FAUT QUE JE REMPLACE dans le code "calcul_1" par ma variable nommée "onglet_calcul" sauf que je n'arrive pas à trouver la bonne syntaxe

voici le fichier

 

[JNP]

Re : vba et boucle pour créer des zones nommée

Bonjour Perdinch 🙂,
Evite le TOUT MAJUSCULE si tu n'es pas en colère 😡...
A mon avis, tu fais fausse route...

    ActiveWorkbook.Names.Add Name:=nom_zone_nommee_num, RefersToR1C1:= _
        "=OFFSET(" & onglet_calcul.Name & "!R1C8,,,,COUNTIF(" & onglet_calcul.Name & "!R1,""  num""))"
    ActiveWorkbook.Names.Add Name:=nom_zone_nommee_denom, RefersToR1C1:= _
        "=OFFSET(" & onglet_calcul.Name & "!R1C8,,COUNTIF(calcul_1!R1,""  num""),,COUNTIF(" & onglet_calcul.Name & "!R1,""  num""))"
    ActiveWorkbook.Names.Add Name:=nom_zone_nommee_taux, RefersToR1C1:= _
        "=OFFSET(" & onglet_calcul.Name & "!R1C8,,COUNTIF(" & onglet_calcul.Name & "!R1,""  num"")+(COUNTIF(" & onglet_calcul.Name & "!R1,""  num"")),,COUNTIF(" & onglet_calcul.Name & "!R1,""  taux""))"

serait syntaxiquement correct, mais tu mélanges les choux et les carottes...
RefersToR1C1 attends une plage, et tu lui envoies une formule de feuille...
Bon courage 😎

 

[Efgé]

Re : vba et boucle pour créer des zones nommée

Bonjour perdinch,
je n'ai pas bien compris la question :

Bonjour,
IL FAUT QUE JE REMPLACE dans le code "calcul_1" par ma variable nommée "onglet_calcul" sauf que je n'arrive pas à trouver la bonne syntaxe

Il n'y à pas de macro nommée "calcul_1" dans votre exemple...
Je pense que dans votre code il faut changer:

nom_zone_nommee_num = "zn_num" & ActiveSheet.Name
nom_zone_nommee_denom = "zn_denom" & ActiveSheet.Name
nom_zone_nommee_taux = "zn_taux" & ActiveSheet.Name

Avec cette modif le code ne "plante" pas chez moi.
N'hésitez pas à dire si la solution est bonne ou mauvaise ...
Cordialement

Edit : Bonjour JNP, je n'étais même pas aller assez loin. (pas dépasser le début en fait 😱 )

 

[perdinch]

Re : vba et boucle pour créer des zones nommée

Bonsoir,

merci de vos réponses avec une mention spéciale à JNP car vous avez répondu exactement à mon attente et le résultat est parfait même si mon code généré en grande partie avec l'enregistreur de macro n'est pas de la plus grande pureté il fonctionne parfaitement et ce grâce à votre contribution .

cordialement

perdinch