nom à une zone de selection

Bonjour,

je voulais donner un nom à la zone contenant des données de mon tableau.

Je voulais le coder comme ceci :

Code:

---

1 2 3 4 5 6

NbColonnes = ActiveSheet.UsedRange.Columns.Count   NbLignes = ActiveSheet.UsedRange.Rows.Count   Range(ActiveSheet.UsedRange.Rows.Count:ActiveSheet.UsedRange.Columns.Count).Select Application.Goto Reference:="calcul"

---

Ou

Code:

---

1 2 3 4 5 6

NbColonnes = ActiveSheet.UsedRange.Columns.Count   NbLignes = ActiveSheet.UsedRange.Rows.Count   Range(NbColonnes : NbLignes ).Select Application.Goto Reference:="calcul"

---

Mais cela ne fonctionne pas alors que Range("A1:M1").Select fonctionne.

Comment doit-je noter ceci pour l'avoir sur mon tableau actif ?

Merci par avance

Bonjour,

Ce bout de code permet de creer un plage nommé flottante suivant le nombre de ligne et de colonnes utilisé sur la colonne A et la ligne 1

Code:

---

1 2	ActiveWorkbook.Names.Add Name:="calcul", RefersToR1C1:= _ "=Feuil1!R1C1:R" & Range("A:A").End(xlDown).Row & "C" & Rows("1:1").End(xlToRight).Column

---

Restera a adapter

Merci pour ton aide çà fonctionne :ccool: