Discussion :

[anisr]

Bonjour,

Comment faire pour nommer une plage de cellule et de pouvoir modifier cette plage de cellule en tant compte des ajouts de lignes.

Merci de votre aide!

[ouskel'n'or]

Tu as essayé l'enregistreur de macros ? Ça donne ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    ActiveWorkbook.Names.Add Name:="Nom", RefersToR1C1:="=Feuil1!R6C4:R14C7"

Après, tu vois si tu veux utiliser un nom placé dans une variable
Edit (j'avais oublié)
Quand tu insères des lignes à l'intérieur d'une plage nommée, la plage nommée s'étend d'autant de lignes

[anisr]

J'ai essayé l'enregisteur et je n'arrive pas à comprendre le code

En outre les lignes s'ajoutent après la première selection.

Merci si tu peux faire quelque chose pour moi

[ouskel'n'or]

En outre les lignes s'ajoutent après la première selection.

Ok, alors tu n'as pas d'autre choix que de redéfinir ta plage.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    ActiveWorkbook.Names.Add Name:="LaPlage", RefersToR1C1:= _
        "=Feuil1!R6C5:R15C8"

Pour utiliser une variable Plage, tu demandes

[ouskel'n'or]

Si tu veux faire ça en dynamique :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
    NoLigne = 6
    NoCol = 5
    NoLigne2 = 18
    NoCol2 = 10
    NouvellePlage = "=Feuil1!" & Range(Cells(NoLigne, NoCol), _
                            Cells(NoLigne2, NoCol2)).Address
    ActiveWorkbook.Names.Add Name:="LaPlage", RefersTo:=NouvellePlage

[SfJ5Rpw8]

J'...
En outre les lignes s'ajoutent après la première selection....

on pourrai savoir comment tu rajoute ces lignes... et qu'elle est l'organisation de tes données..?

[anisr]

Les lignes proviennent d'une source exterieure (imprtation des données)

[ouskel'n'or]

Et donc, le code que je t'ai passé ici devrait convenir